The sub-routine I'm still having a problem with is:
sub ParseURL { my($url)= shift; my($protocol, $site, $login, $password); $url=~ /^(\w+):\/*([^\/]+)\/(.*)$/; # chunk the URL components $protocol= uc($1); # preserve matches in real variables $site= $2; $path= $3; if ($site=~ /\@/) { # check for the optional login field ($login, $site)= split("\@", $site); ($login, $password)= # check for the optional password field split(":", $login); return($protocol, $site, $login, $password, $path); } else { # no account information return($protocol, $site, "", "", $path); } }
Basically my ftp username contains a / (XX/yyyy), and XX is getting parsed as the hostname of the ftp site.
As was suggested, I think the fastest way to fix this is to change the item separator in the text file to a comma or something, rather than a /.
The regex I'm having trouble with is:
$url=~ /^(\w+):\/*([^\/]+)\/(.*)$/;
The way I'm reading this is: between /^(\w+) is $protocol, between \/*([^\/]+) is $site, and \/(.*)$ is $path.
So, based on the above, if I use a comma separator for the $site portion, the line should look like:
$url=~ /^(\w+):\/*([^\/]+),(.*)$/;
and the appropriate line in my text file looks like: ftp://XX/yyyy:password@123.456.789.012,/ However, when I then run the script, I get several "uninitalized value" errors, one for the pattern match ($site=~ /\@/), one for a line trying to use $host, the other for a line trying to use $path.
So, it seems I'm missing something (hopefully) fairly obvious, but I can't seem to figure it out.
Any help appreciated.
Thanks,
Glenn
In reply to replacing text file separators in regex by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |