# this is the main file
$x= Helper::foo();
# ...

package Helper;
use PoisonModule qw/ bar INFINITE/;
sub foo
 {
 return bar (blah, blah, INFINITE);
 }