my $factor = 1/$units; #### my $factor = int( 1/$units + 0.5 );