URL shortener: Difference between revisions

m
→‎{{header|Perl 6}}: regularize whitespace
m (→‎{{header|Perl 6}}: Meh, no output)
m (→‎{{header|Perl 6}}: regularize whitespace)
Line 107:
 
get -> {
content 'text/html', qq:to/END/;
$add-url-form </br>
Saved URLs:
<div style="background-color:#eeeeee">
{ %urls<url>.sort( +(*.key.parse-base(36)) ).join: '</br>' }
</div>
END
}
 
10,327

edits