my $lastval = $holder[$#holder];
    @holder = (1 .. $lastval); 

##</code><code>##

 	$num_of_elements = scalar @holder;

	@holder = (1 .. $num_of_elements);