in reply to Re^4: is this script secured enough from internet attacks
in thread is this script secured enough from internet attacks

Hex encoded data is [0-9A-F] 
$ perl -e "  print unpack q[H*], join q[],@ARGV "  1 "<" 3 " Foo"
313c3320466f6f
$ perl -e "  print pack q[H*], join q[],@ARGV "  313c3320466f6f
1<3 Foo

[download]
I doubt the pack tradeoff is preferable as a workaround for a problem in FreeTDS (which I doubt exists)

In Section Seekers of Perl Wisdom