Hey,
test.pm in etwa wie folgt:
package test;
use strict;
sub process
{
1, 'lol';
}
1;
und test.pl
package main;
use strict;
use lib qw(.);
use Data::Dumper;
sub blub()
{
my $mod = 'test';
require $mod.'.pm';
my $meth = $mod.'::process';
no strict 'refs';
warn Dumper($meth->());
use strict;
}
blub;
desweiteren sei dir dringend http://search.cpan.org/~elliotjs/Perl-Critic-1.105/lib/Perl/Critic.pm ans herz gelegt!
hth