perl -ne 'print if s/.*?(?=abc)//...0' inputfile