Select Code to Download

$report = (sort glob "$path/*B1006*")[-1];

chomp($report = `ls $path/*B1006* |tail -n 1`);