Select Code to Download

#!/usr/bin/perl
use warnings;
...
   }
   return $num;
}

C:\Code>perl zerofy.pl
-0.00000 0