[mdk-re] Помогите с рег выражением....
Sergei
=?iso-8859-1?q?serpiph_=CE=C1_pochtamt=2Eru?=
Чт Янв 17 20:46:00 MSK 2002
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
Ну, на PERL прога выглядит так (все файлы превращает в конечный вид
независимо от начального вида):
#!/usr/bin/perl
open (LIST,"ls -1A|");
while ($file=<LIST>)
{
chomp $file;
next if ($file=~/^\.\.?$/);
$file1="\L\u$file";
print "$file -> $file1\n";# можно выкинуть
rename $file,$file1;
}
close (LIST);
- --
С уважением, Епифанов Сергей.
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.0.6 (GNU/Linux)
Comment: For info see http://www.gnupg.org
iD8DBQE8RxAd4ZpgWiwK7D8RApT5AJ4hXFa5XmoDEFtLvcZlLDCPR4ZmlgCfYhS8
nojh0yCZFsjePF43SIElj8E=
=b3X4
-----END PGP SIGNATURE-----
Подробная информация о списке рассылки community