-
Notifications
You must be signed in to change notification settings - Fork 11
Open
Description
Describe what you see, what you want to see, and perhaps some linkage to docs, synopses, or irclog chatter.
Example Code
react {
whenever IO::Socket::Async.listen('0.0.0.0', 3333) -> $conn {
whenever $conn.Supply.lines -> $line {
$conn.print: qq:heredoc/END/;
HTTP/1.1 200 OK
Content-Type: text/html; charset=UTF-8
Content-Encoding: UTF-8
<html>
<body>
<h1>Hello World!</h1>
<p>{ $line }</p>
</body>
</html>
END
$conn.close;
}
}
CATCH {
default {
say .^name, ': ', .Str;
say "handled in $?LINE";
}
}
}(probably golfs) generates an extra space at the end of $conn.print: qq:heredoc/END/; statement.
Picture [optional]
Providing a picture means that if the issue is fixed and linguist updates to include the fix (linguist uses this package to highlight Perl 6 on GitHub), your issue will remain historically viewable.
Leave this in. For internal use.
- Fixed in Master
- Fixed in Release
- Has Tests
- Passes Tests
Reactions are currently unavailable
Metadata
Metadata
Assignees
Labels
No labels