#!/usr/bin/perl -w
#
# extractbbh.pl
# (C) R. Harlander, May 19, 2011
#
# Example for using slharoutines
# (http://www.robert-harlander.de/software/slharoutines):
# reads the data from the output files generated by running
# the script runbbh.pl
# (see http://www.robert-harlander.de/software/bbh@nnlo/scripts/runbbh.pl).
#
# Usage: copy this file to the directory bbh@nnlo/scripts 
# (create it if it does not exist yet), then
# $ cd bbh@nnlo/data/run142
# $ ../../scripts/runbbh.pl order.0
# etc.
#
#------------------------------------------------------------------------
# put the path of slharoutines.pm here:
use lib $ENV{'HOME'}."/perl/modules";
use slharoutines;

$dataform = [ [( "MASS", 25)], [ ("HNNLOSIGMA",1) ] ];

$dir = $ARGV[0];
extractslha($dir,$dataform,"nocomments");

#EOF
