Hi Jason,
Good advice. Keep in mind that it was just something to get him
started. I don't have time to write the software for him in
entirety unless I'm getting paid, so I just sent off some code
I've had sitting around in partial completion in my dev/ folder
for a couple years now. It works fine for quickly downloading
files to my internal workstation. Certainly there are many
discrepancies. It wasn't presented it as production ready code.
Hopefully between us and the others here, we've provided enough
that he can take it up where we left off. Sound advice and
constructive criticism are always welcome.
Health,
Shaun
> <snip>
> The periods inside $remote_ip will match any character, not
> just periods. Better safe than sorry.
>
> if ($ENV{REMOTE_ADDR} =~ /^\Q$remote_ip\E/) {
> </snip>
> <snip>
> Here's my (untested) attempt.
> </snip>
Glad I could provide you with something to build on. ;)
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
