# this test suite tests subroutine code
$test->makesub;
$A = 10;
$test->sub( $A );
$test->ok( $A, 11 );

# test for the regex stuff
$test->ok( "abc", qr/abc/ );
$test->ok( "abc", '/abc/' );
