Re: What does this print for you?

[Marshall]

#!/usr/bin/perl -w
use strict;

print pack q/d*/,(1.7453026326120991e+194,1.5156845462257262e-147);
__END__
Prints: Merry Christmas!
on ActiveState 5.10, Windows XP, 32 bit Perl 5.10
Completely unexpected result, but that is what it does.

Note: 
C:\TEMP>perl -e 'print pack q/d*/,(1.7453026326120991e+194,1.515684546
+2257262e-147)'
Can't find string terminator "'" anywhere before EOF at -e line 1.

The Windows syntax is:
C:\TEMP>perl -e "print pack q/d*/,(1.7453026326120991e+194,1.515684546
+2257262e-147)"
Merry Christmas!