Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

Re: Perl 28 broke L: How to fix?

by davido (Cardinal)
on Oct 28, 2019 at 03:36 UTC ( [id://11108030]=note: print w/replies, xml ) Need Help??


in reply to Perl 28 broke L: How to fix?

It's interesting that it doesn't exhibit failing tests on newer versions of Perl. I can confirm that it doesn't behave correctly on 5.30, if correct is to work both for OO modules AND for function modules. Here's the tester's matrix, showing that it is still passing: http://matrix.cpantesters.org/?dist=L+v1.0.1. So clearly the tests are inadequate. You might submit a patch that includes a test. If you feel up to fixing the problem itself, include that in the patch too. Otherwise, just the test so that the author can incorporate it, and have something to work with in fixing it. The module was most recently uploaded in December 2018, so it's possible the author is still open to maintaining it.

Fortunately it's really just saving a few keystrokes; one-liners will survive without it. Also worth noting, perhaps: Object/Class-method calls do work. It's functions (non-methods) that trip up the error.


Dave

Replies are listed 'Best First'.
Re^2: Perl 28 broke L: How to fix?
by Anonymous Monk on Oct 28, 2019 at 04:54 UTC
    Fortunately it's really just saving a few keystrokes; one-liners will survive without it. Also worth noting, perhaps: Object/Class-method calls do work. It's functions (non-methods) that trip up the error.

    I find it very valuable and wish to retain the ability to use modules on the command line without having to refer to them twice and tinker with -M! As for the second point, you would think so, but check this out:

    perl -ML -e 'print Data::Dumper->Dump([HTTP::Tiny->new->get(q(https:// +www.perlmonks.org))->{headers}])'

    5.26

    $VAR1 = {
              'server' => 'Apache/2.4.41',
              'etag' => '"f059-595f109c01e50"',
              'date' => 'Mon, 28 Oct 2019 04:38:47 GMT',
              'last-modified' => 'Mon, 28 Oct 2019 04:36:06 GMT',
              'content-length' => '61529',
              'accept-ranges' => 'bytes',
              'content-type' => 'text/html'
            };
    

    5.28

    $VAR1 = {
              'content-type' => 'text/plain',
              'content-length' => 110
            };
    


    <Twilight Zone Music>

      Don’t know what went wrong for you, but it’s working fine for me:

      17:17 >perl -ML -e "print Data::Dumper->Dump([HTTP::Tiny->new->get(q(h +ttps://www.perlmonks.org))->{headers}]);" $VAR1 = { 'content-type' => 'text/html', 'server' => 'Apache/2.4.41', 'etag' => '"e57e-595f34244bafb"', 'content-length' => '58750', 'last-modified' => 'Mon, 28 Oct 2019 07:15:04 GMT', 'accept-ranges' => 'bytes', 'date' => 'Mon, 28 Oct 2019 07:18:01 GMT' }; 17:18 >mversion -f L Data::Dumper HTTP::Tiny L v1.0.1 Data::Dumper 2.173 HTTP::Tiny 0.070 17:18 >perl -v This is perl 5, version 28, subversion 0 (v5.28.0) built for MSWin32-x +64-multi-thread

      Strawberry Perl v5.28.0 under Windows 8.1, 64-bit. Same (correct) result using Perl v5.30.0.

      Cheers,

      Athanasius <°(((><contra mundum Iustus alius egestas vitae, eros Piratica,

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://11108030]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others examining the Monastery: (4)
As of 2024-04-25 10:10 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found