in reply to quick regex question
If you want to substitue all '/' with nulls (charchters with ASCII code 0) you should do:
$row[0] =~ s/\//\0/g;
But you probably just want to remove '/', so it's:
$row[0] =~ s/\///g;
Hope this helps!
Michele.
In Section
Seekers of Perl Wisdom