djjudas21 / photodb-perl

App to manage a collection of film cameras & lenses
https://metacpan.org/pod/App::PhotoDB
GNU General Public License v2.0
1 stars 2 forks source link

Bug with readline #336

Closed djjudas21 closed 5 years ago

djjudas21 commented 5 years ago

Fedora 29 distro which was previously running v0.05 installed with cpanm. Upgraded to v0.07 and it broke.

[jonathan@zeus ~]$ photodb
 ____  _           _        ____  ____
|  _ \| |__   ___ | |_ ___ |  _ \| __ )
| |_) | '_ \ / _ \| __/ _ \| | | |  _ \
|  __/| | | | (_) | || (_) | |_| | |_) |
|_|   |_| |_|\___/ \__\___/|____/|____/
                             v0.07

Can't call method "readline" on an undefined value at /usr/local/share/perl5/App/PhotoDB/funcs.pm line 98.
djjudas21 commented 5 years ago

This does not work on Zeus or Hephaestos, but does work on Poseidon and Apollo (all Fedora, but had cpanm run at different times, so probably have different versions. Need to do some more analysis, e.g. of installed Perl modules to work out what's going on. Run the following on each system to record versions:

hostname ; perl -v ; ./Build prereq_report
djjudas21 commented 5 years ago
[jonathan@hephaestos photodb]$ hostname ; perl -v ; ./Build prereq_report
hephaestos

This is perl 5, version 28, subversion 2 (v5.28.2) built for x86_64-linux-thread-multi
(with 48 registered patches, see perl -V for more detail)

Copyright 1987-2019, Larry Wall

Perl may be copied only under the terms of either the Artistic License or the
GNU General Public License, which may be found in the Perl 5 source kit.

Complete documentation for Perl, including FAQ lists, should be found on
this system using "man perl" or "perldoc perl".  If you have access to the
Internet, point your browser at http://www.perl.org/, the Perl Home Page.

build_requires:
    Module           Need    Have
    --------------+--------+----------
    Pod::Select      0        1.63
    Test::More       0        1.302162

configure_requires:
    Module             Need    Have
    ----------------+--------+----------
    Module::Build      0        0.4224
    Pod::Select        0        1.63

requires:
    Module                    Need    Have
    -----------------------+--------+----------
    Array::Utils              0        0.5
    Config::IniHash           0        3.01.01
    DB::SQL::Migrations       0        0.07
    DBD::mysql                0        4.050
    DBI                       0        1.642
    experimental              0        0.020
    Exporter                  0        5.73
    File::Basename            0        2.85
    Getopt::Long              0        2.5
    Image::ExifTool           0        11.50
    Path::Iterator::Rule      0        1.014
    Perl::Critic              0        1.132
    SQL::Abstract             0        1.86
    strict                    0        1.11
    Term::ReadKey             0        2.38
    Term::ReadLine::Tiny      0        1.09
    Text::TabularDisplay      0        1.38
    Time::Piece               0        1.33
    warnings                  0        1.42
    YAML                      0        1.28

test_requires:
    Module                   Need    Have
    ----------------------+--------+----------
    DB::SQL::Migrations      0        0.07
    Test::Compile            0        v1.3.0
    Test::Expect             0        0.34
    Test::More               0.47     1.302162
    Test::Output             0        1.031
    Test::Perl::Critic       0        1.04
djjudas21 commented 5 years ago
[jonathan@zeus photodb]$ hostname ; perl -v ; ./Build prereq_report
zeus.jonathangazeley.com

This is perl 5, version 28, subversion 2 (v5.28.2) built for x86_64-linux-thread-multi
(with 48 registered patches, see perl -V for more detail)

Copyright 1987-2019, Larry Wall

Perl may be copied only under the terms of either the Artistic License or the
GNU General Public License, which may be found in the Perl 5 source kit.

Complete documentation for Perl, including FAQ lists, should be found on
this system using "man perl" or "perldoc perl".  If you have access to the
Internet, point your browser at http://www.perl.org/, the Perl Home Page.

build_requires:
    Module           Need    Have
    --------------+--------+----------
    Pod::Select      0        1.63
    Test::More       0        1.302140

configure_requires:
    Module             Need    Have
    ----------------+--------+----------
    Module::Build      0        0.4224
    Pod::Select        0        1.63

requires:
    Module                    Need    Have
    -----------------------+--------+----------
    Array::Utils              0        0.5
    Config::IniHash           0        3.01.01
    DB::SQL::Migrations       0        0.07
    DBD::mysql                0        4.046
    DBI                       0        1.642
    experimental              0        0.020
    Exporter                  0        5.73
    File::Basename            0        2.85
    Getopt::Long              0        2.5
    Image::ExifTool           0        11.50
    Path::Iterator::Rule      0        1.014
    Perl::Critic              0        1.134
    SQL::Abstract             0        1.86
    strict                    0        1.11
    Term::ReadKey             0        2.37
    Term::ReadLine            0        1.17
    Term::ReadLine::Perl      0        1.0303
    Text::TabularDisplay      0        1.38
    Time::Piece               0        1.33
    warnings                  0        1.42
    YAML                      0        1.28

test_requires:
    Module                   Need    Have
    ----------------------+--------+----------
    DB::SQL::Migrations      0        0.07
    Test::Compile            0        v1.3.0
    Test::Expect             0        0.34
    Test::More               0.47     1.302140
    Test::Output             0        1.031
    Test::Perl::Critic       0        1.04
djjudas21 commented 5 years ago
[jonathan@latitude photodb]$ hostname ; perl -v ; ./Build prereq_report
latitude.jonathangazeley.com

This is perl 5, version 28, subversion 2 (v5.28.2) built for x86_64-linux-thread-multi
(with 48 registered patches, see perl -V for more detail)

Copyright 1987-2019, Larry Wall

Perl may be copied only under the terms of either the Artistic License or the
GNU General Public License, which may be found in the Perl 5 source kit.

Complete documentation for Perl, including FAQ lists, should be found on
this system using "man perl" or "perldoc perl".  If you have access to the
Internet, point your browser at http://www.perl.org/, the Perl Home Page.

build_requires:
    Module           Need    Have
    --------------+--------+----------
    Pod::Select      0        1.63
    Test::More       0        1.302162

configure_requires:
    Module             Need    Have
    ----------------+--------+----------
    Module::Build      0        0.4224
    Pod::Select        0        1.63

requires:
    Module                    Need    Have
    -----------------------+--------+----------
    Array::Utils              0        0.5
    Config::IniHash           0        3.01.01
    DB::SQL::Migrations       0        0.07
    DBD::mysql                0        4.050
    DBI                       0        1.642
    experimental              0        0.020
    Exporter                  0        5.73
    File::Basename            0        2.85
    Getopt::Long              0        2.5
    Image::ExifTool           0        11.30
    Path::Iterator::Rule      0        1.014
    Perl::Critic              0        1.132
    SQL::Abstract             0        1.86
    strict                    0        1.11
    Term::ReadKey             0        2.38
    Term::ReadLine            0        1.17
    Term::ReadLine::Perl      0        1.0303
    Text::TabularDisplay      0        1.38
    Time::Piece               0        1.33
    warnings                  0        1.42
    YAML                      0        1.28

test_requires:
    Module                   Need    Have
    ----------------------+--------+----------
    DB::SQL::Migrations      0        0.07
    Test::Compile            0        v1.3.0
    Test::Expect             0        0.34
    Test::More               0.47     1.302162
    Test::Output             0        1.031
    Test::Perl::Critic       0        1.04
djjudas21 commented 5 years ago

Here's a diff between a working system (latitude) and a broken system (zeus):

[jonathan@latitude photodb]$ diff report-latitude.txt report-zeus.txt 
6c6
<     Test::More       0        1.302162
---
>     Test::More       0        1.302140
20c20
<     DBD::mysql                0        4.050
---
>     DBD::mysql                0        4.046
26c26
<     Image::ExifTool           0        11.30
---
>     Image::ExifTool           0        11.50
28c28
<     Perl::Critic              0        1.132
---
>     Perl::Critic              0        1.134
31c31
<     Term::ReadKey             0        2.38
---
>     Term::ReadKey             0        2.37
45c45
<     Test::More               0.47     1.302162
---
>     Test::More               0.47     1.302140