Write language name in 3D ASCII: Difference between revisions

→‎{{header|Perl 6}}: Removed obfuscated code.
(non obfuscated Perl)
(→‎{{header|Perl 6}}: Removed obfuscated code.)
Line 1,396:
_| \___|_| _|</pre>
Font taken from http://www.network-science.de/ascii/.
 
=={{header|Perl 6}}==
<lang perl6>print <T,cc^,cc^,cc^,^,,1ccTA,^/A,c_A,^/A-,,@1c:@6;666;`,6;6666,A-c^U-,c`-,c_
-,,`--,661,N66;`66;`,6,/66;_--_-U-_,--cc_-_O_-cc_CccD6@@,6@,,@@B,@@,.@@,D8`,,
8cc`8`E`8cc@Lc`X>>>.ords>>.comb.map({(" |/\\\n_".comb)[$_-4]});</lang>
 
{{out}}
<pre>
_____ _____ _____ _ _____
/| _ \/| ___|/| _ \/| | / ___|
/ | |_| | | |__/ | |_| | | | /| |___
| | ___/ | ___| | _/ | | | | _ \
| | |__/| | |__/ | \| | |__| | |_| |
| |_| | |_____| |_|\__| |_____|/\____/
| / / | / / / // / / // / /
|/_/ |/_____/|/_//__/|/____/ \/___/
 
</pre>
 
=={{header|PicoLisp}}==
Anonymous user