Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister

Re: foreach problem?

by Tyke (Pilgrim)
on Mar 05, 2001 at 18:06 UTC ( #62232=note: print w/ replies, xml ) Need Help??

in reply to foreach problem?

my @words = split(/\s+/, $_[0]); # <-- Better to split on any whi +tespace my $newquery = qq[SELECT "taskID" from "repair" WHERE ("repairKEYWOR +D1" = '')]; foreach my $currentword (@words) { # <-- Current word goes outsid +e brackets $currentword =~ /^([\w]+)$/; $newquery .= qq[ or ("repairKEYWORD1" = '$currentword')]; $newquery .= qq[ or ("repairKEYWORD2" = '$currentword')]; $newquery .= qq[ or ("repairKEYWORD3" = '$currentword')]; }
Note use of qq rather than quoted strings

Does it work any better?

Update Splits better on /s than /S... but you saw that

Comment on Re: foreach problem?
Select or Download Code
Replies are listed 'Best First'.
Re: Re: foreach problem?
by fastkeys (Novice) on Mar 05, 2001 at 18:16 UTC
    Thanks - just tried that but I still get the same output.

    I've checked that the data I'm sending gets to $_[0] but the output is the same.

    Anybody else?

    Thanks again


Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://62232]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (9)
As of 2015-10-06 16:44 GMT
Find Nodes?
    Voting Booth?

    Does Humor Belong in Programming?

    Results (155 votes), past polls