in reply to AIX upgrade MIME problem

here is what I found under @INC in perl -V

/usr/opt/perl5/lib/5.8.0/aix-thread-multi
/usr/opt/perl5/lib/5.8.0
/usr/opt/perl5/lib/site_perl/5.8.0/aix-thread-multi
/usr/opt/perl5/lib/site_perl/5.8.0
/usr/opt/perl5/lib/site_perl

is there a reason why the aix-thread-multi is in there twice?

Replies are listed 'Best First'.
Re^2: AIX upgrade MIME problem
by almut (Canon) on Feb 13, 2009 at 17:03 UTC
    is there a reason why the aix-thread-multi is in there twice?

    That's normal.

    You could try something like

    $ truss /usr/bin/perl -MMIME::Base64 -e1 2>&1 | grep Base64

    to see which paths are actually being visited while searching, and compare the output against the system where your script works. 

    For instance, on an AIX 5.3 machine (the closest I currently have available to your setup) I do get (which is working fine):

    statx("/usr/opt/perl5/lib/5.8.2/aix-thread-multi/MIME/Base64.pmc", 0x2 +FF21CA0, 128, 010) Err#2 ENOENT open("/usr/opt/perl5/lib/5.8.2/aix-thread-multi/MIME/Base64.pm", O_RDO +NLY|O_LARGEFILE) = 4 statx("/usr/opt/perl5/lib/5.8.2/aix-thread-multi/auto/MIME/Base64", 0x +30008738, 128, 010) = 0 statx("/usr/opt/perl5/lib/5.8.2/aix-thread-multi/auto/MIME/Base64/Base +64.so", 0x30008738, 128, 010) = 0 statx("/usr/opt/perl5/lib/5.8.2/aix-thread-multi/auto/MIME/Base64/Base +64.bs", 0x30008738, 128, 010) = 0

    Then, compare the .pm-version to the .so-version (with the respective paths as revealed by truss):

    $ grep VERSION /usr/opt/perl5/lib/5.8.2/aix-thread-multi/MIME/Base64.p +m use vars qw(@ISA @EXPORT $VERSION $OLD_CODE); $VERSION = '2.21'; eval { bootstrap MIME::Base64 $VERSION; }; $ strings /usr/opt/perl5/lib/5.8.2/aix-thread-multi/auto/MIME/Base64/B +ase64.so | grep ^[0-9] 2.21 2.21

    (the version numbers should be the same)

Re^2: AIX upgrade MIME problem
by jc0517 (Novice) on Feb 13, 2009 at 17:00 UTC
    I looked at our test server and it has the same @INC paths.

    however we do have some significant differences in other areas of our perl -V output. I am going to run it by our admins.