perl -lne"/a/&&print$_.': '.y/e//" t1.txt