Lines Matching refs:counter
89 my $counter = 1;
111 $nodename = "node". $counter;
135 if ( $onenode eq "Factories" ) { $oneconfig->{'factoriesnode'} = $counter; }
139 $counter++
146 $nodename = "node". $counter;
165 $counter--; # decreasing the counter, because "Name" and "Title" are no nodes
175 if ( $onenode eq "Factories" ) { $oneconfig->{'factoriesnode'} = $counter; }
180 $oneconfig->{'nodenumber'} = $counter;
633 my $counter = 0;
644 $counter++;
652 $counter++;
660 $counter--;
664 if ($counter > 0)
666 for ( my $j = 0; $j < $counter; $j++ )