A voir également:
- PERL: Appeler 1 procédure ds une autre ?
- Denon perl pro test - Accueil - Audio
- Active perl - Télécharger - Édition & Programmation
- Perl foreach ✓ - Forum Perl
- [Perl] WWW::Mechanize - Forum Perl
- DzSoft Perl Editor - Télécharger - Édition & Programmation
1 réponse
Bobinours
Messages postés
2898
Date d'inscription
jeudi 26 avril 2001
Statut
Membre
Dernière intervention
21 mars 2013
504
20 mars 2002 à 00:26
20 mars 2002 à 00:26
#!/usr/bin/perl -w
use strict;
sub fonct_1
{
return "Hello Worl";
}
sub fonct_2
{
my $chaine = fonct_1;
print $chaine;
}
fonct_2();
-= Bobinours =-
use strict;
sub fonct_1
{
return "Hello Worl";
}
sub fonct_2
{
my $chaine = fonct_1;
print $chaine;
}
fonct_2();
-= Bobinours =-
20 mars 2002 à 14:29
Thanks and see you Soon