perl -nE 'BEGIN{$/="\n\n"}; next unless m/^E/; print "$_"' your-file-here.txt