Help for this page
if (%a_hash) { print "has hash members\n" }
#!/usr/bin/perl -sw ... perlfunc =cut