misc/eset/run.pl

   1 #!/usr/bin/env perl
   2
   3 my ($dataset, $outdir, $prepared);
   4 $dataset='set_small.dat.bz2';
   5 $dataset='set_large.dat.bz2';
   6
   7 $outdir='/tmp/eset';
   8 $prepared="$outdir/test";
   9
  10 print "preparing...\n";
  11 system("mkdir -p $outdir");
  12 system("bzip2 -dc '$dataset' | cut -d ' ' -f 2- | sort -u > '$prepared'");
  13 print "running...\n";
  14