use strict;
use warnings;
my $ram;
open RAM, '>', \$ram;
seek RAM, 10, 0;
print RAM ' ';
warn length $ram;;
undef $ram;
open RAM, '>', \$ram;
binmode RAM, ':raw' or warn $!;
seek RAM, 10, 0;
print RAM ' ';
warn length $ram;;
undef $ram;
open RAM, '>:raw', \$ram;
seek RAM, 10, 0;
print RAM ' ';
warn length $ram;
warn `$^X -v`;
__END__
C:\dev\loose>perl5.8.0 open.ram.raw.bk.pl
11 at open.ram.raw.bk.pl line 9.
11 at open.ram.raw.bk.pl line 16.
Use of uninitialized value in length at open.ram.raw.bk.pl line 22.
0 at open.ram.raw.bk.pl line 22.
This is perl, v5.8.0 built for MSWin32-x86-multi-thread
Copyright 1987-2002, Larry Wall
Perl may be copied only under the terms of either the Artistic License
+ or the
GNU General Public License, which may be found in the Perl 5 source ki
+t.
Complete documentation for Perl, including FAQ lists, should be found
+on
this system using `man perl' or `perldoc perl'. If you have access to
+ the
Internet, point your browser at http://www.perl.com/, the Perl Home Pa
+ge.
C:\dev\loose>perl5.8.4 open.ram.raw.bk.pl
11 at open.ram.raw.bk.pl line 9.
Use of uninitialized value in open at open.ram.raw.bk.pl line 12.
11 at open.ram.raw.bk.pl line 16.
Use of uninitialized value in length at open.ram.raw.bk.pl line 22.
0 at open.ram.raw.bk.pl line 22.
This is perl, v5.8.4 built for MSWin32-x86-multi-thread
(with 3 registered patches, see perl -V for more detail)
Copyright 1987-2004, Larry Wall
Binary build 810 based on sources provided by
ActiveState Corp. http://www.ActiveState.com
ActiveState is a division of Sophos.
Built Jun 17 2004 21:47:33
Perl may be copied only under the terms of either the Artistic License
+ or the
GNU General Public License, which may be found in the Perl 5 source ki
+t.
Complete documentation for Perl, including FAQ lists, should be found
+on
this system using `man perl' or `perldoc perl'. If you have access to
+ the
Internet, point your browser at http://www.perl.com/, the Perl Home Pa
+ge.
C:\dev\loose>perl5.8.6d open.ram.raw.bk.pl
11 at open.ram.raw.bk.pl line 9.
Use of uninitialized value in open at open.ram.raw.bk.pl line 12.
11 at open.ram.raw.bk.pl line 16.
Use of uninitialized value in length at open.ram.raw.bk.pl line 22.
0 at open.ram.raw.bk.pl line 22.
This is perl, v5.8.6 built for MSWin32-x86-multi-thread
Copyright 1987-2004, Larry Wall
Perl may be copied only under the terms of either the Artistic License
+ or the
GNU General Public License, which may be found in the Perl 5 source ki
+t.
Complete documentation for Perl, including FAQ lists, should be found
+on
this system using `man perl' or `perldoc perl'. If you have access to
+ the
Internet, point your browser at http://www.perl.org/, the Perl Home Pa
+ge.
C:\dev\loose>perl5.8.7 open.ram.raw.bk.pl
11 at open.ram.raw.bk.pl line 9.
Use of uninitialized value in open at open.ram.raw.bk.pl line 12.
11 at open.ram.raw.bk.pl line 16.
Use of uninitialized value in length at open.ram.raw.bk.pl line 22.
0 at open.ram.raw.bk.pl line 22.
This is perl, v5.8.7 built for MSWin32-x86-multi-thread
Copyright 1987-2005, Larry Wall
Perl may be copied only under the terms of either the Artistic License
+ or the
GNU General Public License, which may be found in the Perl 5 source ki
+t.
Complete documentation for Perl, including FAQ lists, should be found
+on
this system using `man perl' or `perldoc perl'. If you have access to
+ the
Internet, point your browser at http://www.perl.org/, the Perl Home Pa
+ge.
C:\dev\loose>