Select Code to Download

perl -i.bak -ne 'print if /\S/' file.txt

perl -i.bak -ne 's/^\s+$//;print' file.txt