Re: Re: Re: sprintf and for loop weirds???

Or even more robustly with ...

for my $n ($[..$#a) {
    ...
}
[download]

For the rare possibility where the first index of arrays may be non-zero as a result of some other strange code obfuscation. :-)

Update : push(@b, sprintf("%.2f", $_)) foreach @a; as suggested by larsen may be nicer and much prettier, but hey! I like obfuscated code :-)

Ooohhh, Rob no beer function well without!

Comment on Re: Re: Re: sprintf and for loop weirds??? Select or Download Code

Replies are listed 'Best First'.
Re: Re: Re: Re: sprintf and for loop weirds??? by blakem (Monsignor) on Nov 04, 2001 at 16:26 UTC
Looks like the perfect place for `map`. `my @b = map {sprintf("%.2f",$_)} @a;` [download] Oh, you said obfuscated.... hows this for a first step down obfuscated lane: `my @b = split' ',sprintf" %.2f"x@a,@a;` [download] one more step, and I'm done: `s;;sprintf" %.2f"x@a,@a;e;my@b=split;` [download] -Blake	[reply] [d/l] [select]
Re: Re: Re: Re: Re: sprintf and for loop weirds??? by rob_au (Abbot) on Nov 04, 2001 at 17:30 UTC
Yes, but you still use `sprintf` ... `my@b=map{eval{$_=int$_102;s;(..)$;\.$1;;return$_}}@a;` [download] Ooohhh, Rob no beer function well without!*	[reply] [d/l] [select]