Narcissist: Difference between revisions
Content added Content deleted
m (→{{header|REXX}}: removed superfluous blank lines. -- ~~~~) |
m (→{{header|Perl 6}}: Use nested quoting delimiters.) |
||
Line 137:
=={{header|Perl 6}}==
For the narcissist to work you must be very careful with whitespace. The presented version works if it is stored as a file of exactly one line terminated by a
Note
<lang perl6>my $self=q
</lang>
{{out}}
<pre>$ rakudo narcissist.pl <narcissist.pl
Beautiful!
$ rakudo narcissist.pl <any-other-input.
Not my type.
</pre>
|