- or download this
#!/usr/bin/env perl
...
$yada->main::test_our_yada();
}
done_testing;
- or download this
ok 1 - $self->isa('Yada')
ok 2 - $self->number() == 0
...
ok 9 - $self->nadas()->[0]->number() == 1
ok 10 - $self->nadas()->[1]->number() == 2
1..10
- or download this
#!/usr/bin/env perl
...
$yada->test_our_yada();
}
done_testing;