Em Andamento

Convert Perl Coding to PHP

I'm using a basic html form with this call:

Now, I use a perl tracking script for my referrers that attaches a cookie. Right now, I'm using a program that someone made that works like this.

I link to a script say [url removed, login to view] that has this coding:

#!/usr/bin/perl

require('/home/[url removed, login to view]');

$SECUREURL = '[url removed, login to view]';

$MyCk = CookieGet($CookieID);

if ($MyCk eq "1" && $Cookies{$CookieID} ne "") {

$Referrer = $Cookies{$CookieID};

$Referrer =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;

} elsif ($MyCk eq "1" && $Cookies{$CookieID} eq "") {

$Referrer = $DefaultID;

} elsif ($MyCk ne "1" && $ENV{'QUERY_STRING'}) {

$Referrer = $ENV{'QUERY_STRING'};

} else {

$Referrer = $DefaultID;

}

if ($Referrer eq "") { $Referrer = $DefaultID; }

$NEWURL = $SECUREURL . '?' . $Referrer;

print "Location: $NEWURLnn";

exit(0);

Now, it refers to a file named [url removed, login to view], which it's code says this:

#!/usr/bin/perl

require('/home/[url removed, login to view]');

$ORDERFORM = '/home/[url removed, login to view]';

print "Content-Type: text/htmlnn";

if ($ENV{'QUERY_STRING'}) {

$Referrer = $ENV{'QUERY_STRING'};

$Referrer =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;

} elsif (CookieGet($CookieID) && $Cookies{$CookieID} ne "") {

$Referrer = $Cookies{$CookieID};

} else {

$Referrer = $DefaultID;

}

if ($Referrer eq "") { $Referrer = $DefaultID; }

open(ORDER, "$ORDERFORM") || print "Unable to open Order Form for reading: $!nn";

@File=();

close(ORDER);

foreach $line (@File) {

if ($line =~ /<FORM/gi) {

print $line . "nn";

} else {

print $line;

}

}

exit(0);

Now, what it does is places this line of coding into the html page, which is what I want as I already have configured my php script to collect it:

What I need is that coding to be converted into php and placed into the php script I'm using to send the html form. That way when the page is submitted, part of the scripts job is to collect the cookie code from the customer's computer and paste it into the email along with the rest of the data sent in the form.

Can anyone give me a bid?

Thanks

Curtis

Habilidades: Perl, PHP

Ver mais: convert cgi php, convert perl php, perl php converter, convertir cgi php, convert perl php code, www referral code, www my eg program com, www coding com, what is computer coding, what is coding, referral code, print pack, placed, php code contact, php * *, * * php, * php, line coding, job works from home, convert job, coding program, coding computer, code coding, basic computer coding, convert perl cgi

Acerca do Empregador:
( 2 comentários ) Huntsville, United States

ID do Projeto: #18243

Premiar a:

auraspan

You got one!

$75 USD em 1 dia
(53 Avaliações)
5.8

8 freelancers estão ofertando em média $68 para este trabalho

secom

hi i can help you to get it done.

$100 USD in 2 dias
(574 Comentários)
8.7
hansashish

Respected SirI think that this is not so hard task. We will perform it very easily because we assuring quality to our customers not quantity. Here a few of the sites that we have pulled off in the recent past- http://w Mais

$50 USD in 10 dias
(49 Comentários)
7.6
campbeld

How long have you wanted to convert this script? When you are ready to convert the script, choose my bid and we can get started. Only when you are ready.

$100 USD in 14 dias
(12 Comentários)
4.8
albertandrejev

I can make this in 5 days or less. Good luck!

$45 USD in 5 dias
(5 Comentários)
3.8
varshyltech

can be done....No probs

$70 USD em 1 dia
(2 Comentários)
3.3
hacker

I think that this is no so hard task.

$50 USD em 1 dia
(1 Comentário)
1.4
siddharth1972

Dear Sir, We have started a new website which is similar to Scriptlance / Getafreelancer in functions and features. We have three big advantages compared to both these websites. 1. Our Website has only a group o Mais

$50 USD in 2 dias
(0 Comentários)
0.0