$StartDirectory='\cr1_qc\Harness\MyTextFiles'; @files = `ls -l $StartDirectory\\0*.txt` ; foreach $file (@files) { print "$file\n"; }