C:\>perl -wle "$d = unpack 'D>', pack 'D>', 2.9; print $d"
Invalid type 'D' in pack at -e line 1.