This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Update AnyDBM_File's documentation to avoid use POSIX;
authorNicholas Clark <nick@ccl4.org>
Thu, 1 Sep 2011 20:49:42 +0000 (22:49 +0200)
committerNicholas Clark <nick@ccl4.org>
Thu, 1 Sep 2011 20:51:56 +0000 (22:51 +0200)
use Fcntl; is a much more efficient way to load the two constants needed.
Bring the joy of strict (and warnings) to AnyDBM_File, remove commented-out
code, and add __END__ to make it clear that there is no more code hiding
beyond the pod.

lib/AnyDBM_File.pm
pod/perldelta.pod

index d73abab..4153af2 100644 (file)
@@ -1,7 +1,9 @@
 package AnyDBM_File;
+use warnings;
+use strict;
 
 use 5.006_001;
-our $VERSION = '1.00';
+our $VERSION = '1.01';
 our @ISA = qw(NDBM_File DB_File GDBM_File SDBM_File ODBM_File) unless @ISA;
 
 my $mod;
@@ -13,7 +15,8 @@ for $mod (@ISA) {
 }
 
 die "No DBM package was successfully found or installed";
-#return 0;
+
+__END__
 
 =head1 NAME
 
@@ -39,7 +42,7 @@ can still do so, but new ones can reorder @ISA:
 
 Having multiple DBM implementations makes it trivial to copy database formats:
 
-    use POSIX; use NDBM_File; use DB_File;
+    use Fcntl; use NDBM_File; use DB_File;
     tie %newhash,  'DB_File', $new_filename, O_CREAT|O_RDWR;
     tie %oldhash,  'NDBM_File', $old_filename, 1, 0;
     %newhash = %oldhash;
index df95e55..502f564 100644 (file)
@@ -119,6 +119,12 @@ XXX
 
 =item *
 
+L<AnyDBM_File> has been upgraded from version 1.00 to version 1.01.
+
+This is only a minor documentation update.
+
+=item *
+
 L<Archive::Extract> has been upgraded from version 0.52 to version 0.56.
 
 Resolved an issue where C<unzip> executable was present in C<PATH> on MSWin32