We don't bite newbies here... much | |
PerlMonks |
Re: Mixing up da Arrays (Golf)by arhuman (Vicar) |
on Apr 18, 2001 at 18:44 UTC ( [id://73513]=note: print w/replies, xml ) | Need Help?? |
I'll definitly win the 'ugly one' contest with this one... Its only advantage : it leaves the arrays passed as arguments untouched, (I feel that someone could make it smaller too) The most bothering thing for me (apart from the nasty $i handling)is the stop test : last unless (join'',@n) Too long, and to weird, anyone to help me improve this ? UPDATE : To save one char and make it even uglier, You can whange while($i++>-2) to while($i+++2) (and my $i=-1; to my $i--; for another one) "Only Bad Coders Badly Code In Perl" (OBC2IP)
In Section
Seekers of Perl Wisdom
|
|