Help for this page
my @files = glob {"archiv/*vp.o$id"};
/tmp>touch foo.txt /tmp>mkdir bar.txt ... /tmp>perl -E 'say for grep -f,glob "*.txt"' foo.txt /tmp>