]> git.vpit.fr Git - perl/modules/indirect.git/blob - t/lib/indirect/Test0/Oooooo/Pppppppp.pm
Prevent bogus invalid syntaxes caused by reallocated memory chunks
[perl/modules/indirect.git] / t / lib / indirect / Test0 / Oooooo / Pppppppp.pm
1 package indirect::Test0::Oooooo::Pppppppp;
2
3 use strict;
4 no indirect ":fatal";
5
6 use indirect::Test0::Fffff::Vvvvvvv
7         z => 0,
8         x => sub { },
9         y => sub { };
10
11 use indirect::Test0::Fffff::Vvvvvvv
12         t => [xxxx=>qw(xxxxxx xxxxxxx)],
13         x => sub { $_[0]->method };
14
15 1;