Select Code to Download

#!/usr/bin/perl -w

use strict;
...

isa_ok( $foo, 'UNIVERSAL' );
ok( UNIVERSAL::isa( 'Foo', 'UNIVERSAL' ) );