Subject: | Strange use of $[ ;-) |
Two tests scripts, t/comment/single_line.t and t/comment/single_or_multiline.t, have this
interesting construct:
BEGIN {$^W = 0 if $[ < 5.006}
That statement sets $^W to 0 if the array-indexing base is below 5.006. :-) I think it is
supposed to be $].
t/number/integer.t contains this interesting code:
# Fail if the base is upped.
next if $i == $#bases;
my $next_base = $bases [$i + 1];
push @{$tests [-1] {fail}} => "sep-$next_base-$group"
unless $[ < 5.00503;
I think that test is always skipped.