The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

package J;

sub foo { 1 }

sub can { die "J->can threw an exception" }

1;