//Valitse objektien nimi ja muista lainausmerkit! string $NewName = "Jalusta_risti"; //--------Älä Koske!--------------------------------------- string $Named [] = `ls -sl`; for ($myNode in $Named) { select $myNode; rename $NewName; };
window -title "Rename objects" -rtf true RenamerWindow; columnLayout; textField -label "New name" -field true "NewName"; button -label "Rename" -c "Renamer"; showWindow RenamerWindow; proc Renamer () { string $NewName = `textField -q -value "NewName"` string $Named [] = `ls -sl`; for ($myNode in $Named) { select $myNode; rename $NewName; } }