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

##</code><code>##

statx("/usr/opt/perl5/lib/5.8.2/aix-thread-multi/MIME/Base64.pmc", 0x2FF21CA0, 128, 010) Err#2  ENOENT
open("/usr/opt/perl5/lib/5.8.2/aix-thread-multi/MIME/Base64.pm", O_RDONLY|O_LARGEFILE) = 4
statx("/usr/opt/perl5/lib/5.8.2/aix-thread-multi/auto/MIME/Base64", 0x30008738, 128, 010) = 0
statx("/usr/opt/perl5/lib/5.8.2/aix-thread-multi/auto/MIME/Base64/Base64.so", 0x30008738, 128, 010) = 0
statx("/usr/opt/perl5/lib/5.8.2/aix-thread-multi/auto/MIME/Base64/Base64.bs", 0x30008738, 128, 010) = 0

##</code><code>##

$ grep VERSION /usr/opt/perl5/lib/5.8.2/aix-thread-multi/MIME/Base64.pm
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/Base64.so | grep ^[0-9]
2.21
2.21