for my $count (reverse 1..$max){