# perl -pi -e 's/[\s\n]//g' file.pl #makes test.pl solid block of p00