| April 14, 2012 | 82% of Perl Testing | Back Next | 
is_valid_plang: test for no argument provided
        ok(! defined($self->is_valid_plang()),
            "is_valid_plang() returned undefined");
is_valid_plang: test for invalid value
uncomment to see test FAIL
        # $language = 'abracadabra';
        # ok($self->is_valid_plang($language),
        # "'$language' is a valid language");
is_valid_plang: test for invalid value (correctly written)
        $language = 'abracadabra';
        ok(! $self->is_valid_plang($language),
            "'$language' is not a valid language");
| Home Last TOC | Copyright © 2012 James E Keenan | Back Next |