How about using references?
use strict;my
@y;push @y, "s";push @y, "t";push @y, "q";push @y,
"c";my @z;push @z, "1";push @z, "2";push @z, "3";push
@z, "4";abc(\@y,\@z);sub abc{my ($b,$c)[EMAIL PROTECTED];print "#@$b#\n";print "#@$c#";return;}
From:
[EMAIL PROTECTED]
[mailto:[
Use quotemeta on $searchstring like this:
$searchstring = quotemeta $searchstring;
$LongString =~ s/$searchstring//gi;
-Kevin
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Jose
Guevarra
Sent: Monday, February 24, 2003 1:46 PM
To: [EMAIL PROTECTED]
Subj