Is anyone out there really good with perl?  I'm having some trouble with a
CGI script I'm writing and am hoping someone can help me (sorry for this
being slightly OT).  What I'm trying to accomplish is a way to parse input
strings using arrays.  I originally had:

@convfrom = ("%40", "%2F", ...);
@convto = ("@", "/", ...);

$count = 0;
foreach $T (@convfrom) {
  @value1 = split(/\$convfrom[$count]/,$value1[1]);
  $value1 = join("$convto[$count]",@value1);
  $count++;
}

But this doesn't seem to export the value of $value1 or @value one outside
of the foreach statement, so then I tried:

$count = 0;
do {
  @value1 = split(/\$convfrom[$count]/,$value1[1]);
  $value1 = join("$convto[$count]",@value1);
  $count++;
} while ($count < $convtotal);

But this still doesn't work.  For some reason, I don't think that I can
use split and join the way I am with these array variables.  Does anyone
know a proper way to do this, or a better way to do it?

Please email me back directly, and again, sorry for the OT post but I
didn't know where else to post it.  =)  Thanks!

-- 
[EMAIL PROTECTED], OpenPGP key available on www.keyserver.net
Freezer Burn BBS:  telnet://bbs.freezer-burn.org . ICQ: 54924721
Webmaster for the Linux Portal Site Freezer Burn:  http://www.freezer-burn.org

Reply via email to