Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change
 
PerlMonks  

grep not working as expected

by davidj (Priest)
on Oct 17, 2006 at 22:14 UTC ( #578911=perlquestion: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    <select name="report_type" >
    <option value="case_id">case_id</option>
    ...
    <option value="receiver">receiver</option>
    <option value="date">date</option>
    </select>
    
  2. or download this
    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>";
    }
    
  3. or download this
    param=sender
    we are NOT getting the list
    
  4. or download this
    param=sender
    we are getting the list
    
  5. or download this
    #!/usr/bin/perl
    
    ...
    } else {
        print "not getting the list\n";
    }
    
  6. or download this
    getting the list
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://578911]
Approved by chargrill
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (15)
As of 2014-09-02 14:59 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite cookbook is:










    Results (25 votes), past polls