Что такое переменная @.
в Perl?
Похоже, что это специальный, доступный для записи глобальный код, и (на удивление )не выполняет интерполяцию в строках с двойными -кавычками:
use strict;
use warnings;
# Under 5.8, 5.10, 5.12, 5.14, and 5.16,
# the following lines produce:
@. = (3, 2, 1); # no error
print "@.\n"; # "@."
print @., "\n"; # "321"
eval 'my @.; 1' # Can't use global @. in "my" at (eval 1)
or die $@; # line 1, near "my @."
Я не мог припомнить, чтобы сталкивался с ним раньше, и не видел его ни в perlvar
, ни в perldata
.