print  "usage_grpinf[2] :$usage_grpinf[2]\n";
if ( $usage_grpinf[2] eq "")
{
print "event_date valid2\n";
}

output is
-- Call_UsingHash12.pl
usage_grpinf[2] :