diff --git a/perl-5.12.2.dif b/perl-5.12.1.dif
similarity index 100%
rename from perl-5.12.2.dif
rename to perl-5.12.1.dif
diff --git a/perl-5.12.1.tar.bz2 b/perl-5.12.1.tar.bz2
new file mode 100644
index 0000000..330faed
--- /dev/null
+++ b/perl-5.12.1.tar.bz2
@@ -0,0 +1,3 @@
+version https://git-lfs.github.com/spec/v1
+oid sha256:e9189f09447b2b90a1d186b418f91e583eba41eec238e8f5b8730f71d5fc1ec5
+size 12296076
diff --git a/perl-5.12.2.tar.bz2 b/perl-5.12.2.tar.bz2
deleted file mode 100644
index 23e5578..0000000
--- a/perl-5.12.2.tar.bz2
+++ /dev/null
@@ -1,3 +0,0 @@
-version https://git-lfs.github.com/spec/v1
-oid sha256:a999e0a0312fe20410a62d52fe5a290bb92e1c9bebf35f0d29c3293ded9628da
-size 12349312
diff --git a/perl-fix_dbmclose_call.patch b/perl-fix_dbmclose_call.patch
new file mode 100644
index 0000000..40eae87
--- /dev/null
+++ b/perl-fix_dbmclose_call.patch
@@ -0,0 +1,11 @@
+--- ext/ODBM_File/ODBM_File.xs
++++ ext/ODBM_File/ODBM_File.xs
+@@ -121,7 +121,7 @@
+ 	dMY_CXT;
+ 	CODE:
+ 	dbmrefcnt--;
+-	dbmclose();
++	dbmclose(db);
+ 	safefree(db);
+ 
+ datum_value
diff --git a/perl.changes b/perl.changes
index e1ec787..47098c7 100644
--- a/perl.changes
+++ b/perl.changes
@@ -1,10 +1,3 @@
--------------------------------------------------------------------
-Mon Sep 27 09:48:57 UTC 2010 - coolo@novell.com
-
-- update to perl-5.12.2
-  This release contains minor bug fixes and updates of several 
-  core modules, as well as minor documentation updates.
-
 -------------------------------------------------------------------
 Wed Jul 28 11:45:46 CEST 2010 - mls@suse.de
 
diff --git a/perl.spec b/perl.spec
index d0b8b78..860f357 100644
--- a/perl.spec
+++ b/perl.spec
@@ -20,20 +20,21 @@
 
 Name:           perl
 Summary:        The Perl interpreter
-Version:        5.12.2
+Version:        5.12.1
 Release:        4
-%define pversion 5.12.2
+%define pversion 5.12.1
 License:        Artistic License .. ; GPLv2+
 Group:          Development/Languages/Perl
 AutoReqProv:    on
 Url:            http://www.perl.org/
-Source:         perl-5.12.2.tar.bz2
+Source:         perl-5.12.1.tar.bz2
 Source1:        %name-rpmlintrc
 Source2:        macros.perl
 Source3:        README.macros
 Source4:        baselibs.conf
 Patch0:         perl-%{pversion}.dif
 Patch1:         perl-gracefull-net-ftp.diff
+Patch2:         perl-fix_dbmclose_call.patch
 Patch3:         perl-regexp-refoverflow.diff
 Patch4:         perl-nroff.diff
 Patch5:         perl-netcmdutf8.diff
@@ -84,6 +85,12 @@ than beautiful (tiny, elegant, and minimal).
 Some of the modules available on CPAN can be found in the "perl"
 series.
 
+
+
+Authors:
+--------
+    Larry Wall, Louis J. LaBash, Jr. <llabash@siue.edu>
+
 %package base
 License:        Artistic License .. ; GPLv2+
 Group:          Development/Languages/Perl
@@ -111,6 +118,12 @@ rather than beautiful (tiny, elegant, and minimal).
 This package contains only some basic modules and the perl binary
 itself.
 
+
+
+Authors:
+--------
+    Larry Wall, Louis J. LaBash, Jr. <llabash@siue.edu>
+
 %package doc
 License:        Artistic License .. ; GPLv2+
 Group:          Development/Languages/Perl
@@ -124,11 +137,18 @@ BuildArch:      noarch
 %description doc
 Perl man pages and pod files.
 
+
+
+Authors:
+--------
+    Larry Wall, Louis J. LaBash, Jr. <llabash@siue.edu>
+
 %prep
-%setup -q -n perl-5.12.2
+%setup -q -n perl-5.12.1
 cp -p %{S:3} .
 %patch0
 %patch1
+%patch2
 %patch3
 %patch4
 %patch5