y $class = 'gash';
eval {
    require "$class.plm"
};

die "Oops: $@" if $@;

my $obj = $class->new();