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