<commit_before>#!/usr/bin/env perl

use strict;
use warnings;
use Getopt::Long;

$| = 1;

my $t;
my $x;
my $y;
my $psets;
my $bin_dir;
my $prefix;
my $help;

# get the incoming arguments<commit_msg>Added header documentation to perl script<commit_after>#!/usr/bin/env perl
#------------------------------------------------------------------------------
# Author: <NAME>
# Instituation:  Feltus Lab, Clemson University
# Date:  May 15, 2012
#
# This script reads a binary correlation file generated by the RMTGeneNet 
# package and can generate a network file given a threshold value. It can
# also be used to investiage correlation values of specific elments.
#
# Usage: see the help documentation for usage instructions:  
#
#    parse_pearson_bin.pl --help
#
#------------------------------------------------------------------------------

use strict;
use warnings;
use Getopt::Long;

$| = 1;

my $t;
my $x;
my $y;
my $psets;
my $bin_dir;
my $prefix;
my $help;

# get the incoming arguments
{'fraction_non_alphanumeric': 0.25, 'fraction_numerical': 0.008064516129032258, 'mean_word_length': 2.142405063291139, 'pattern_counts': {'":': 0, '<': 4, '<?xml version=': 0, '>': 4, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '4113891', 'n_tokens_mistral': 313, 'n_tokens_neox': 298, 'n_words': 113}