~ubuntu-branches/ubuntu/natty/lighttpd/natty

« back to all changes in this revision

Viewing changes to tests/docroot/www/get-header.pl

  • Committer: Bazaar Package Importer
  • Author(s): Torsten Marek
  • Date: 2005-11-26 11:48:51 UTC
  • Revision ID: james.westby@ubuntu.com-20051126114851-76t9q0rrwbzjnt2t
Tags: upstream-1.4.8
ImportĀ upstreamĀ versionĀ 1.4.8

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
#!/usr/bin/perl
 
2
 
 
3
my $s = $ENV{$ENV{"QUERY_STRING"}};
 
4
 
 
5
printf("Content-Length: %d\r\n", length($s));
 
6
print "Content-Type: text/plain\r\n\r\n";
 
7
 
 
8
print $s;