Help for this page
perl -ne "print unless/^A/;" file.txt > newfile.txt
perl -ne 'print unless/^A/;' ./file.txt > ./newfile.txt