$ perl -i.bak -pe 's/AJZ/AZZ/g if /^AB/' foobar 2> error.txt

~
$ cat error.txt
Can't open foobar: No such file or directory.