X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=samples%2Ftry.pl;h=3c4426dad89d14377d5fec96474b61e57a0988b1;hb=a160b416188c4fda33b4fbc80510c1b309fcd73f;hp=57477fe9c493c711b1885233e13cacb9bca0d89f;hpb=4e977a0b1db65e44cf4c6184792208a7930c34f4;p=perl%2Fmodules%2FSub-Prototype-Util.git diff --git a/samples/try.pl b/samples/try.pl index 57477fe..3c4426d 100755 --- a/samples/try.pl +++ b/samples/try.pl @@ -5,11 +5,11 @@ use warnings; use Data::Dumper; -use lib qw{blib/lib}; +use lib qw; -use Sub::Prototype::Util qw/flatten recall wrap/; +use Sub::Prototype::Util qw; -my @a = qw/a b c/; +my @a = qw; print "At the beginning, \@a contains :\n", Dumper(\@a); my @args = ( \@a, 1, { d => 2 }, undef, 3 );