Let's say you have a package: test.pm

package test;

sub mysub {
    return 'babayaga';
}

1;
[download]

Then in your .pl file

#!/usr/bin/perl

use strict;
use test;

print test::mysub();
[download]