c
https://metacpan.org/source/MONS/Variable-Eject-0.02/lib/Variable/Eject.pm#L88
в 1
и показать хотя-бы исполнение synopsis или теста
Size: a a a
c
c
get_word called at 4
c
c
perl v-eject.pl │·
get_word called at 0 │·
..>eject( │·
..>( │·
skip_spaces called at 5 │·
extract_args called at 5 │·
..>; │·
inject called at 5 for '() if 0; Lexical::Alias::alias( $hash->{scalar} => my $scalar );Lexical::Alias::alias( @{ $hash->{array}} => my @array );Lexical::Alias::alias( %{ $hash->{hash}} => my %hash )│·
;' │·
Array found where operator expected at v-eject.pl line 14, near "say @array" │·
(Do you need to predeclare say?) │·
syntax error at v-eject.pl line 14, near "say @array" │·
Execution of v-eject.pl aborted due to compilation errors.
c
MA
c
get_word called at 0 │·
..>eject( │·
..>( │·
skip_spaces called at 5 │·
extract_args called at 5 │·
..>; │·
inject called at 5 for '() if 0; Lexical::Alias::alias( $hash->{scalar} => my $scalar );Lexical::Alias::alias( @{ $hash->{array}} => my @array );Lexical::Alias::alias( %{ $hash->{hash}} => my %hash )│·
;' │·
scalar value │·
123 │·
my
c
MA
c
MA
c
MA
c
MA
c
MA
MA
IB
MA