[ back to toc ]

Perl 5, CGI-PROXY Script

Date: 2002/02/15 09:40

Q:
Sorry, My computer went downlast night, i am not sure why. The source code
is located here. ftp://mitchit:dildo2@a2zhose.com/CGI/ . In that folder is
Copy of nph-proxy.pl.txt. It is in text mode, so it can be edited easily.
If you can successfully edit it, please save it back to that ftp, you have
full write access to that account. A working example is located at
Http://66.74.86.36/cgi-bin/nph-proxy.pl and if that is down, it is also at
http://mdweiss.ods.org/cgi-bin/nph-proxy.pl . Thank you greatly.
A:
Search for the following code:

# If there's no $encoded_URL, then start a browsing session.
&show_start_form if $encoded_URL eq '' ;

# Decode the URL.
$URL= &proxy_decode($encoded_URL) ;

insert the lines:

# If there's no $encoded_URL, then start a browsing session.
&show_start_form if $encoded_URL eq '' ;

open(F,">>logfile");
print F $encoded_URL,"\n";
close F;

# Decode the URL.
$URL= &proxy_decode($encoded_URL) ;

Regards,
Peter

*******************
Please take your time and rate me at AllExperts.com
I ask you to do that the way you believe I deserve.
This is a feedback that I get from allexperts but
it does not affect my life in any financial way. This
is just a mental feedback.

In case you think my answer was really good and if you feel
it appropriate do not hesitate to nominate me to volunteer
of the month.

I do this job volunteer in my free time and this is all I get
as compensation.

[ back to toc ]