use strict; use diagnostics; my $html = <<'HTML'; My First PSGI Script

This is a pretty lame Web page

Who are these perlmonks, anyway?

HTML my $app = sub { return [ 200, ["Content-Type" => 'text/html'], [$html] ] };