Select Code to Download

Select or download this

## begin mymodule.pm

...
use OtherModule::MyModule;

our $object = OtherModule::MyModule -> new ( qw( foo bar baz bletch ) 
+);

Select or download this

Uncaught exception from user code:
        Undefined subroutine MP3::Napster::OpenNap::registry at /usr/l
+ocal/libdata/perl5/site_perl/MP3/Napster/Base.pm line 29
...
        MP3::Napster::new('MP3::Napster::OpenNap', '127.0.0.1:31337') 
+called at /home/alex/conf/lib.perl/MP3/Napster/OpenNap.pm line 76
        MP3::Napster::OpenNap::new('MP3::Napster::OpenNap', '127.0.0.1
+:31337') called at skillz line 24
        main::dacts() called at skillz line 127