#!/usr/local/bin/perl
print "In the main package\n";
#require "program";
&program::simple();
die;



package program;
print "how to print this";
sub simple {
                print "Hi from program::simple\n\n";
           }

As expected the output is
In the main package
Hi from program::simple

Died at ./x.pl line 5.