Re: Sorting Files with Numbers

If all of your file names are essentially the same, except for the numeric part,
then all you should really have to do is change your comparison operator.

foreach my $file (sort {$a <=> $b} keys %hash) {
 print "$key \n";
}
[download]

This will work even if the Numeric part of the file is in the middle of the file name.

Ex.

perl -e 'print qq{[$_]\n} for ( sort { $a <=> $b } qw(file1 file10z fi
+le11s file2q file20z file21f) )'
[download]

Wonko.

Comment on Re: Sorting Files with Numbers Select or Download Code

Replies are listed 'Best First'.
Re: Re: Sorting Files with Numbers by John M. Dlugosz (Monsignor) on Dec 30, 2002 at 17:07 UTC
No, it won't, since numberification of the string only looks at the beginning. It will see them all as zero and compare equal in every case. Change the order of the data in your example, since they were sorted to begin with. `[F:\]perl -e "print qq{[$_]\n} for ( sort { print 0+$a, $b, $/; $a <=> + $b } qw(file2 file20z file22s file1q file10z file12f) )" 00 00 00 00 00 [file2] [file20z] [file22s] [file1q] [file10z] [file12f]` [download] —John	[reply] [d/l]
Re: Re: Re: Sorting Files with Numbers by Wonko the sane (Deacon) on Dec 30, 2002 at 17:19 UTC
Ugh, your right. Thank you for pointing this out to me. I like the method you used to show this. Wonko.	[reply]
Re: Re: Re: Re: Sorting Files with Numbers by John M. Dlugosz (Monsignor) on Dec 30, 2002 at 17:22 UTC
s/your/you're/ Thanks. I wanted to make sure there was nothing magic about the operation during a sort, compared with its normal use of simply numberifying the values. That's the problem with a language that supports DWIMary.	[reply]


The stupid question is the question not asked
	PerlMonks