while (defined ($Variable = <$Path{Directory}\\*$FileExtension{TestFile}>))