Help for this page
<select name="report_type" > <option value="case_id">case_id</option> ... <option value="receiver">receiver</option> <option value="date">date</option> </select>
print "param=" . $q->param('report_type') . "<BR>"; if( grep { /$q->param('report_type')/ } (qw/case_id hosp_alias sender +receiver/) ) { ... } else { print "we are NOT getting the list<BR>"; }
param=sender we are NOT getting the list
param=sender we are getting the list
#!/usr/bin/perl ... } else { print "not getting the list\n"; }
getting the list
www.com | www.net | www.org
No recent polls found