Permalink
Find file
Fetching contributors…
Cannot retrieve contributors at this time
15 lines (10 sloc) 313 Bytes
#!/usr/bin/env perl6
BEGIN { @*INC.unshift: './lib'; }
use HTTP::Easy::PSGI;
my $app = sub (%env) {
return [ 200, [ 'Content-Type' => 'text/plain' ], [ "Hello World" ] ];
}
## We are using :debug for more detailed output to STDERR.
my $server = HTTP::Easy::PSGI.new(:debug);
$server.app($app);
$server.run;