perl -ne 'print unless/^A/;' ./file.txt > ./newfile.txt