gistfile1.txt

┌─[tadzik@yavin4]─[~] 
└─[%]─> cat Foo.pm 
class Foo {
    method bar {
        say "hello, I am Foo";
        die "oh noes";
    }
}
┌─[tadzik@yavin4]─[~] 
└─[%]─> cat dynload.pl 
use lib '.';
require 'Foo';

try {
    ::('Foo').bar;

    CATCH {
        say "can has exception {$_.perl}"
    }
}
┌─[tadzik@yavin4]─[~] 
└─[%]─> perl6 dynload.pl
hello, I am Foo
can has exception X::AdHoc.new(payload => "oh noes")
oh noes
  in method bar at ./Foo.pm:4
  in block <anon> at dynload.pl:7