perl -pe "s/^\s+//" file > newfile