[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