use vars qw($counter);
$counter = 0;