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

use strict;
use Test;

# use a BEGIN block so we print our plan before MyModule is loaded
BEGIN { plan tests => 2, todo => [] }
BEGIN { $| = 1 }

# load your module...
use lib './';
use File::Util;

my($f) = File::Util->new();

# check to see if File::Util ISA [foo, etc.]
ok(UNIVERSAL::isa($f,'File::Util'));
ok(UNIVERSAL::isa($f,'Class::OOorNO'));

exit;