perl -ple 's/\bBM/XXXXX_BM/g if $. == 1' file [download]
In reply to Re: regular expression ?! by ccn in thread regular expression ?! by Anonymous Monk