[vox-tech] perl never ceases to amaze me

[Jay Strauss]

It works on non-3 groups (pardon my M$)

C:\>type tmp.pl
   my $number = 3_151_592_65;
   print $number += 1000, "\n";


C:\>perl tmp.pl
315160265

----- Original Message ----- 
From: "Peter Jay Salzman" <p@dirac.org>
To: <vox-tech@lists.lugod.org>
Sent: Saturday, January 18, 2003 1:15 PM
Subject: [vox-tech] perl never ceases to amaze me


> perl is such a cool language.  i never knew you can represent numbers
> this way:
> 
>    my $number = 3_151_592_653;
>    print ++$number, "\n";
> 
> i can easily see that $number represents "three billion one hundred
> fifty one million five hundred ninety two thousand six hundred fifty
> three".  if, instead, i saw:
> 
>    my $number = 3151592653;
>    print ++$number, "\n";
> 
> i'd be sitting there all day trying to figure out what this number is.
> perl will balk if you use an underscore in anything other than groups of
> three, as in:
> 
>    my $number = 3_151_592_53;
> 
> jeez, for all the numerical stuff i do for research, i wish C had
> something like this built in!
> 
> pete
> _______________________________________________
> vox-tech mailing list
> vox-tech@lists.lugod.org
> http://lists.lugod.org/mailman/listinfo/vox-tech
> 
>