Hello to everyone,
I need some help. I have one piece of code in perl which interacts with executable file - pass some variables and get results back. I don't understand perl and want to convert it to asp.net (or even pure asp). Here is the code:
----------------------------------------------------------
#!/usr/bin/perl
use CGI;
$min=CGI:
aram("min");
$cin=CGI:
aram("cin");
$invoice=CGI:
aram("invoice");
$descr=CGI:
aram("descr");
$longdescr=CGI:
aram("longdescr");
$total=CGI:
aram("total");
$expires=CGI:
aram("expires");
$country=CGI:
aram("country");
$date=CGI:
aram("date");
$urlok="http://www.any_domain.bg/demo/ok.html";
$urlcancel="http://www.any_domain.bg/demo/cancel.html";
$longdescr =~ s/\n/\\n/g;
$qry = "TYPE = REGISTER\n" .
"MIN = $min\n" .
"CIN = $cin\n" .
"INVOICE = $invoice\n" .
"DESCR = $descr\n" .
"LONGDESCR = $longdescr\n" .
"TOTAL = $total\n" .
"EXPIRES = $expires\n" .
"COUNTRY = $country\n" .
"DATE = $date\n" ;
$q_result = `echo -n "$qry" | ./eccli
www.epay.bg .`;
chomp $q_result;
if ($q_result eq "Y"){
$urlok=CGI::escape( $urlok );
$urlcancel=CGI::escape( $urlcancel );
print "Location: https://www.datamax.bg/ec/paylogin.cgi?MIN=$min&INVOICE=$invoice&URLOK=$urlo k&URLCANCEL=$urlcancel\n\n";
}
else
{
print "Content type: text/html \n\n
Грешка при изпращане на информацията!
status = $q_result";
}
----------------------------------------------------------
I will deeply appreciate any help placed here.
Many thanks in advance.
Warmhearted Wishes,
Kaloyan