XLSperl -lne 'print if /pattern/ and $COL eq "A"' file.xls