From ced1ffcebee246fd51572566f1b4f08e6b981c23 Mon Sep 17 00:00:00 2001 From: Mystery Man Date: Wed, 15 Jun 2005 10:21:34 +0000 Subject: This commit was manufactured by cvs2svn to create tag 'V10_3_0_24mdk'. --- tools/gencompss | 14 -------------- 1 file changed, 14 deletions(-) delete mode 100755 tools/gencompss (limited to 'tools/gencompss') diff --git a/tools/gencompss b/tools/gencompss deleted file mode 100755 index b12328e49..000000000 --- a/tools/gencompss +++ /dev/null @@ -1,14 +0,0 @@ -#!/usr/bin/perl - -open F, "packdrake -c @ARGV | hdlist2groups - |"; -foreach () { - chop; - /(.*):(.*)/; - $l{$2}{$1} = undef; -} -close F or die; -foreach (sort keys %l) { - print "$_\n"; - print "\t$_\n" foreach sort keys %{$l{$_}}; - print "\n"; -} -- cgit v1.2.1