1 files changed, 0 insertions, 32 deletions
diff --git a/msdos/eg/crlf.bat b/msdos/eg/crlf.bat
deleted file mode 100644
index 24d73661b9..0000000000
--- a/msdos/eg/crlf.bat
+++ /dev/null
@@ -1,32 +0,0 @@
-@REM=("
-@perl %0.bat %1 %2 %3 %4 %5 %6 %7 %8 %9
-@end ") if 0 ;
-
-# Convert all the files in the current directory from unix to MS-DOS
-# line ending conventions.
-#
-# By Diomidis Spinellis
-#
-open(FILES, 'find . -print |');
-while ($file = <FILES>) {
-	$file =^ s/[\n\r]//;
-	if (-f $file) {
-		if (-B $file) {
-			print STDERR "Skipping binary file $file\n";
-			next;
-		}
-		($dev, $ino, $mode, $nlink, $uid, $gid, $rdev, $size, $atime, $mtime, $ctime,
- $blksize, $blocks) = stat($file);
-		open(IFILE, "$file");
-		open(OFILE, ">xl$$");
-		while (<IFILE>) {
-			print OFILE;
-		}
-		close(OFILE) || die "close xl$$: $!\n";
-		close(IFILE) || die "close $file: $!\n";
-		unlink($file) || die "unlink $file: $!\n";
-		rename("xl$$", $file) || die "rename(xl$$, $file): $!\n";
-		chmod($mode, $file) || die "chmod($mode, $file: $!\n";
-		utime($atime, $mtime, $file) || die "utime($atime, $mtime, $file): $!\n";
-	}
-}