$ perl -le 'my $x = "8940163...835"; my $y = reverse $x; print $y' 538...3610498