summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/texlive/texlive-en/archive/split.pl
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2013-04-07 18:26:53 +0000
committerKarl Berry <karl@freefriends.org>2013-04-07 18:26:53 +0000
commitb04c2e1a42573e9735547702356c7b9a769a6855 (patch)
treec0753443f39500a062d7698fe6b94359c813f871 /Master/texmf-dist/doc/texlive/texlive-en/archive/split.pl
parentfb0bf13304a356f197bfc1add17f98c07e96f17b (diff)
texmf -> texmf-dist: doc
git-svn-id: svn://tug.org/texlive/trunk@29714 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/doc/texlive/texlive-en/archive/split.pl')
-rw-r--r--Master/texmf-dist/doc/texlive/texlive-en/archive/split.pl16
1 files changed, 16 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/texlive/texlive-en/archive/split.pl b/Master/texmf-dist/doc/texlive/texlive-en/archive/split.pl
new file mode 100644
index 00000000000..bca00584335
--- /dev/null
+++ b/Master/texmf-dist/doc/texlive/texlive-en/archive/split.pl
@@ -0,0 +1,16 @@
+#@TeXIndex{a0poster,
+open TMP, ">/dev/null";
+while (<>) {
+ chop;
+ if (/\@TeXIndex/) {
+ print TMP "\n";
+ close TMP;
+ $keep=$_;
+ s/\@TeXIndex{(.*),.*/$1/;
+ print "[$_]\n";
+ open TMP, ">$_.bib";
+ print TMP "$keep\n";
+ }
+ else { print TMP "$_\n" ; }
+
+}