Another way he can achieve this - arguably more readable is:
my @a=@array; # make a copy, since we will destroy @a my $prev=pop @a; for (reverse @a){ print $prev - $_, "\n"; $prev=$_; }
"Imaginary friends are a sign of a mental disorder if they cause distress, including antisocial behavior. Religion frequently meets that description"
In reply to Re^3: simplish script (I think)
by NetWallah
in thread simplish script (I think)
by notoriousrab430
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |