c:\@Work\Perl\monks>perl -wMstrict -e
"print map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],
+[{}],[sub{}^*ARGV,3]
"
JApH,
JApH stands for Just Another Perl Hacker. :) Please consider the advice given in the body of choroba's reply.
Give a man a fish: <%-{-{-{-<
| [reply] [d/l] [select] |
Oh yeah, I am so new to perl. I updated my code :-(
| [reply] |
You've just re-posted the code from your first node, it looks like you haven't even tried to incorporate the suggested code. You'll tend to get better responses if you show your efforts. Also, see this: when you edit a node, make sure to mark your updates, so that replies aren't confusing.
Anyway, as choroba and I said, the code I showed is a replacement for XML::Dumper, and my example $data can be removed and your $perl variable can be used instead.
| [reply] [d/l] [select] |
Accept my apalogies. I promise it will never happened again.
| [reply] |