Mailing-List:	contact cygwin-help AT cygwin DOT com; run by ezmlm
List-Subscribe:	<mailto:cygwin-subscribe AT cygwin DOT com>
List-Archive:	<http://sources.redhat.com/ml/cygwin/>
List-Post:	<mailto:cygwin AT cygwin DOT com>
List-Help:	<mailto:cygwin-help AT cygwin DOT com>, <http://sources.redhat.com/ml/#faqs>
Sender:	cygwin-owner AT cygwin DOT com
Mail-Followup-To:	cygwin AT cygwin DOT com
Delivered-To:	mailing list cygwin AT cygwin DOT com
X-MimeOLE:	Produced By Microsoft Exchange V6.0.6487.1
content-class:	urn:content-classes:message
MIME-Version:	1.0
Subject:	RE: Is there a 'ping' in cygwin?
Date:	Mon, 20 Oct 2003 10:29:39 -0500
Message-ID:	<03C99898510C8C47945B932907D99AAA16F002@E2KMEMMCS1.ftbco.ftn.com>
X-MS-Has-Attach:
X-MS-TNEF-Correlator:
From:	"DePriest, Jason R." <jrdepriest AT ftb DOT com>
To:	<cygwin AT cygwin DOT com>
X-OriginalArrivalTime:	20 Oct 2003 15:29:40.0354 (UTC) FILETIME=[FA78CE20:01C3971E]
X-DCC-FTBDCCD1-Metrics:	dns1 1130; Body=1 Fuz1=1 Fuz2=1
X-MIME-Autoconverted:	from quoted-printable to 8bit by delorie.com id h9KFUaEN017015

> -----Original Message-----
> From: cygwin-owner AT cygwin DOT com 
> [mailto:cygwin-owner AT cygwin DOT com] On Behalf Of Hughes, Bill
> Sent: Monday, October 20, 2003 10:05 AM
> To: 'cygwin AT cygwin DOT com'
> Subject: RE: Is there a 'ping' in cygwin?
[- snip -]
> Now do I bother writing something to rename all .EXE to lower 
> case? I don't
> think so.
[- /snip -]

I already did for similar reasons.  It doesn't recurse directories and
it renames ALL files (not just .exe), but it does work.

[- perl script -]
# This script will take files names that are in
# capital letters and convert them to lower case
# letters.  I'm going to use the easy way.  Copy
# the file to a temp file, delete the original,
# then copy the temp file back to the original
# file name in lower case letters.

use File::Copy;

$PathToFiles = $ARGV[0];

chdir($PathToFiles);
@FileNameList = glob("*.*");
foreach $FileName (@FileNameList) {
	$FileNamelc = lc $FileName;
	copy("$PathToFiles\\$FileName","$PathToFiles\\$FileName\.tmp");
	rename("$PathToFiles\\$FileName","$PathToFiles\\$FileNamelc");
	unlink("$PathToFiles\\$FileName\.tmp");
	print "$FileName renamed to $FileNamelc\n";
}
[- /perl script -]

--
Unsubscribe info:      http://cygwin.com/ml/#unsubscribe-simple
Problem reports:       http://cygwin.com/problems.html
Documentation:         http://cygwin.com/docs.html
FAQ:                   http://cygwin.com/faq/

- Raw text -