my ( $options, $in, $out, $default, $terminals, $record, %data_hash, $max, @data_list, $i, $result, $fh );
$default = "Histogram";
my ( $options, $in, $out, $default, $terminals, $record, %data_hash, $max, @data_list, $i, $result, $fh );
$default = "Histogram";