Warning: Cannot modify header information - headers already sent by (output started at /home/destefa1/public_html/nf/function.php:1) in /home/destefa1/public_html/nf/function.php on line 215

Warning: Cannot modify header information - headers already sent by (output started at /home/destefa1/public_html/nf/function.php:1) in /home/destefa1/public_html/nf/function.php on line 216

Warning: Cannot modify header information - headers already sent by (output started at /home/destefa1/public_html/nf/function.php:1) in /home/destefa1/public_html/nf/function.php on line 217

Warning: Cannot modify header information - headers already sent by (output started at /home/destefa1/public_html/nf/function.php:1) in /home/destefa1/public_html/nf/function.php on line 218

Warning: Cannot modify header information - headers already sent by (output started at /home/destefa1/public_html/nf/function.php:1) in /home/destefa1/public_html/nf/function.php on line 219

Warning: Cannot modify header information - headers already sent by (output started at /home/destefa1/public_html/nf/function.php:1) in /home/destefa1/public_html/nf/function.php on line 220
use strict; use warnings; use lib (-e 't' ? 't' : 'test'), 'inc'; package Foo; use Test::More tests => 20; use Something; ok(not defined &Foo::import); ok(defined &Foo::thing); ok(ref(thing) eq 'Something'); ok(thing()->can('cool')); ok(thing()->isa('Something')); ok(thing()->isa('Thing')); ok(thing()->isa('Spiffy')); is(join('-', @Foo::ISA), ''); ok(not defined &Foo::field); ok(not defined &Foo::spiffy_constructor); ok(not defined &Something::import); ok(defined &Something::thing); ok(defined &Something::field); ok(not defined &Something::spiffy_constructor); is(join('-', @Something::ISA), 'Thing'); ok(not defined &Thing::import); ok(defined &Thing::thing); ok(defined &Thing::field); ok(not defined &Thing::spiffy_constructor); is(join('-', @Thing::ISA), 'Spiffy');