#!/usr/bin/perl -w
use Counter;
my $x = new Counter( 1 );
my $y = new Counter( 10 );

print $x->getCounter()."\n";
print $y->getCounter()."\n";
print "-------------\n";
$x->incCounter();
print $x->getCounter()."\n";
print $y->getCounter()."\n";