my $uploads = getfiles();

for my $uploaded_file (@$uploads) {
    print "Filename: $uploaded_file\n";
} 

##</code><code>##

    ...snip...
    return @uploads;
}

my @uploads = getfiles()