X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FSub-Prototype-Util.git;a=blobdiff_plain;f=samples%2Ftry.pl;h=3c4426dad89d14377d5fec96474b61e57a0988b1;hp=57477fe9c493c711b1885233e13cacb9bca0d89f;hb=ea95d5eb42f17626bfca0f26e58a7d6c28e74d47;hpb=a0be79c11310f2a8e4edeca50e9ade6bd95b11d0 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 );