Mini question en Perl

Tu utilises sub:

#!/usr/bin/perl
sub ma_fonction() {
my($nom) = @_;

if ($nom eq ""){
$nom="World";
}
print("Hello $nom\n");
}

&ma_fonction();
&ma_fonction("toi");

Allways close to Open Source...
Johan Daine

jisiv : es-tu sûr qu'on puisse mettre de parenthèses après le nom ?
---> sub ma_fonction() {
Je n'ai jamais vu.

J'ai toujours vu :
---> sub ma_fonction {

-= Bobinours =-

Bisounours a raison, la réponse au coeur du site:

http://www.commentcamarche.net/perl/perlfonc.php3

Les parenthèses sont de trop mais après vérification auprès de mon compilateur (Perl 5.5 sous win32), les mettre ne gène pas.

MERCI LES GARS POUR VOTRE AIDE