for ($format) {
    s/%Y/$year/g;
    s/%m/$month/g;
    ...
}