perl -ni -e 'print;print "printed after regex\n" if($_ =~ /function output\(\).*?Zeile2/s)' test