#!/usr/bin/perl -w
use strict;
use FileHandle;

my $localdir="C:\\PROJECTS\\";

my $id="LWX1";
opendir LOCALDIR, "$localdir";
my @local_files = grep /^$id/i, readdir LOCALDIR;
###my guess fr both would be this: (doesn't work)
###where "_arbv_" is the 2nd string that must be matched
#my @local_files = grep /^$id&&_arbv_/i, readdir LOCALDIR;
closedir LOCALDIR;

##determine which files to download
    foreach my $local (@local_files)
    {
        
        print "$local\n";
    
    }