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

##</code><code>##

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