La première chose à faire en perl est de vérifier que le code est valide, avec la commande : perl -cw, ce qui donne
$ perl -cw essai.pl
Unquoted string "fhin" may clash with future reserved word at essai.pl line 11.
Can't modify numeric lt (<) in sysread at essai.pl line 11, near "3500) "
Not enough arguments for sysread at essai.pl line 11, near "3500) "
essai.pl had compilation errors.
Ensuite il y a des problèmes avec les instructions close :
* le premier close est mal placé
* il manque le close sur le fichier en sortie
Je te recommande d'utiliser l'outil perlcritic pour vérifier tes codes perl : il vérifie les "bonnes pratiques" de codage et permet ainsi d'éviter pas mal d'erreurs.
# code non valide
Posté par eric gerbier (site web personnel) . En réponse au message incrémenter les lignes d'un fichier et découper à 30 lignes et passer à une nouvelle page. Évalué à 1.
La première chose à faire en perl est de vérifier que le code est valide, avec la commande : perl -cw, ce qui donne
Ensuite il y a des problèmes avec les instructions close :
* le premier close est mal placé
* il manque le close sur le fichier en sortie
Je te recommande d'utiliser l'outil perlcritic pour vérifier tes codes perl : il vérifie les "bonnes pratiques" de codage et permet ainsi d'éviter pas mal d'erreurs.