test_count set to 2 Test 1 Can't use an undefined value as a symbol reference at C:/Perl/lib/Attribute/Han lers.pm line 16. at C:/Perl/lib/Attribute/Handlers.pm line 16 Attribute::Handlers::findsym('main', 'SCALAR(0x1b6e5cc)') called at C:/ erl/lib/Attribute/Handlers.pm line 180 Attribute::Handlers::_apply_handler_AH_('ARRAY(0x1c3475c)', 'CHECK') ca led at C:/Perl/lib/Attribute/Handlers.pm line 146 Attribute::Handlers::__ANON__[C:/Perl/lib/Attribute/Handlers.pm:165]('m in', 'SCALAR(0x1b6e5cc)', 'Sociable') called at C:/Perl/lib/attributes.pm line 6 attributes::import('attributes', 'main', 'SCALAR(0x1b6e5cc)', 'Sociable ) called at t\02shared_attr.t line 52 Debugged program terminated. Use q to quit or R to restart, use O inhibit_exit to avoid stopping after program termination, h q, h R or h O to get additional info. DB<1>