if ($page < 1) { for ( grep defined($_), ( reverse keys %upload )[ -19 .. 0 ] ) { } elsif ($page eq 2) { my $top = ($page * 20); my $bottom = $top - 19; } else ($page > 2) { my $top = $page * 20; my $bottom = $top - 19; }