import
file: examples/Barramm.pm1: package Barramm; 2: 3: sub import { 4: my $package=shift; 5: my @params=@_; 6: print "In import: $package with params: ".join(',',@params)."\n"; 7: } 8: 1;
file: examples/022_import.pl 1: use rlib '.'; 2: use Barramm qw(all); 3: print "ok\n";