for ( grep defined($_), ( reverse keys %upload )[ $top .. $bottom ] ) {