I need a perl script that renames files in subdirectories. This is what my scenerio is and what i need.
I have a top folder called images and in that are 300 subflolders
all labeled with numbers like (tr423, tr424), and inside each folder is another folder called "samples" and in that folder are jpgs with titles like [url removed, login to view] [url removed, login to view]
I need a script that will see the subfolders name (tr423) and go into its subfolder "samples" and rename all jpgs in that folder to
match the first subfolder name of tr423.
It should automatically see all folders and images on its own. there are more folders in the same directories as the samples folders, so if you can please ignore all else.
So the images should have been renamed to the LEFT of the "-"
so [url removed, login to view] should now be [url removed, login to view] and [url removed, login to view] would be [url removed, login to view]
If you understand this and can do this for me fairly quick please reply. This site only allows bids of $30 and up, i want to pay less than this, this is a easy script i just cant remember how to make it.