$bcsdir = (glob "$bcsdir*")[0];