Voici ici quelques instructions que l'on apprend dans les tutoriels sur internet, mais dont les syntaxes sont désuètes:
[code:1:75a8079698]for($i = 0; $i <= 20; $i++) {}[/code:1:75a8079698]
à remplacer par
[code:1:75a8079698]for my $i(0..20) {}[/code:1:75a8079698]
[code:1:75a8079698]open(BLOCK, ">$file"); # Très dangereux: exécution de code arbitraire possible[/code:1:75a8079698]
à remplacer par
[code:1:75a8079698]open(my $fh, '>', $file);[/code:1:75a8079698]
[code:1:75a8079698]foreach my $lettre (chr(ord(a))..chr(ord(z))) {
print $_;
}[/code:1:75a8079698]
à remplacer par
[code:1:75a8079698]say for 'a'..'z';[/code:1:75a8079698]
Conseil: La variable $_ est magique, mais pas divine, essayer de l'utiliser le moins possible, et ne jamais forcer sa modification.
Pour cela, transférer sa valeur dans une autre variable. Voir exemple:
[code:1:75a8079698]for(1..10) {
print ($_ - 1) . "\n";
}[/code:1:75a8079698]
à remplacer par
[code:1:75a8079698]for my $num(1..10) {
print ($num - 1), "\n";
}[/code:1:75a8079698]
Des exemples seront ajoutés au fur et à mesure.