Help for this page
package Counter; use strict; ... } 1;
#!/usr/bin/perl -w use strict; ... print $counter->value, "\n"; $counter->value(3); print $counter->value, "\n";