Added Content-type to echo in test scripts.
This commit is contained in:
parent
317e1b4e10
commit
519e20cd04
4 changed files with 8 additions and 0 deletions
|
|
@ -8,6 +8,7 @@ use POSIX qw(strftime);
|
|||
|
||||
my $date = strftime "%m/%d/%Y", localtime;
|
||||
|
||||
print("Content-type: text/plain\n\n");
|
||||
print "Hello from Perl!\n\n";
|
||||
print $date;
|
||||
print "\n\n";
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue