Код: Выделить всё
..Код: Выделить всё
for ( qw( foo bar barbar baz bazbaz bletch ) ) {
print "$_\n" if /ar.a/ .. /az\w/;
}
Код: Выделить всё
barbar
baz
bazbaz
Подробнее здесь: https://stackoverflow.com/questions/791 ... p-operator
Код: Выделить всё
..Код: Выделить всё
for ( qw( foo bar barbar baz bazbaz bletch ) ) {
print "$_\n" if /ar.a/ .. /az\w/;
}
Код: Выделить всё
barbar
baz
bazbaz