RosettaCodeData/Task/Hello-world-Web-server/Perl/hello-world-web-server-5.pl

2 lines
176 B
Raku

my $app = sub { return [ 200, [ 'Content-Type' => 'text/html; charset=UTF-8' ], [ '<html><head><title>Goodbye, world!</title></head><body>Goodbye, world!</body></html>' ] ] };