Providing more detailed Perl information:
[dcoleman@test1-cm3 cgi-bin]$ perl -V
Summary of my perl5 (revision 5 version 10 subversion 1) configuration:
Platform:
osname=linux, osvers=2.6.18-348.12.1.el5,
archname=x86_64-linux-thread-multi
uname='linux x86-007.build.bos.redhat.com 2.6.18-348.12.1.el5
#1 smp mon jul 1 17:54:12 edt 2013 x86_64 x86_64 x86_64 gnulinux '
config_args='-des -Doptimize=-O2 -g -pipe -Wall
-Wp,-D_FORTIFY_SOURCE=2 -fexceptions -fstack-protector
--param=ssp-buffer-size=4 -m64 -mtune=generic -DDEBUGGING=-g
-Dversion=5.10.1 -Dmyhostname=localhost -Dperladmin=root@localhost
-Dcc=gcc -Dcf_by=Red Hat, Inc. -Dprefix=/usr -Dvendorprefix=/usr
-Dsiteprefix=/usr/local -Dsitelib=/usr/local/share/perl5
-Dsitearch=/usr/local/lib64/perl5 -Dprivlib=/usr/share/perl5
-Darchlib=/usr/lib64/perl5 -Dvendorlib=/usr/share/perl5/vendor_perl
-Dvendorarch=/usr/lib64/perl5/vendor_perl -Dinc_version_list=5.10.0
-Darchname=x86_64-linux-thread-multi -Dlibpth=/usr/local/lib64
/lib64 /usr/lib64 -Duseshrplib -Dusethreads -Duseithreads
-Duselargefiles -Dd_dosuid -Dd_semctl_semun -Di_db -Ui_ndbm -Di_gdbm
-Di_shadow -Di_syslog -Dman3ext=3pm -Duseperlio
-Dinstallusrbinperl=n -Ubincompat5005 -Uversiononly
-Dpager=/usr/bin/less -isr -Dd_gethostent_r_proto
-Ud_endhostent_r_proto -Ud_sethostent_r_proto
-Ud_endprotoent_r_proto -Ud_setprotoent_r_proto
-Ud_endservent_r_proto -Ud_setservent_r_proto -Dscriptdir=/usr/bin
-Dusesitecustomize'
hint=recommended, useposix=true, d_sigaction=define
useithreads=define, usemultiplicity=define
useperlio=define, d_sfio=undef, uselargefiles=define,
usesocks=undef
use64bitint=define, use64bitall=define, uselongdouble=undef
usemymalloc=n, bincompat5005=undef
Compiler:
cc='gcc', ccflags ='-D_REENTRANT -D_GNU_SOURCE
-fno-strict-aliasing -pipe -fstack-protector -I/usr/local/include
-D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64',
optimize='-O2 -g -pipe -Wall -Wp,-D_FORTIFY_SOURCE=2
-fexceptions -fstack-protector --param=ssp-buffer-size=4 -m64
-mtune=generic',
cppflags='-D_REENTRANT -D_GNU_SOURCE -fno-strict-aliasing -pipe
-fstack-protector -I/usr/local/include'
ccversion='', gccversion='4.4.7 20120313 (Red Hat 4.4.7-3)',
gccosandvers=''
intsize=4, longsize=8, ptrsize=8, doublesize=8, byteorder=12345678
d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16
ivtype='long', ivsize=8, nvtype='double', nvsize=8,
Off_t='off_t', lseeksize=8
alignbytes=8, prototype=define
Linker and Libraries:
ld='gcc', ldflags =' -fstack-protector'
libpth=/usr/local/lib64 /lib64 /usr/lib64
libs=-lresolv -lnsl -lgdbm -ldb -ldl -lm -lcrypt -lutil
-lpthread -lc
perllibs=-lresolv -lnsl -ldl -lm -lcrypt -lutil -lpthread -lc
libc=, so=so, useshrplib=true, libperl=libperl.so
gnulibc_version='2.12'
Dynamic Linking:
dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef,
ccdlflags='-Wl,-E -Wl,-rpath,/usr/lib64/perl5/CORE'
cccdlflags='-fPIC', lddlflags='-shared -O2 -g -pipe -Wall
-Wp,-D_FORTIFY_SOURCE=2 -fexceptions -fstack-protector
--param=ssp-buffer-size=4 -m64 -mtune=generic'
Characteristics of this binary (from libperl):
Compile-time options: MULTIPLICITY PERL_DONT_CREATE_GVSV
PERL_IMPLICIT_CONTEXT PERL_MALLOC_WRAP
USE_64_BIT_ALL
USE_64_BIT_INT USE_ITHREADS USE_LARGE_FILES
USE_PERLIO USE_REENTRANT_API USE_SITECUSTOMIZE
Built under linux
Compiled at Aug 7 2013 06:31:19
@INC:
/usr/local/lib64/perl5
/usr/local/share/perl5
/usr/lib64/perl5/vendor_perl
/usr/share/perl5/vendor_perl
/usr/lib64/perl5
/usr/share/perl5
.
[dcoleman@test1-cm3 cgi-bin]$
D
On 01/15/2015 02:19 PM, Dave Cross via RT wrote:
Show quoted text> <URL:
https://rt.cpan.org/Ticket/Display.html?id=101566 >
>
>
> Hi,
>
> Thanks for your bug report I've moved it into the CPAN RT system to make it easier to track.
>
> I can't reproduce this on my system, and I can't see any CPAN testers failures that look like this so I'm going to need more information from you I'm afraid. In particular, can you tell me which versions of Perl and Attribute::Handlers you have installed.
>
> I'll do what I can to work out what's going on here, but I should point out that since Hash::Util::lock_keys was added to the Perl standard library in Perl 5.8, ths module is only really left on CPAN as an example of tieing a hash.
>
> Cheers,
>
> Dave...
>
> On Thu Jan 15 14:08:17 2015, dcoleman@synernet.com wrote:
>> Hi.
>>
>> I am working on porting some old Perl code from Windows to Linux.
>> Working on a script that looks like (abbreviated):
>>
>> #!/usr/bin/perl
>>
>> use strict;
>>
>> use Tie::Hash::FixedKeys;
>>
>> use constant OUTDIR => 'data_send_manager';
>> use constant PREVIOUS_DIR => 'previous_versions';
>> use constant PUSHLISTDIR => 'cmanager\\PushLive\\';
>> use constant COMMON_FILENAME => '_crschema';
>> use constant PUSHLISTFILE_AOP => 'AOP_Pushlist.xml';
>> use constant PUSHLISTFILE_ISSUE => 'Issue_Pushlist.xml';
>>
>> my @legal = qw(
>> FILENAME BASENAME UID PUBLISH IDT EDT AOPDATE AAPDATE
>> ONLINEDATE NFVDATE PUBDATE
>> TITLE AULIST VOLUME ISSUE FIRST_PAGE LAST_PAGE ELOCATION
>> PRINT_ISSN ELECTRONIC_ISSN FULL_TITLE ABBREV_TITLE
>> SGML_DOI DOI URL CORRURL CORRLIST BIBLIST
>> PARSE_OK CATEG
>> USEFORNPHOTON
>> );
>>
>> print "Content-type:text/plain\n\n";
>> print "OK\n";
>>
>> The above is really just a stripped-down first few lines of a production
>> script that is having a problem.
>>
>> If I comment out the /use Tie::Hash::FixedKeys;/ everything is fine. I
>> get my "OK". Uncomment that line and I see:
>> [Thu Jan 15 12:44:32 2015] [error] [client 192.168.88.47] Not a GLOB
>> reference at /var/www/lib/perl/Attribute/Handlers.pm line 16.
>> [Thu Jan 15 12:44:32 2015] [error] [client 192.168.88.47] CHECK
>> failed--call queue aborted.
>> [Thu Jan 15 12:44:32 2015] [error] [client 192.168.88.47] Premature end
>> of script headers: tie_hash_fixedkeys.pl
>>
>> Also:
>> cpanm --info Tie::Hash::FixedKeys
>> DAVECROSS/Tie-Hash-FixedKeys-1.12.tar.gz
>>
>> So that looks correct.
>>
>> Is this something you know anything about? Anything I should be
>> checking for? Other libraries that need to be updated?
>>
>> Thanks in advance.
>>
>> Dennis Coleman
>>
>
>
