Those more experianced in perl should quickly know what I did, the rest of you will have to figure it out (it's a good learning experiance).
($_='Just Another Perl Hacker,' and$ # There's the string :: { join '', /\b\w/g } =$ # This is the magic :: { (split "")[2]^chop })&& # Here's the question print $JAPH;
In reply to A small (for me) JAPH by c-era
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |