@list = (@list, bsd_glob ("$DIR/*XYZ", GLOB_QUOTE )); ...
push @list, bsd_glob ("$DIR/*XYZ", GLOB_QUOTE ));