Anonymous user
Rosetta Code/Fix code tags: Difference between revisions
→{{header|Perl 6}}
(Scala contribution added.) |
|||
Line 645:
.say;</lang>
<lang perl6>use v6;
constant @langs = < abap actionscript actionscript3 ada … >;
slurp().subst(
rx:r{
| '<' <( $<need-add-space>=<?> )> @langs '>'
| '</' <( @langs )> '>'
| '<' '/'? <( code )> [<.ws> @langs]? '>'
},
'lang' ~ " " x *<need-add-space>.so,
:g,
).print</lang>
=={{header|PicoLisp}}==
|