diff --git a/splitCNV b/splitCNV
deleted file mode 100755
--- a/splitCNV
+++ /dev/null
@@ -1,48 +0,0 @@
-#!/usr/bin/perl
-#======================================================================
-#                    S P L I T C N V 
-#                    doc: Mon Oct 25 22:24:21 2010
-#                    dlm: Fri Oct 29 20:04:42 2010
-#                    (c) 2010 A.M. Thurnherr
-#                    uE-Info: 16 29 NIL 0 0 72 2 2 4 NIL ofnI
-#======================================================================
-
-# split SeaBird CNV file using scan values found with yoyo
-#	e.g. splitCNV P403_015_1sec.cnv `importCNV -s P403_015_1sec.cnv | yoyo -QFscan -ut`
-
-# HISTORY:
-#	Oct 25, 2010: - created
-#	Oct 26, 2010: - BUG: *.00 file always only contained the 1st record
-#	Oct 29, 2010: - cosmetics
-
-# scan number must be the first field of each record
-
-die("Usage: $0 <CNV-file> <val> [...]\n")
-	unless (@ARGV >= 2 && -f $ARGV[0]);
-
-chomp($basename = `basename $ARGV[0] .cnv`);
-
-$state = 0;								# init finite state machine
-$next = 0;								# next extension number
-$trg = 2;								# NB: yoyo -ut includes first & last scans
-
-open(IN,$ARGV[0]);
-while (<IN>) {
-	if ($state == 0) {					# state 0: reading header
-		push(@HDR,$_);
-		$state = 1 if /^\*END\*/;
-		next;
-	}
-	if ($state == 1) {					# state 1: begin new file
-		close(OUT);
-		printf(STDERR "writing $basename.%02d\n",$next);
-		open(OUT,sprintf(">$basename.%02d",$next++));
-		foreach my $h (@HDR) { print(OUT $h); }
-		$state = 2;
-	}
-	if ($state == 2) {					# state 2: copy data until target scan
-		print(OUT);
-		my(@f) = split;
-		$trg++,$state=1 if ($f[0] == $ARGV[$trg]);
-	}
-}