1. my $text="qwertyuiop"; ... { last unless ($text =~ /.*?(e.).*/); ... } так пока и не нашел корректно ли после такого last (if итп) обращаться к $1 в расчете что там содержится совпадение (в данном случае "er" ? 2. $text =~ /(e.)/; $1 возвращает фактически ^.*e. а если переписать так: $text =~ /.*(e.)/; то получается то что мне надо ткните в место где почитать почему оно так?