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