Select Code to Download

use strict;
use warnings;

sub isPalindrome
{
...
    my $reversed = 0;
    my $n = $orig;
    ...

$temp++;