ok( $pg->gnarfle( qw/ foo bar baz /), '... this should still match' ); ok( $pg->gnarfle( qw/ foo tac toe /), '... as should this.' );