Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

-w switch diagnostics w/ Shell.pm and Config.pm #293

Closed
p5pRT opened this issue Jul 29, 1999 · 1 comment
Closed

-w switch diagnostics w/ Shell.pm and Config.pm #293

p5pRT opened this issue Jul 29, 1999 · 1 comment

Comments

@p5pRT
Copy link
Collaborator

@p5pRT p5pRT commented Jul 29, 1999

Migrated from rt.perl.org#1116 (status was 'resolved')

Searchable as RT1116$

@p5pRT
Copy link
Collaborator Author

@p5pRT p5pRT commented Jul 29, 1999

From popowski@lsil.com

Shell.pm and Config.pm are producing -w switch diagnostics. Please see the
attached code and output, and modify the modules accordingly. Or counter my
request with a "you are stupid" because, hey, maybe I am. Ah, perl; couldn't
live without it...

Regards,
Dean

$%!&*# --> cat bug.pl
#!/usr/local/bin/perl -w

use strict;
use Config qw(myconfig);
use Shell qw(cp);

cp('jack.txt', 'jill.txt');

print myconfig();

exit(0);
$%!&*# --> bug.pl
Variable "$cmd" will not stay shared at (eval 1) line 14.
Use of uninitialized value at
/usr/local/lib/perl5/sun4m-solaris/5.00401/Config.pm line 553.
Use of uninitialized value at
/usr/local/lib/perl5/sun4m-solaris/5.00401/Config.pm line 553.
Use of uninitialized value at
/usr/local/lib/perl5/sun4m-solaris/5.00401/Config.pm line 553.
Summary of my perl5 (5.0 patchlevel 4 subversion 1) configuration​:
  Platform​:
  osname=solaris, osvers=2.5.1, archname=sun4m-solaris
  uname='sunos mdst26 5.5.1 generic_103640-08 sun4m sparc sunw,sparcstation-20
'
  hint=recommended, useposix=true, d_sigaction=define
  bincompat3=y useperlio= d_sfio=
  Compiler​:
  cc='gcc', optimize='-O', gccversion=2.7.2
  cppflags='-I/usr/local/include'
  ccflags ='-I/usr/local/include'
  stdchar='unsigned char', d_stdstdio=define, usevfork=false
  voidflags=15, castflags=0, d_casti32=define, d_castneg=define
  intsize=4, alignbytes=8, usemymalloc=y, randbits=15
  Linker and Libraries​:
  ld='gcc', ldflags =' -L/usr/local/lib'
  libpth=/usr/local/lib /lib /usr/lib /usr/ccs/lib
  libs=-lsocket -lnsl -ldl -lm -lc -lcrypt
  libc=/lib/libc.so, so=so
  useshrplib=false, libperl=libperl.a
  Dynamic Linking​:
  dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=, ccdlflags=' '
  cccdlflags='-fpic', lddlflags='-G -L/usr/local/lib'

$%!&*# --> /usr/local/bin/perl -V
Summary of my perl5 (5.0 patchlevel 4 subversion 1) configuration​:
  Platform​:
  osname=solaris, osvers=2.5.1, archname=sun4m-solaris
  uname='sunos mdst26 5.5.1 generic_103640-08 sun4m sparc sunw,sparcstation-20
'
  hint=recommended, useposix=true, d_sigaction=define
  bincompat3=y useperlio= d_sfio=
  Compiler​:
  cc='gcc', optimize='-O', gccversion=2.7.2
  cppflags='-I/usr/local/include'
  ccflags ='-I/usr/local/include'
  stdchar='unsigned char', d_stdstdio=define, usevfork=false
  voidflags=15, castflags=0, d_casti32=define, d_castneg=define
  intsize=4, alignbytes=8, usemymalloc=y, randbits=15
  Linker and Libraries​:
  ld='gcc', ldflags =' -L/usr/local/lib'
  libpth=/usr/local/lib /lib /usr/lib /usr/ccs/lib
  libs=-lsocket -lnsl -ldl -lm -lc -lcrypt
  libc=/lib/libc.so, so=so
  useshrplib=false, libperl=libperl.a
  Dynamic Linking​:
  dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=, ccdlflags=' '
  cccdlflags='-fpic', lddlflags='-G -L/usr/local/lib'

Characteristics of this binary (from libperl)​:
  Built under solaris
  Compiled at Aug 8 1997 13​:35​:39
  @​INC​:
  /usr/local/lib/perl5/sun4m-solaris/5.00401
  /usr/local/lib/perl5
  /usr/local/lib/perl5/site_perl/sun4m-solaris
  /usr/local/lib/perl5/site_perl
  .
$%!&*# -->

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Projects
None yet
Linked pull requests

Successfully merging a pull request may close this issue.

None yet
1 participant
You can’t perform that action at this time.