Rouni.fr :: BlogNotes

Imprimer

ImprimerLire une touche clavier sous Perl. Méthode la plus utilisée et la plus rapide : chomp($saisie = <STDIN>);

Imprimer

ImprimerLe module File::Find permet de rechercher des fichiers en fonction de critères. use File::Find; sub wanted { my $file = @_; my $path_file = $Find::File::name; print "$file $path_file\n"; } find(\&wanted, ".");

Imprimer

ImprimerUne fonction peut ne pas comporter d’arguments (paramètres formels), mais cela présente assez peu d’intérêts et peut même se révéler dangereux puisque l’on peut modifier les variables globales (variables visibles de tous les blocs d’instructions). Les paramètres réels (transmis à […]

Imprimer

ImprimerAfficher un hachage trié print "$_ $hash{$_}\n" for sort keys %hash; D’autres façons de trier un hachage : my @ord=sort keys %hash; for my $cle(@ord){ print "$cle $hash{$cle}\n"; } ou print “$_ $hash{$_}\n” for @ord; ou for my $cle(sort keys […]

Imprimer

ImprimerComment passer des arguments en ligne de commande à un script Perl. #!/usr/bin/perl use strict; use warnings; use Getopt::Long; my ( $fichier_in, $fichier_out ) = (); GetOptions( ‘in=s’ => \$fichier_in, ‘out=s’ => \$fichier_out, ); unless ( defined $fichier_in and defined […]

Imprimer

ImprimerPour accéder simplement à  tous les éléments d’un tableau : foreach my $val (@tableau) { print $val; }