Miten saan muutettua tiedoston nimet Windowssin Perlillä?
Isot pieniksi ja välilyönnit pois aluksi.
Yksi malli:
perl -e 'for (@ARGV) { ($new=$_) =~ s/(. )(.)\.html$/$1$2.shtml/; rename $_, $new unless -e $new }' *.html
perl tiedoston nimen muuttaminen
1
634
Vastaukset
- Anonyymi
Tässä on yksinkertainen Perl-skripti, joka muuttaa tiedostojen nimet Windowsissa niin, että isot kirjaimet muutetaan pieniksi ja välilyönnit poistetaan alusta:
use File::Copy;
my $dir = "polku_hakemistoon";
opendir(DIR, $dir) or die "Cannot open directory: $!";
while (my $file = readdir(DIR)) {
next if ($file eq '.' or $file eq '..');
my $new_name = lc($file); # Muutetaan isot pieniksi
$new_name =~ s/^\s+//; # Poistetaan välilyönnit alusta
rename("$dir/$file", "$dir/$new_name") or die "Cannot rename file: $!";
}
closedir(DIR);
Muista vaihtaa polku_hakemistoon oikeaksi poluksi hakemistoon, jonka tiedostojen nimet haluat muuttaa. Tätä skriptiä voi ajaa komentokehotteessa tai Perl-skriptin suoritusympäristössä.
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Tukalaa kuumuutta
Tietäisitpä vaan kuinka kuumana olen käynyt viime päivät. Eikä johdu helteestä, vaan sinusta. Mitäköhän taikoja olet teh412365Mansikkatiloilla hyväksikäytetään ukrainalaisia
Työolot ovat surkeita ja palkka kelvoton. https://yle.fi/a/74-201729423001951- 201760
- 241575
Okei, myönnetään,
Oisit sä saanut ottaa ne housutkin pois, mutta ehkä joskus jossain toisaalla. 😘231414- 1001299
- 411272
En ymmärrä käytöstäsi
Se on ollut eräänlaista hyväksikäyttöä. Että seura kyllä kelpaa palstan välityksellä silloin kun ei ole parempaakaan tek1391245- 351002
Ensi kesänä
Näin kesän viimeisenä minuutteina ajattelen sinua. Olisiko seuraava kesä "meidän" kesä? Tänä vuonna ei onnistuttu, mutta33983