Help for this page
#!/usr/bin/perl ... print "test_1" if ( %a ); print "test_2" if ( defined( %a ) );
use strict; ... print "test_1" if ( %a ); print "test_2" if ( defined( %a ) );