Можно ли использовать одиночную строку foreach
в Perl?
$hash{$thing}++ foreach my $thing (@things);
Я знаю, что это возможно со многими другими командами, такими как
die "Invalid file!\n" if (open($Handle, "file.txt"));
Я знаю, что открытый оператор может быть сломан:)