#!/usr/bin/perl -w
use strict;

BEGIN {
    unshift @INC, '.'; # add current directory to include path
    use Counter;
}

my $counter = Counter->new;

print $counter->value, "\n";
$counter->increment_value;
print $counter->value, "\n";
$counter->decrement_value;
print $counter->value, "\n";
$counter->value(3);
print $counter->value, "\n";