]> git.vpit.fr Git - perl/modules/indirect.git/blob - t/lib/indirect/Test0/Fffff/Vvvvvvv.pm
Switch to qw<>
[perl/modules/indirect.git] / t / lib / indirect / Test0 / Fffff / Vvvvvvv.pm
1 package indirect::Test0::Fffff::Vvvvvvv;
2
3 use warnings;
4 use strict;
5
6 my $f;
7 sub import {
8         my($class, %args) = @_;
9         $f = bless({ x => $args{x}, y => $args{y} }, $class);
10 }
11
12 1;