- or download this
use strict;
use warnings;
...
}
printf("%+.0f\n", movement(@ARGV));
- or download this
>perl movement.pl 1.0025 1.003
+5
>perl movement.pl 10.025 10.03
+5
- or download this
>perl movement.pl 98000 99000
+1000
...
>perl movement.pl 99000 98000
-1000