[Perl] [SPAM] [SPAM] J'ai une variable qui varie toute seule...
Patrice Karatchentzeff
patrice.karatchentzeff at gmail.com
Jeu 14 Sep 16:25:19 CEST 2017
Yes... c'était trop gros.
Merci... et désolé
2017-09-14 16:09 GMT+02:00 Sylvain Lhullier <sylvain at lhullier.org>:
> Je pense qu'il faut remplacer printf par sprintf ! :-)
>
>
> Patrice Karatchentzeff a écrit :
> > Salut,
> >
> > J'ai un truc que je ne pige pas. Voici un POC :
> >
> > % cat test.pl
> >
> > #!/usr/bin/perl
> >
> > use strict;
> > use warnings;
> > use English;
> >
> > my $ptime;
> >
> >
> > $ptime = printTime();
> > print "$ptime : $ptime grrrr\n";
> > print "toto $ptime : rrrggg\n";
> >
> >
> > sub printTime {
> > my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) =
> localtime();
> > my $time = printf("%02d:%02d:%02d", $hour, $min, $sec);
> > return $time;
> > }
> >
> > % ./test.pl
> > 16:00:561 : 1 grrrr
> > toto 1 : rrrggg
> >
> > Pour quoi la variable ptime devient 1 dès son second emploi ?
> >
> > Merci
> >
> > PK
> >
> > --
> > |\ _,,,---,,_ Patrice KARATCHENTZEFF
> > ZZZzz /,`.-'`' -. ;-;;,_ mailto:patrice.karatchentzeff at gmail.com
> > |,4- ) )-,_. ,\ ( `'-' http://p.karatchentzeff.free.fr
> > '---''(_/--' `-'\_)
>
> > _______________________________________________
> > Perl mailing list
> > Perl at mongueurs.net
> > http://listes.mongueurs.net/mailman/listinfo/perl
>
>
> --
> Sylvain Lhullier
> Formation Perl http://formation-perl.fr/
> Président des Mongueurs de Perl http://mongueurs.net/
> _______________________________________________
> Perl mailing list
> Perl at mongueurs.net
> http://listes.mongueurs.net/mailman/listinfo/perl
>
--
|\ _,,,---,,_ Patrice KARATCHENTZEFF
ZZZzz /,`.-'`' -. ;-;;,_ mailto:patrice.karatchentzeff at gmail.com
|,4- ) )-,_. ,\ ( `'-' http://p.karatchentzeff.free.fr
'---''(_/--' `-'\_)
-------------- section suivante --------------
Une pièce jointe HTML a été nettoyée...
URL: <http://listes.mongueurs.net/mailman/private/perl/attachments/20170914/1c9c11b5/attachment.html>
Plus d'informations sur la liste de diffusion Perl