I'm a beginner.  The following is what I wrote:


#!/usr/bin/perl
print "Content-type:text/html\n\n";

@days = ("Sunday","Monday","Tuesday","Wednesday","Thursday",
           "Friday","Saturday");
@months = ("January","February","March","April","May","June",
             "July","August","September","October","November",
             "December");

($sec,$min,$hr,$mday,$mon,$year,$wday,$yday,$isdst) = 
localtime(time);
$year = $year + 1900;

if ($body eq "yahoo") {

print "<a href=\"http://www.yahoo.com/\";>Yahoo</a>\n";

} elsif ($body eq "date") {

print "$days[$wday] $mday $months[$mon] $year\n";

}




I uploaded it and it works without giving me a 500 and when I check the syntax via the 
shell it says everything is correct so why when I go to test.cgi?body=yahoo or 
test.cgi?body=date the pages just appear blank instead of showing the content?

Here are the urls:
http://kb2.net/cgi-bin/test.cgi?body=yahoo
http://kb2.net/cgi-bin/test.cgi?body=date

Can someone tell me what I did wrong?

Thank you

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to