in reply to Re: How do I print a large integer with thousands separators?
in thread How do I print a large integer with thousands separators?

How about this? 
sub puntato{ my $z=reverse $_[0];$z=~s/(\d{3})(?=\d)/$1\./g;scalar(rev
+erse($z))}

[download]
Boris
  • Comment on Re: Answer: How do I print a large integer with thousands separators?
  • Download Code

In Section Seekers of Perl Wisdom