package B ;
sub usage {
    print "test\n" ;
}

##</code><code>##

use B ;
B::usage() ;