Select Code to Download

    die if $@ && $@ !~ /^Can't locate .*? at \(eval /;

                    Carp::croak(<<ERROR);
Base class package "$base" is empty.
    (Perhaps you need to 'use' the module which defines that package f
+irst.)
ERROR

use strict;
BEGIN {
...
use base 'Foo::Bar';
package main;
print "done\n.";