Re: foreach problem?

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')];
  }
[download]

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 Alex	[reply] [d/l]

In Section Seekers of Perl Wisdom