perl -e '$a=qq/447564652c2067657420726964206f662057696e646f 7773/;print (chr hex $1) while ($a=~s/(^.{2})//)'
Or with double-quotes:
I don't have access to any Windows machine at all to try it on.perl -e "$a=qq/447564652c2067657420726964206f662057696e646f 7773/;print (chr hex $1) while ($a=~s/(^.{2})//)"
In reply to Re^4: I usually debug via...
by dmorelli
in thread I usually debug via...
by rinceWind
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |