Help for this page

Select Code to Download


  1. or download this
    package Morsulus::Catalog::SetOf;

...
}

1;
  2. or download this
    use Test::More tests => 4;
use Test::Exception;
...

ok $thingy->can('values'), '$thingy->can("values")';
ok $thingy->isa('Set::Scalar::Valued'), '$thingy is a Set::Scalar::Val
+ued';
  3. or download this
    t/00.setof....NOK 2/4                                                 
+       
#   Failed test 'created SetOf'
...
# Trace begun at blib/lib/Morsulus/Catalog/SetOf.pm line 17
# Object::InsideOut::new at t/00.setof.t line 12
# Test::Exception::lives_ok at t/00.setof.t line 12