package abc;
...
return 1 if caller;
package main;

my $abc = abc->new();
...

##</code><code>##

perl \path\to\lib\abc.pm