On Jul 28, perl.org said:
>On Wed, 28 Jul 2004 14:04:26 -0400 (EDT), Jeff 'japhy' Pinyan wrote
>> On Jul 28, perl.org said:
>>
>> I would use File::Basename so that I can be sure it works on all
>> platforms. What is your take on files with multiple extensions, like
>> program.pl.bak or jeff.piny
On Wed, 28 Jul 2004 14:04:26 -0400 (EDT), Jeff 'japhy' Pinyan wrote
> On Jul 28, perl.org said:
>
> I would use File::Basename so that I can be sure it works on all
> platforms. What is your take on files with multiple extensions, like
> program.pl.bak or jeff.pinyan.txt?
Excellent point about b
On Jul 28, 2004, at 2:26 PM, [EMAIL PROTECTED] wrote:
Maybe I'm missing something but since you're doing Schwartzian
Transformation
already why call lc() every time?
@input = map { $_->[0] }
sort { $a->[1] cmp $b->[1] }
map { m/\.([^.]+)$/ ? [$_, lc($1)] : [$_, ''] } @
In a message dated 7/28/2004 12:41:43 PM Eastern Standard Time,
[EMAIL PROTECTED] writes:
Transformation
>@input = map { $_->[0] }
>sort { lc($a->[1]) cmp lc($b->[1]) }
>map { m/\.([^.]+)$/ ? [$_, $1] : [$_, ''] } @input;
Maybe I'm missing something but since you're doing Schwart
On Jul 28, perl.org said:
>I have a list of files I want to case-insensitive sort by extension,
>files with no extension appearing first. It should handle both Windows
>and Unix directory separators. I think I have working code, but I am
>interested in the various syntax for this one - there MUS
On Jul 28, 2004, at 12:27 PM, perl.org wrote:
I have a list of files I want to case-insensitive sort by extension,
files
with no extension appearing first. It should handle both Windows and
Unix
directory separators. I think I have working code, but I am
interested in the
various syntax for th
I have a list of files I want to case-insensitive sort by extension, files
with no extension appearing first. It should handle both Windows and Unix
directory separators. I think I have working code, but I am interested in the
various syntax for this one - there MUST be a better way than my feebl
