Re^2: HTTP headers and redirection

Thanks, But please see what I sent to jzed here and provide any input if you could >> Not sure exactly what you mean... I edited my script like this and it's still not working. If I move my print "Content-type: text/html\n\n"; things will not work correctly. Also I have no idea how to use CGI.pm's header and redirect methods. This book doesn't go into depth nearly enough to complete these assignments. This is frustrating for me Any help? I am a novice. This is my first Perl Class. Thanks,

#!c:\phpdev\perl\bin\perl.exe
#c12ex3.cgi - Location Header
print "Content-type: text/html\n\n";
use CGI qw(:standard -debug);

#prevent Perl from creating undeclared variables
use strict;

#declare variables
my ($Salesperson, $Sales, $Size, $Rate, $Percentage, @records, @errors
+, $errors, $bonus);


#assign input items to variables
$Salesperson = param('Salesperson');
$Sales = param('Sales');
$Rate = param('Rate');
$Percentage = param('Percentage');

#calculate bonus rates
$bonus = $Rate * $Sales;
  if ($Salesperson eq "") {
     print "Location:
     http://localhost/cgi-bin/c12ex3b.html\n\n";
}

elsif ($Sales == "") {
      print "Location:
      http://localhost/cgi-bin/c12ex3b.html\n\n";
}

elsif ($Rate == "") {
      print "Location:
      http://localhost/cgi-bin/c12ex3b.html\n\n";
}

else {
print "<HTML>\n";
print "<HEAD><TITLE>Patton Industries</TITLE><BASEFONT SIZE=5></HEAD>\
+n";
print "<H1>Bonus Calculation</H1>\n";
print "<BODY>\n";
print "Salesperson: $Salesperson<BR>\n";
printf "Your bonus is: \$%.2f<BR><BR>\n", $bonus;
printf "You entered a sales amount of \$%.2f and a \n", $Sales;
printf "bonus rate of %.1f%%.<BR>\n", $Rate * 100;
print "</BODY>\n";
print "</HTML>\n";
print "</BODY></HTML>\n";
}
[download]

Comment on Re^2: HTTP headers and redirection Download Code

Replies are listed 'Best First'.
Re^3: HTTP headers and redirection by BUU (Prior) on Nov 11, 2004 at 04:26 UTC
Let me explain in short words. An HTTP transaction consists of two parts. The first part is the headers, that consist of special data to tell the client how to interpret the data. The second part is the body. Headers are series of name-value pairs seperated by new lines. The header section as a whole is ended by an empty new line. So for example: `print "Content-type: text/html\n"; print "Location: foo\n\n"; print "This is the body"` [download] You print two headers: Content-type, and location, then you send "this is the body" as the body of the message. However, if you do this: `print "Content-type: text/html\n\n"; print "Location: foo\n"; print "This is the body"` [download] You are only sending one header, the Content-type. The Location: foo line and the "this is the body" is all interpreter as part of the body of the response.	[reply] [d/l] [select]
Re^3: HTTP headers and redirection by chb (Deacon) on Nov 11, 2004 at 09:08 UTC
As a side note: you mention two times your book doesn't contain enough information to solve your problem. Maybe you should try to get better documentation. The reference manual for CGI.pm should be accessible via `man CGI` (at least on unixoid systems). And have a look at Book Reviews...	[reply] [d/l]