]> git.vpit.fr Git - perl/modules/indirect.git/blob - t/lib/indirect/TestRequired4/a0.pm
Switch to qw<>
[perl/modules/indirect.git] / t / lib / indirect / TestRequired4 / a0.pm
1 package indirect::TestRequired4::a0;
2 no indirect ":fatal";
3 use indirect::TestRequired4::b0;
4 sub error {
5  local $@;
6  indirect::TestRequired4::b0->get;
7  return $@;
8 }
9 1;