in reply to Requiring a version

require (0 + 5.040);

Are you sure that this code is actually executed when $] reports 5.38.x ?
BTW, I spotted a little typo ("doens't") in t/02-constructs.t.

Cheers,
Rob

Replies are listed 'Best First'.
Re^2: Requiring a version
by choroba (Cardinal) on Jun 18, 2024 at 10:52 UTC
    > Are you sure that this code is actually executed when $] reports 5.38.x ?

    The linked code is the following: 

        my $can = eval { require (0 + "$version") };
    warn "DEBUG: require $version in $]: ", $can ? 1 : 0;

    [download]
    And the tester's run shows 
    DEBUG: require 5.040 in 5.038002: 1 at t/02-constructs.t line 346.

    [download]

    Thanks for the heads up about the typo.

    map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]
[reply]
[d/l]
[select]
      Hmmm ... one has to really start clutching at straws to come up with an explanation.

      I wondered whether there might be something rendering the "." in "5.040" as garbage (in numeric context) - thereby causing 0 + "$version") to return "5".
      But that should probably generate a "not numeric" warning - and it could (in theory) just as well be a bug in eval{} or require() or the ternary operator.
      I look forward to hearing what the problem was ... if you ever find out.

      Thanks for the heads up about the typo

      You're welcome - I just hope it doens't turn out to be contagious.

      Cheers,
      Rob
[reply]
[d/l]

        While we are clutching at straws, could 040 be being treated as octal and thus interpreted as 32 decimal?

        Optimising for fewest key strokes only makes sense transmitting to Pluto or beyond
[reply]

In Section Seekers of Perl Wisdom