Help for this page

Select Code to Download

Select or download this

use warnings;
use strict;
...
...
my $n = $number/1000;
...