perl -i -lpe 's/\s+^//' myfile