- or download this
sub init {
my $pkg = shift;
...
croak "Failed to load $proto.\n";
}
}
- or download this
# in the main
my $pkg = shift;
...
croak "Failed to load $pkg: $@\n";
}
print foobar();
- or download this
# in Foo.pm
package Foo;
...
return "Foo!";
}
1;