perl -p -e 's/^\s+//' < file1 > file2
[download]

the -p wraps a while loop reading from standard in with a print $_ at the bottom of whatever you put in -e.

in other words

while(<>) {
   # whatever is in -e
   print $_;
}
[download]

/\/\averick
perl -l -e "eval pack('h*','072796e6470272f2c5f2c5166756279636b672');"