>>>>> On Sun, 19 Sep 2010 16:39:52 -0400, David Golden <[email protected]> said:

 >> cpan[3]> ! print CPAN::Version->vlt( $CPAN::Reporter::VERSION, 0.99 ), "\n"
 >> 3.3376107877608e-308
 >> cpan[3]> ! print CPAN::Version->vlt( CPAN::Reporter->VERSION, 0.99 ), "\n"
 >> 3.3376107877608e-308

  > WTF?!? That looks like something awfully like "0" but that perl would
  > decide is true.

  > Andreas -- any ideas what is going on?

No, not from reading the code of CPAN::Version. Nigel, can you do us
more favors, please? I the CPAN shell, please do

cpan> o debug Version
cpan> ! print CPAN::Version->vlt( $CPAN::Reporter::VERSION, 0.99 ), "\n"
cpan> ! print (($CPAN::Reporter::VERSION ne "undef") <=> (0.99 ne "undef"), 
"\n")
cpan> ! print (("v0") cmp ("v0"), "\n")
cpan> ! print (($CPAN::Reporter::VERSION) <=> (0.99), "\n")
cpan> ! print (($CPAN::Reporter::VERSION) cmp (0.99), "\n")
cpan> ! printf "%g\n", 0 + (1 < 0)

Sorry, I have no more ideas for now.

-- 
andreas

Reply via email to