| Refresh | Home EGTry.com

a simple standalone perl package, no functions are exported


Package1::fun1();
my $c=Package1::fun2(10, 23);

print "sum: $c\n";

package Package1;

sub fun1 {
  print "hello\n";
}

sub fun2 {
  my ($a, $b)=@_;
  return $a+$b;
}