timethese( 100, { 'better' => sub { while ($mmap =~ m/(?:\A|\n)(.*$pat.*\n)/omg) { } }, 'tye1' => sub { while ($mmap =~ m/(?:\A|(?<=\n))(.*$pat.*\n)/omg) { } }, 'tye2' => sub { while ($mmap =~ m/(?:\A|(?