Narcissist: Difference between revisions
Content added Content deleted
(→{{header|TXR}}: added zkl) |
|||
| Line 227: | Line 227: | ||
<pre>True</pre> |
<pre>True</pre> |
||
=={{header|PARI/GP}}== |
|||
<lang parigp>narcissist()=input()==narcissist</lang> |
|||
Run narcissist():<pre>Hello |
|||
0</pre> |
|||
<pre>narcissist() = {input() == narcissist;} |
|||
1</pre> |
|||
=={{header|Perl}}== |
=={{header|Perl}}== |
||
<lang perl># this is file narc.pl |
<lang perl># this is file narc.pl |
||