From 7640d85b92f61016e0712825920c6a259329d79b Mon Sep 17 00:00:00 2001
From: Chris Dyer <cdyer@cs.cmu.edu>
Date: Sun, 18 Nov 2012 11:31:21 -0500
Subject: more consistent naming, interface, fix compile error

---
 pro-train/mr_pro_generate_mapper_input.pl | 18 ------------------
 1 file changed, 18 deletions(-)
 delete mode 100755 pro-train/mr_pro_generate_mapper_input.pl

(limited to 'pro-train/mr_pro_generate_mapper_input.pl')

diff --git a/pro-train/mr_pro_generate_mapper_input.pl b/pro-train/mr_pro_generate_mapper_input.pl
deleted file mode 100755
index b30fc4fd..00000000
--- a/pro-train/mr_pro_generate_mapper_input.pl
+++ /dev/null
@@ -1,18 +0,0 @@
-#!/usr/bin/perl -w
-use strict;
-
-die "Usage: $0 HG_DIR\n" unless scalar @ARGV == 1;
-my $d = shift @ARGV;
-die "Can't find directory $d" unless -d $d;
-
-opendir(DIR, $d) or die "Can't read $d: $!";
-my @hgs = grep { /\.gz$/ } readdir(DIR);
-closedir DIR;
-
-for my $hg (@hgs) {
-  my $file = $hg;
-  my $id = $hg;
-  $id =~ s/(\.json)?\.gz//;
-  print "$d/$file $id\n";
-}
-
-- 
cgit v1.2.3