Shorten initializers

Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: Shorten initializers by thelenm (Vicar) on Jun 26, 2003 at 18:38 UTC
You can't do it quite like that, but you could do either of these: `my ($foo, $bar, $baz) = (0, 0, 0); my ($foo, $bar, $baz) = (0)x3;` [download] -- Mike `-- just,my${.02}`	[reply] [d/l]
Re: Re: Shorten initializers by Anonymous Monk on Jun 26, 2003 at 22:55 UTC
Thanks to everyone!	[reply]
Re: Shorten initializers by Zaxo (Archbishop) on Jun 26, 2003 at 18:39 UTC
What you have is correct syntax, but it only initializes $a. Try: `my ($a,$b,$c) = (0) x 3;` or `my ($a,$b,$c) = (0, 0, 0);` Please avoid $a and $b as variable names, that will interfere with sort. After Compline, Zaxo	[reply] [d/l] [select]
Re: Shorten initializers by fglock (Vicar) on Jun 26, 2003 at 18:38 UTC
`my ($a, $b, $c) = (0) x 3; print "$a - $b - $c";` [download] update: `$_=0 for my($a,$b,$c);`	[reply] [d/l] [select]
Re: Shorten initializers by antirice (Priest) on Jun 26, 2003 at 19:27 UTC
In the spirit of TMTOWTDI: `my $a = my $b = my $c = 0;` [download] antirice The first rule of Perl club is - use Perl The ith rule of Perl club is - follow rule i - 1 for i > 1	[reply] [d/l]
Re: Re: Shorten initializers by LazerRed (Pilgrim) on Jun 26, 2003 at 19:39 UTC
Sorry, but I saw your post, and started humming... My-my-my-my (U can't touch this) music hits me so hard Makes me say,"oh my lord thank you for blessing me Mc Hammer Lyrics	[reply]


No such thing as a small change
	PerlMonks