zabcz zzabczz zzzabczzz #### perl -ne 'print if s/.*?(?=abc)//...0' ## abcz zzabczz zzzabczzz #### zabcz zzabczz abczzz