]> git.vpit.fr Git - perl/modules/indirect.git/blob - t/lib/indirect/Test2.pm
In string-like envs, take the position to the beginning of the string
[perl/modules/indirect.git] / t / lib / indirect / Test2.pm
1 no indirect ":fatal";
2 my $x;
3 if ($x) {
4 my $y = qq{abcdef
5  @{[$x->new]}
6  };
7 }
8 1;