($day) = $zipfile =~ /[AB]FILE_(\d+)/;