[perl #68530] Name "version::CLASS" used only once: possible typo at /opt/perl/lib/5.10.1/Safe.pm line 251.

# New Ticket Created by  Frédéric Buclin 
# Please include the string:  [perl #68530]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=68530 >


This is a bug report for perl from LpSolit@gmail.com,
generated with the help of perlbug 1.39 running under perl 5.10.1.


-----------------------------------------------------------------
When I compile the test.cgi script below, the following warning is thrown:

$ /opt/perl/bin/perl -cwT test.cgi
Name "version::CLASS" used only once: possible typo at
/opt/perl/lib/5.10.1/Safe.pm line 251.
test.cgi syntax OK


test.cgi:

#!/opt/perl/bin/perl -wT

use strict;
use lib '.';
use Test5101;



Test5101.pm:

package Test5101;

use Safe;
my $s = new Safe;


This is the minimal testcase to reproduce the warning above. If I copy
the content of Test5101.pm into test.cgi, the warning goes away. So this
means the error is only present if Safe.pm is called from within the
Perl module.

This error is only thrown from Perl 5.10.1 RC1. No error is thrown with
Perl 5.10.0 and older. As Perl 5.10.0 comes with Safe 2.12 and Perl
5.10.1 with Safe 2.17, this may as well be a bug in Safe.pm itself.

-----------------------------------------------------------------
---
Flags:
    category=library
    severity=medium
    module=Safe
---
Site configuration information for perl 5.10.1:

Configured by buclin at Fri Aug 14 21:44:45 CEST 2009.

Summary of my perl5 (revision 5 version 10 subversion 1) configuration:

  Platform:
    osname=linux, osvers=2.6.27.24-server-1mnb, archname=i686-linux
    uname='linux localhost 2.6.27.24-server-1mnb #1 smp wed jun 10
17:18:14 edt 2009 i686 intel(r) core(tm)2 duo cpu e8400 @ 3.00ghz gnulinux '
    config_args='-Dprefix=/opt/perl -des'
    hint=recommended, useposix=true, d_sigaction=define
    useithreads=undef, usemultiplicity=undef
    useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef
    use64bitint=undef, use64bitall=undef, uselongdouble=undef
    usemymalloc=n, bincompat5005=undef
  Compiler:
    cc='cc', ccflags ='-fno-strict-aliasing -pipe -fstack-protector
-I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64',
    optimize='-O2',
    cppflags='-fno-strict-aliasing -pipe -fstack-protector
-I/usr/local/include'
    ccversion='', gccversion='4.3.2', gccosandvers=''
    intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
    ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t',
lseeksize=8
    alignbytes=4, prototype=define
  Linker and Libraries:
    ld='cc', ldflags =' -fstack-protector -L/usr/local/lib'
    libpth=/usr/local/lib /lib /usr/lib
    libs=-lnsl -ldl -lm -lcrypt -lutil -lc
    perllibs=-lnsl -ldl -lm -lcrypt -lutil -lc
    libc=/lib/libc-2.8.so, so=so, useshrplib=false, libperl=libperl.a
    gnulibc_version='2.8'
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E'
    cccdlflags='-fPIC', lddlflags='-shared -O2 -L/usr/local/lib
-fstack-protector'

Locally applied patches:
    RC1

    PERL_GIT_UNPUSHED_COMMITS    	/* do not remove this line */
    PERL_GIT_UNCOMMITTED_CHANGES	/* do not remove this line */

---
@INC for perl 5.10.1:
    /opt/perl/lib/5.10.1/i686-linux
    /opt/perl/lib/5.10.1
    /opt/perl/lib/site_perl/5.10.1/i686-linux
    /opt/perl/lib/site_perl/5.10.1
    .

---
Environment for perl 5.10.1:
    HOME=/root
    LANG=fr_CH.UTF-8
    LANGUAGE=fr_CH.UTF-8:fr
    LC_ADDRESS=fr_CH.UTF-8
    LC_COLLATE=fr_CH.UTF-8
    LC_CTYPE=fr_CH.UTF-8
    LC_IDENTIFICATION=fr_CH.UTF-8
    LC_MEASUREMENT=fr_CH.UTF-8
    LC_MESSAGES=fr_CH.UTF-8
    LC_MONETARY=fr_CH.UTF-8
    LC_NAME=fr_CH.UTF-8
    LC_NUMERIC=fr_CH.UTF-8
    LC_PAPER=fr_CH.UTF-8
    LC_SOURCED=1
    LC_TELEPHONE=fr_CH.UTF-8
    LC_TIME=fr_CH.UTF-8
    LD_LIBRARY_PATH (unset)
    LOGDIR (unset)

PATH=/sbin:/usr/sbin:/bin:/usr/bin:/usr/X11R6/bin:/usr/local/bin:/usr/local/sbin:/root/bin
    PERL_BADLANG (unset)
    SHELL=/bin/bash

• [perl #68530] Name "version::CLASS" used only once: possible typo at /opt/perl/lib/5.10.1/Safe.pm line 251. by Frédéric Buclin
• Re: [perl #68530] Name "version::CLASS" used only once: possibletypo at /opt/perl/lib/5.10.1/Safe.pm line 251. by Dave Mitchell