Code: Select all
setting "BackgroundFileOps", 0;
$l_months = "Jan|Feb|Mar|Apr|May|Jun|Jul|Aug|Sep|Oct|Nov|Dec";
foreach ($filename, "<get SelectedItemsNames |>") {
$i=1;
$newName = "";
foreach ($month, $l_months) {
if (regexmatches($filename, "\b$month[a-z]+\b")) {
$newName = regexreplace(regexreplace($filename, "\b".$month."[a-z]+\b (\d\d*), (\d{4})", "$2.".$i.".$1"), "\b(\d)\b", "0$1");
break;
}
$i++;
}
if ($newName) { renameitem($newName, $filename); }
}
XYplorer Beta Club