summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/mycv/mycv_split_contents.pl
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/latex/mycv/mycv_split_contents.pl')
-rw-r--r--Master/texmf-dist/doc/latex/mycv/mycv_split_contents.pl12
1 files changed, 3 insertions, 9 deletions
diff --git a/Master/texmf-dist/doc/latex/mycv/mycv_split_contents.pl b/Master/texmf-dist/doc/latex/mycv/mycv_split_contents.pl
index 58f335043a9..1fc172764dc 100644
--- a/Master/texmf-dist/doc/latex/mycv/mycv_split_contents.pl
+++ b/Master/texmf-dist/doc/latex/mycv/mycv_split_contents.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl
# -------------------------------------------------------
# Copyright 2012 Ghersi Andrea (ghanhawk@gmail.com).
@@ -8,7 +8,7 @@
# 1.3c, available at 'http://www.latex-project.org/lppl'.
# -------------------------------------------------------
-# $Id: mycv_split_contents.pl 83 2012-05-10 17:21:40Z ghangenit $
+# $Id: mycv_split_contents.pl 89 2012-05-19 18:23:03Z ghangenit $
use Getopt::Long;
use File::Path;
@@ -36,7 +36,6 @@ my $infile = 'cv_contents.tex'; # default input file
my $cwd = getcwd(); # current directory
my %opt = (); # hash for options
-
###
###
@@ -80,13 +79,11 @@ EOF
exit 0;
}
-
###
###
sub mcdie { printf STDERR @_, $!; exit 1; }
-
###
###
@@ -105,7 +102,6 @@ sub processCommandLine()
return \%opt;
}
-
###
###
@@ -122,7 +118,6 @@ sub _dealWithInOutFiles
$opt{infile} = $infile;
}
-
###
###
@@ -207,9 +202,8 @@ sub fileprocess ($)
}
}
-
##
## MAIN
##
-fileprocess( processCommandLine() ); \ No newline at end of file
+fileprocess( processCommandLine() );