Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl

...

print $r->status_line;
print $r->content;