Skip Menu |
Report information
Id: 978
Status: resolved
Priority: 0/
Queue: perl5

Owner: Nobody
Requestors: jeffp [at] friday.crusoe.net
Cc:
AdminCc:

Operating System: mswin32
PatchStatus: (no value)
Severity: medium
Type: library
Perl Version: (no value)
Fixed In: (no value)



To: perlbug [...] perl.com
Subject: For AS: build 517 bug (truncate() and strict)
From: "jp" <jeffp [...] friday.crusoe.net>
Date: Thu, 8 Jul 1999 13:51:49 -0400
Download (untitled) / with headers
text/plain 2.3k
----------------------------------------------------------------- [Please enter your report here] This may be more appropriate for the ActiveState folks, so I will send this to them as well, when I find an appropriate email address. Running Perl5.005_03, build 517 on a Windows 95 box, I get an error when running the following code: d:\my_perl>perl -Mstrict open FH, "+<file" or die "cannot open file: $!"; truncate FH, 0; close FH; Bareword "FH" not allowed while "strict subs" in use at - line 2. Execution of - aborted due to compilation errors. I don't know what to make of that, other than it being a bug. The code works perfectly fine in Perl 5.005_02 on the Unix box I'm currently on. [Please do not change anything below this line] [Note: had to, perlbug was not working on PC] ----------------------------------------------------------------- --- Summary of my perl5 (5.0 patchlevel 5 subversion 03) configuration: Platform: osname=MSWin32, osvers=4.0, archname=MSWin32-x86-object uname='' hint=recommended, useposix=true, d_sigaction=undef usethreads=undef useperlio=undef d_sfio=undef Compiler: cc='cl.exe', optimize='-Od -MD -DNDEBUG -TP -GX', gccversion= cppflags='-DWIN32' ccflags ='-Od -MD -DNDEBUG -TP -GX -DWIN32 -D_CONSOLE -DNO_STRICT -DHAVE_DES_FCRYPT -DPERL_OBJECT' stdchar='char', d_stdstdio=define, usevfork=false intsize=4, longsize=4, ptrsize=4, doublesize=8 d_longlong=undef, longlongsize=8, d_longdbl=define, longdblsize=10 alignbytes=8, usemymalloc=n, prototype=define Linker and Libraries: ld='link', ldflags ='-nologo -nodefaultlib -release -machine:x86' libpth="d:\usr\lib\core" libs= oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib netapi32.lib uuid.lib wsock32.lib mpr.lib winmm.lib version.lib odbc32.lib odbccp32.lib PerlCRT.lib libc=d:\usr\lib\core\PerlCRT.lib, so=dll, useshrplib=yes, libperl=perlcore.lib Dynamic Linking: dlsrc=dl_win32.xs, dlext=dll, d_dlsymun=undef, ccdlflags=' ' cccdlflags=' ', lddlflags='-dll -nologo -nodefaultlib -release -machine:x86' Characteristics of this binary (from libperl): Locally applied patches: ActivePerl Build 517 Built under MSWin32 Compiled at May 26 1999 21:29:03 @INC: D:/usr/lib D:/usr/site/lib .
not reproducable in AS 613


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

For issues related to this RT instance (aka "perlbug"), please contact perlbug-admin at perl.org