* Add return to perl script template to minimize changes

diff --git a/templates/perl_script b/templates/perl_script
index 412a386e522eb1c0d728683eea8ef0da093a322d..6331c1d27ad6e9299624bfc1c43cc76f0ea9582a 100755 (executable)
--- a/templates/perl_script
+++ b/templates/perl_script
@@ -56,7 +56,8 @@ my %options = (debug           => 0,
               man             => 0,
               );
 
-GetOptions(\%options,'debug|d+','help|h|?','man|m');
+GetOptions(\%options,
+          'debug|d+','help|h|?','man|m');
 
 pod2usage() if $options{help};
 pod2usage({verbose=>2}) if $options{man};