$_=shift "/perl/hello/world
when (qr|^/perl(.*)|) {
say $_; # 1
given ($1) { # ВОТ ТУТ $_="/hello/world"
when (qr|^/hello/(.*)|) {
say $_; # А ПОЧЕМУ ВОТ ТУТ $_="world"?
say "hi, $1";
}
}
}
}
}
А потому что $1 поменялся
если бы использовал иф, то вопросов было бы меньше
в смысле? $_ же не указатель, какого фига?
а где такая дрисня документирована?
но таки с чего ты взял, что $_ есть алиас и в других случаях?
Это не другой случай, это тот самый случай
Обсуждают сегодня