Mega Code Archive

 

Categories / Perl / Data Type

 

Number can be expressed by ###_###_### for ###,###,###

#!/usr/bin/perl -w print 25_000_000, " ", -4, "\n";