use integer causes problem with -name=>'val' calling

[p5pRT]

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

Searchable as RT843$

[p5pRT]

From hugh@chelsea.net

code​:

  use integer;   use CGI;

  $q = CGI->new();

  $u = $q->url(-full => 1);

problem​:

  the arguments passed to $q->url() are (0\,1) instead   of ('-full'\,1)

Perl Info

``` Site configuration information for perl 5.00502: Configured by mprewitt at Sat Dec 5 09:54:18 EST 1998. Summary of my perl5 (5.0 patchlevel 5 subversion 2) configuration: Platform: osname=solaris, osvers=2.6, archname=sun4-solaris uname='sunos corona 5.6 generic_105181-09 sun4m sparc sunw,sparcstation-20 ' hint=previous, useposix=true, d_sigaction=define usethreads=undef useperlio=undef d_sfio=undef Compiler: cc='gcc', optimize='-O', gccversion=2.8.1 cppflags='-I/opt/bind/8.1.2/include -I/usr/local/include' ccflags ='-I/opt/bind/8.1.2/include -I/usr/local/include' stdchar='unsigned char', d_stdstdio=define, usevfork=false intsize=4, longsize=4, ptrsize=4, doublesize=8 d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16 alignbytes=8, usemymalloc=y, prototype=define Linker and Libraries: ld='gcc', ldflags ='-L/opt/bind/8.1.2/bind/lib -L/usr/local/lib' libpth=/usr/local/lib /lib /usr/lib /usr/ccs/lib libs=-lsocket -lnsl -ldl -lm -lbind -lc -lcrypt libc=/lib/libc.so, so=so, useshrplib=false, libperl=libperl.a Dynamic Linking: dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags=' ' cccdlflags='-fPIC', lddlflags='-G -L/usr/local/lib -L/opt/bind/8.1.2/bind/lib' Locally applied patches: @INC for perl 5.00502: /home/src/chelsea/perllib2 /home/src/chelsea/perllib/4.1 /home/src/perllib /opt/perl/5.005_02/lib /opt/perl/5.005_02/lib/perl/sun4-solaris /opt/perl/5.005_02/lib/perl /opt/siteperl/5.005_02/siteperl/sun4-solaris /opt/siteperl/5.005_02/siteperl . Environment for perl 5.00502: HOME=/home/hugh LANG (unset) LD_LIBRARY_PATH (unset) LOGDIR (unset) PATH=/home/hugh/bin:/home/hugh/jdk/java/bin:/usr/local/bin:/usr/sbin:/bin:/usr/bin:/usr/ccs:/usr/ucb:/etc:. PERL5LIB=/home/src/chelsea/perllib2:/home/src/chelsea/perllib/4.1:/home/src/perllib:/opt/perl/5.005_02/lib PERL_BADLANG (unset) SHELL=/usr/local/bin/tcsh ```

[p5pRT]

From [Unknown Contact. See original ticket]

Hugh\,

Thanks for the bug report. It is fixed in 5.6\, and I have marked the bug report as closed.

Nat