Section courante

A propos

Section administrative du site

DELETE

Effacer
Perl
 

Syntaxe

delete
delete list

Paramètres

Nom Description
list Ce paramètre permet d'indiquer des clefs ou des valeurs associatives à supprimer.

Retour

Valeur Description
undef Cette valeur permet d'indiquer que la clef n'existe pas.
variable Ces valeurs permettent d'indiquer la valeur associée avec la clef ou l'index supprimé.

Description

Cette fonction permet d'enlever une paire d'élément d'un tableau et/ou haché («hash»).

Exemples

Voici un exemple d'utilisation de cette fonction :

  1. #!/usr/bin/perl
  2.  
  3. my @TBase = ('0'..'9','A'..'Z','a'..'z');
  4. for(my $I = 0; $I < $#TBase; $I++) {
  5.    print $TBase[$I];
  6. }
  7. print "\n";
  8. delete $TBase[3];
  9. for(my $I = 0; $I < $#TBase; $I++) {
  10.    if(defined($TBase[$I])) {
  11.         print $TBase[$I];
  12.    }
  13. }
  14. print "\n";
  15. for(my $I = $#TBase; $I > 0; $I--) {
  16.    if(($I & 1) == 0) {
  17.         delete $TBase[$I];
  18.    }
  19. }
  20. for(my $I = 0; $I < $#TBase; $I++) {
  21.    if(defined($TBase[$I])) {
  22.         print $TBase[$I];
  23.    }
  24. }
  25. print "\n";

on obtiendra un résultat suivant :

0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxy
012456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxy
01579BDFHJLNPRTVXZbdfhjlnprtvx

Voici un exemple permettant d'effacer un item précis dans un tableau :

  1. #!/usr/bin/perl
  2.  
  3. use strict;
  4.  
  5. my %users = ("smaltais","Sylvain Maltais","root","Administrateur","stremblay","Steve Tremblay");
  6.  
  7. delete $users{"stremblay"};
  8.  
  9. foreach my $user (keys %users) {
  10.    print "$user => $users{$user}\n";
  11. }

on obtiendra le résultat suivant :

smaltais => Sylvain Maltais
root => Administrateur

Références

La Bible Micro Application HTML & Développement Web, Stefan Munz, Wolfgang Nefzger, 2003, ISBN: 2-7429-2898-7, page 1111
Perl/CGI-Programmation avancée Grand Livre, Edition Micro Application, Rolf D. Stoll, 2001, ISBN: 2742919082, page 120, 123

Dernière mise à jour : Dimanche, le 18 octobre 2015