perldoc -q "Why am I getting long decimals"