my $dir = "c:\\temp";
my @files = <$dir\\xxxx*.*>;