[ID 20010329.002] perl-5.6.0, Win32, BC++ 5.2, file name inwarning is garbage

This is a bug report for perl from s.goeldner@eurodata.de,
generated with the help of perlbug 1.28 running under perl v5.6.0.


-----------------------------------------------------------------
We have the following packages (in separate files!):

Bugs/Msg/Used.pm:
-----------------
package Bugs::Msg::Used;

${+__PACKAGE__} = 1;
#${'Bugs::Msg::Used'} = 1;
#$Bugs::Msg::Used = 1;

1;

Bugs/Msg.pm:
------------
package Bugs::Msg;

use Bugs::Msg::Used;

1;

If we make a syntax check:

  perl -c -w Bugs/Msg.pm

perl outputs the following message:

  Name "Bugs::Msg::Used" used only once: possible typo at pGÅ line 3.
  Bugs/Msg.pm syntax OK

Note: the file name contains garbage.

The problem can be reproduced with ActicStates binary
distribution 5.6.0 for MSWin32.
The problem does *not* occur on the last binary distribution
on CPAN (perl 5.0 patchlevel 4 subversion 02) for MSWin32.
The problem does *not* occur on perl 5.0 patchlevel 5
subversion 3 for Linux.

Steffen
-----------------------------------------------------------------
---
Flags:
    category=core
    severity=low
---
Site configuration information for perl v5.6.0:

Configured by ovoronova at Wed Sep 13 10:59:52 2000.

Summary of my perl5 (revision 5 version 6 subversion 0) configuration:
  Platform:
    osname=MSWin32, osvers=4.0, archname=MSWin32-x86-multi-thread
    uname=''
    config_args='undef'
    hint=recommended, useposix=true, d_sigaction=undef
    usethreads=undef use5005threads=undef useithreads=define
usemultiplicity=define
    useperlio=undef d_sfio=undef uselargefiles=undef 
    use64bitint=undef use64bitall=undef uselongdouble=undef
usesocks=undef
  Compiler:
    cc='bcc32', optimize='-O2 -D_RTLDLL', gccversion=
    cppflags='-DWIN32'
    ccflags ='-O2 -D_RTLDLL -DWIN32  -DPERL_IMPLICIT_CONTEXT
-DPERL_IMPLICIT_SYS'
    stdchar='unsigned char', d_stdstdio=define, usevfork=false
    intsize=4, longsize=4, ptrsize=4, doublesize=8
    d_longlong=undef, longlongsize=8, d_longdbl=define, longdblsize=10
    ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t',
lseeksize=4
    alignbytes=8, usemymalloc=n, prototype=define
  Linker and Libraries:
    ld='tlink32', ldflags =' -L"c:\opt\perl\lib\CORE"
-L"T:\devel\BC5\lib"'
    libpth=T:\devel\BC5\lib
    libs= import32.lib cw32mti.lib odbc32.lib odbccp32.lib
    libc=cw32mti.lib, so=dll, useshrplib=yes, libperl=perl56.lib
  Dynamic Linking:
    dlsrc=dl_win32.xs, dlext=dll, d_dlsymun=undef, ccdlflags='-tWD'
    cccdlflags=' ', lddlflags='-Tpd  -L"c:\opt\perl\lib\CORE"
-L"T:\devel\BC5\lib"'

Locally applied patches:
    

---
@INC for perl v5.6.0:
    C:/opt/perl/lib
    C:/opt/perl/site/lib
    .

---
Environment for perl v5.6.0:
    HOME (unset)
    LANG (unset)
    LANGUAGE (unset)
    LD_LIBRARY_PATH (unset)
    LOGDIR (unset)
   
PATH=C:\tools\cmd;C:\opt\perl\bin;C:\usr\local\bin;C:\usr\local\lib;C:\WINNT\system32;C:\WINNT;T:\devel\BC5\BIN;
    PERL_BADLANG (unset)
    SHELL (unset)

• [ID 20010329.002] perl-5.6.0, Win32, BC++ 5.2, file name inwarning is garbage by Steffen Goeldner