Я предполагаю, что это означает более или менее то, что написано:
Это использование не рекомендуется, что означает, что оно может быть удалено в какой-то далекой будущей версии Perl, возможно, где-то в 2168 году.
Это означает, что они удалят его, когда выпустят Perl 6.
Я шучу, я шучу. Я бы предположил, что «смутное осуждение» означало бы, что это не ужасная конструкция, но вы, возможно, захотите переосмыслить свой дизайн. Лично я даже не знал, что это было (или что функция reset()
вообще существовала), пока я не посмотрел ее прямо сейчас, и, увидев ее, я не знаю, буду ли я когда-либо использовать ее для чего-либо. Пример, который они приводят в perlop, немного загадочный:
while (<>) {
if (?^$?) {
...
}
} continue {
reset if eof;
}
Я бы написал эквивалент и более очевидно:
my $reset = 1;
while (<>) {
if ($reset and /^$/) {
...
$reset = 0;
}
} continue {
$reset = 1 if eof;
}
Это более многословно, но немного более очевидно и легче для мозга (и сопровождающего).