Ticket #588: redirect.cgi

File redirect.cgi, 1.2 KB (added by Søren Christian Aarup, 12 years ago)

Perl script to produce response with netcat

Line 
1#!/usr/bin/perl
2
3print "HTTP/1.1 302 Moved Temporarily\r\n";
4#print "Status: 302 Moved Temporarily\r\n";
5print "Date: Mon, 30 Jun 2014 12:25:15 GMT\r\n";
6print "Server: Apache\r\n";
7print "X-Server-Name: payment11\r\n";
8print "Jokum: payment11\r\n";
9print "P3P: CP=\"NON DSP CURa CUSa OUR NOR STA\"\r\n";
10#print "Location: https://beta.architrade.com/paymentweb/reply.action?acquirer=160&transact=480076793&authkey=67323789233164c6fca87f64ef564e4e&paymentStatus=PlaceOrderOK&acquirerResponseCode=OK&acquirerResponseMessage=OK&amount=200&clientSystemMerchantRefId=11075&clientSystemTransactionId=480076793&currency=SEK&customerIpAddress=193.89.191.209&deliveryAddress=1482+Elm+Street&deliveryCountryCode=US&deliveryPostalCode=523907&deliveryPostalPlace=Springwood&firstName=Freddy&lastName=Krueger&orderId=1403702907&paymentStatus=PlaceOrderOK&personOrOrganization=PERSON&placeOrderTransactionEventId=200000538206&responseCode=100&responseMessage=OK&signature=f5a5331d326fd4c8211684a05d0773d3bf1a54c676039051b2067ebddccd7aca&transactionId=332987\r\n";
11print "Location: http://google.com\r\n";
12print "Content-Length: 0\r\n";
13print "Connection: close\r\n";
14print "Content-Type: text/plain\r\n";
15print "\r\n";
16#print "A";