From 2506e775f747c72faccf63fdbd3800945f5f841a Mon Sep 17 00:00:00 2001
From: Ole Tange <ole@tange.dk>
Date: Sun, 18 Dec 2011 17:10:26 +0100
Subject: [PATCH] parallel: Hans gets Undefined subroutine &Data::Dump::dump at
 1949. Eval a dummy sub.

---
 doc/release_new_version | 4 ++--
 src/parallel            | 5 ++++-
 src/parallel.pod        | 3 +++
 3 files changed, 9 insertions(+), 3 deletions(-)

diff --git a/doc/release_new_version b/doc/release_new_version
index 0a34d1eb..b887e29d 100644
--- a/doc/release_new_version
+++ b/doc/release_new_version
@@ -182,9 +182,9 @@ cc:Sandro Cazzaniga <kharec@mandriva.org>,
    Ryoichiro Suzuki <ryoichiro.suzuki@gmail.com>, Jesse Alama
    <jesse.alama@gmail.com>
 
-Subject: GNU Parallel 20111222 ('?') released
+Subject: GNU Parallel 20111222 ('Hitchens') released
 
-GNU Parallel 20111122 ('?') has been released. It is
+GNU Parallel 20111122 ('Hitchens') has been released. It is
 available for download at: http://ftp.gnu.org/gnu/parallel/
 
 This is a bugfix release with no new features. Probably a good release
diff --git a/src/parallel b/src/parallel
index 6ddc40a9..ffc4bac8 100755
--- a/src/parallel
+++ b/src/parallel
@@ -505,7 +505,7 @@ sub get_options_from_array {
 sub parse_options {
     # Returns: N/A
     # Defaults:
-    $Global::version = 20111209;
+    $Global::version = 20111218;
     $Global::progname = 'parallel';
     $Global::infinity = 2**31;
     $Global::debug = 0;
@@ -1945,6 +1945,9 @@ sub my_dump {
             return Dumper(@dump_this);
         }
     } else {
+	# Create a dummy Data::Dump:dump as Hans Schou sometimes has
+	# it undefined
+	eval "sub Data::Dump:dump {}";
         eval "use Data::Dump qw(dump);";
         return (Data::Dump::dump(@dump_this));
     }
diff --git a/src/parallel.pod b/src/parallel.pod
index f9f41ab6..fa9d5deb 100644
--- a/src/parallel.pod
+++ b/src/parallel.pod
@@ -1526,6 +1526,9 @@ symlinks are empty files.
 
 B<cp -rs /the/source/dir mirror_dir; find mirror_dir -type l | parallel -m rm {} '&&' touch {}>
 
+Find the files in a list that do no exist.
+
+B<cat file_list | parallel 'if [ ! -e {} ] ; then echo {}; fi'>
 
 =head1 EXAMPLE: Removing file extension when processing files