grep {-f} map {...} @list;

##</code><code>##

my @files = grep {-f} map {glob "$_/*vp.o$id"} qw/ archiv/;