Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options
 
PerlMonks  

Re: Rename multiple files following their directories' name

by choroba (Chancellor)
on Mar 19, 2013 at 11:36 UTC ( #1024274=note: print w/replies, xml ) Need Help??


in reply to Rename multiple files following their directories' name

You can probably use a shell for this task:
for folder in folder* ; do [ -f $folder/abc.txt ] && mv $folder/abc.txt $folder/$folder.txt done

In Perl, the solution is quite similar:

for my $folder (glob 'folder*') { # or (grep -d, glob 'folder*') rename "$folder/abc.txt", "$folder/$folder.txt" if -f "$folder/abc +.txt"; }

(Untested)

لսႽ ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1024274]
help
Chatterbox?
[stevieb]: w00t! My Pi software(s) now have their own built-in SPI bus communication methods. About another week and I'll have everything completed!

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (8)
As of 2017-01-20 22:47 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Do you watch meteor showers?




    Results (179 votes). Check out past polls.