Looking for a script to automate renaming layer objects, not the layer itself!

Question

Hey there everyone,
I was wondering if there is a possibility to create/have a script for an automated renaming of several named layer objects in Indesign (CS6).
The situation, I'm facing is a document for a templating process with at least 80 layers and sometimes some special elements on each layer. The naming of the layers is kind of repeating for each page that is used. The only difference is some prefix change in the layer name and/or the name of an element itself. My problem is, that I need to rename most of those layers AND elements in a same way and I'm looking for a script that asks me for the name of a layer or element (perfect would be just a part of the name to have multiple steps at once) and I have the chance to type in the desired value. It affects frames, graphical elements and text boxes.
If anyone has an idea, how to simplify this process I would be very glad to get some informations or advices.
Thanks in advance
Ralf

Answer 1

Here is a more descriptive version of the script above... :)
# Change "PSDrive" to PS1: (Sitecode)
CD PS1:
# Get all CMPackages to $CMPackages_All Variable
$CMPackages_All = Get-CMPackage
# Set the DP to use with. You may need to run it again with other DP just in case some Packages are missing...
$DPName_FQDN = "YourDP.Contoso.com" # Your FQDN DP name to reference from.
# Set folder to store *.pkgx files
$FilePath = "E:\_ESD\Prestage\" # FilePath
# For all CMPackages
foreach ($obj in $CMPackages_All) {
    $packageType = $obj.PackageType
    $packageID = $obj.PackageID
    $packageVendor = $obj.Manufacturer
    $packageName = $obj.Name
    $packageVersion = $obj.Version
    # Formulate File name based on Vendor Name, version and PackageID
 $FileName = $FilePath + $packageVendor + "_" + $PackageName + "_" + $packageVersion + "_" + $packageID + ".pkgx"
    # Replace space with underscore
    $FileName = $FileName.Replace(" ","_")
    if ($PackageType -eq 0) {
        if (!( Test-Path $FileName)) { # This makes the package to skip if it is already created.
            Write-host "Publishing CMPrestage Content for $PackageID $PackageName to $FileName via $DPName_FQDN ..."
            Publish-CMPrestageContent -PackageID $packageID -DistributionPointName $DPName_FQDN -fileName $FileName -ErrorAction Continue
YPae