Help for this page
perl -i.bak -ne "print if /./" filename
perl -i.bak -ne "chomp, print if /./" filename