RE: renaming files
- From: peng@xxxxxxxxxxxx (Jeff Peng)
- Date: Fri, 30 Jun 2006 16:03:21 +0000
Hello.
Instead of `mv..` system call,you could use perl's inner function 'rename()' to do the things you wanted.
Also use 'File::Find' to do the searching for files.
From: Adriano Allora <all.adr@xxxxxxxxxxxx>
To: beginners@xxxxxxxx
Subject: renaming files
Date: Fri, 30 Jun 2006 16:48:09 +0200
hi to all,
does exists a way to rename automatically files?
I mean: I've got directories with this content:
EN0.tmp
EN1.tmp
EN2.tmp
EN3.tmp
EN4.tmp
...
IT0.tmp
IT1.tmp
IT2.tmp
IT3.tmp
IT4.tmp
...
Now, some couples of files were deleted (you can imagine the EN1.tmp/IT1.tmp) but I need no holes in my list.
Is there something less rude (and more general) than
$c = 0;
while(<>)
{
if($ARGV=~/^([A-Z]+)(\d+)\.tmp/)
{
$nuname = $1.$c.'.tmp';
`mv $ARGV $nuname';
$c++;
}
}
Thanks at all,
alladr
|^|_|^|_|^| |^|_|^|_|^|
| | | |
| | | |
| |*\_/*\_/*\_/*\_/*\_/* | |
| |
| |
| |
| http://www.e-allora.net |
| |
| |
**************************************
--
To unsubscribe, e-mail: beginners-unsubscribe@xxxxxxxx
For additional commands, e-mail: beginners-help@xxxxxxxx
<http://learn.perl.org/> <http://learn.perl.org/first-response>
.
- Prev by Date: Re: "Misses" in a loop
- Next by Date: using MS Excel generated .xml files
- Previous by thread: Re: renaming files
- Next by thread: RE: Crypt::GPG won't decrypt file...rewrote it to use system, but only partially works
- Index(es):
Relevant Pages
|
