package Your::Package;

##</code><code>##

package My::Module;

use Exporter qw(import);
@EXPORT_OK = qw(sub names here);

##</code><code>##

package My::Package;

use Exporter qw(import);
@EXPORT_OK = qw(print_lines);

use strict;
use warnings;

sub print_lines{
    
    my ($input) = @_;

    while(my $lines = <$input>){
        print $lines;
    }
}

##</code><code>##

use strict;
use warnings;

use My::Package qw(print_lines);

open my $file, '<', shift;

print_lines($file);