1 files changed, 0 insertions, 31 deletions
diff --git a/Tools/schnitt/cutall3.pl b/Tools/schnitt/cutall3.pl
deleted file mode 100755
index 6961666..0000000
--- a/Tools/schnitt/cutall3.pl
+++ /dev/null
@@ -1,31 +0,0 @@
-#!/usr/bin/perl
-
-open (FI,"cut") or die "Kann Cut-Datei nicht oeffnen\n";
-
-outer: while (<FI>)
-  {
-    chomp;
-    if (! ($_ > 1 || $_ eq "0"))
-      {
-	open (FO,">cut2");
-	print FO "$_\n";
-	while (<FI>)
-	  {
-	    chomp;
-	    if ($_ > 1 || $_ eq "0")
-	      {
-		print FO "$_\n";
-	      }
-	    else
-	      {
-		system ("cutt");
-		redo outer;
-	      }
-	  }
-      }
-  }
-if ( -f "cut2")
-  {
-    system ("cutt");
-    unlink "cut2";
-  }