Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Re: JAPH palindrome.

by blokhead (Monsignor)
on Sep 24, 2010 at 23:11 UTC ( [id://861910]=note: print w/replies, xml ) Need Help??


in reply to JAPH palindrome.

Cute idea, but the reverse of this line:
print fi ('Just another Perl hacker,');
is not what you have written; it's this unfortunate thing:
;)',rekcah lreP rehtona tsuJ'( if tnirp
But the code you have does not rely on those parentheses being there, so you are safe.

Also, you have no space in X__ATAD__, but you have a space in __DATA__ X. I guess the "plain-language" definition of a palindrome does ignore spaces. Presumably that can only make the task easier in Perl..

blokhead

Replies are listed 'Best First'.
Re^2: JAPH palindrome.
by jffry (Hermit) on Sep 25, 2010 at 01:40 UTC

    Thanks, I didn't notice the inverted parenthesis, obviously. That's what I get for checking manually. I also didn't realize, as this script evolved, that I no longer had use for the parenthesis at all. At one point, adding them was necessary for a successful compile.

    Yes, I went with the rule that whitespace and newlines did not have to match.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://861910]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others pondering the Monastery: (5)
As of 2024-04-24 01:08 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found