in reply to UnPerl-like Code

It can happen.
#!/usr/bin/perl -w use strict; my @d = qw,I am stoned,; { my @d = sort @d; printf "Q: %s?\n","@d"; } printf "A: %s.\n","@d"; __END__ # The output is (as it should be) Q:I am stoned? A:I am stoned.
Now I don't really care if it shows up in some book, or whether or not it's unperl-like (whatever you think that means, T.I.M.T.O.W.T.D.I.!)

Basically what it comes down to is that you have to turn on strict and warnings, and revisit perlsyn and perlfunc, try things out before posting questions.

 
___crazyinsomniac_______________________________________
Disclaimer: Don't blame. It came from inside the void

perl -e "$q=$_;map({chr unpack qq;H*;,$_}split(q;;,q*H*));print;$q/$q;"