$ perl5.10.1 -V:uselongdouble\|nvsize
nvsize='8';
uselongdouble='undef';
$ perl5.10.1 -MData::Dumper -wE'say Dumper cos 1'
$VAR1 = '0.54030230586814';
$