#!/usr/bin/perl -w
use strict;
use vars '$HISTOGRAM_DEBUG';

require 'histogram.pl';

$HISTOGRAM_DEBUG = 1;

print histogram(1,4,2,8,5,7);

