April 14, 2012 | 82% of Perl Testing | Back Next |
$expected = 'abcxyz';
new() without 'name' element
$self = Alpha->new( { string => $expected } ); ok($self, "Alpha->new() returned true value");
get_string()
$got = $self->get_string(); is( $got, $expected, "get_string() returned '$expected' as expected" );
Home Last TOC | Copyright © 2012 James E Keenan | Back Next |