From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <serpiph@pochtamt.ru>
Content-Type: text/plain;
  charset="koi8-r"
From: Sergei <serpiph@pochtamt.ru>
To: mandrake-russian@altlinux.ru
Subject: Re: [mdk-re] =?koi8-r?b?8M/Nz8fJ1MUg0yDSxcc=?= =?koi8-r?b?INfZ0sHWxc7Jxc0uLi4u?=
X-Mailer: KMail [version 1.3.2]
References: <20020117200435.327be1f3.kosha@kp.ru> <20020117173459.C4C69302A54@pif.b5.mephi.ru> <20020117204108.778b8c84.kosha@kp.ru>
In-Reply-To: <20020117204108.778b8c84.kosha@kp.ru>
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
Message-Id: <20020117175542.341C8302A6D@pif.b5.mephi.ru>
Sender: mandrake-russian-admin@altlinux.ru
Errors-To: mandrake-russian-admin@altlinux.ru
X-BeenThere: mandrake-russian@altlinux.ru
X-Mailman-Version: 2.0
Precedence: bulk
Reply-To: mandrake-russian@altlinux.ru
X-Reply-To: Sergei <serpiph@pochtamt.ru>
List-Help: <mailto:mandrake-russian-request@altlinux.ru?subject=help>
List-Post: <mailto:mandrake-russian@altlinux.ru>
List-Subscribe: <http://altlinux.ru/mailman/listinfo/mandrake-russian>,
	<mailto:mandrake-russian-request@altlinux.ru?subject=subscribe>
List-Id: Linux-Mandrake RE / ALT Linux discussion list <mandrake-russian.altlinux.ru>
List-Unsubscribe: <http://altlinux.ru/mailman/listinfo/mandrake-russian>,
	<mailto:mandrake-russian-request@altlinux.ru?subject=unsubscribe>
List-Archive: <http://altlinux.ru/pipermail/mandrake-russian/>
Date: Thu Jan 17 20:46:00 2002
X-Original-Date: Thu, 17 Jan 2002 20:55:40 +0300
Archived-At: <http://lore.altlinux.org/community/20020117175542.341C8302A6D@pif.b5.mephi.ru/>
List-Archive: <http://lore.altlinux.org/community/>
List-Post: <mailto:mandrake-russian@linuxteam.iplabs.ru>

-----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-----