Searched refs:a_hash (Results 1 - 1 of 1) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/comp/
H A Dproto.t350 testing \&a_hash, '%';
352 sub a_hash (%) { subroutine
357 print "not " unless 1 == a_hash 'a';
360 print "not " unless 2 == a_hash 'a','b';

Completed in 14 milliseconds