[Chicago-talk] working with a revolving number
lembark at wrkhors.com
Wed Mar 10 23:11:10 CST 2004
> 1) this presents a problem.
> 2) I have to move the files to a new filename based on this order.
> 3) how would you go about coding for the anomaly (when B comes before A)
> since the max # could be 999.
> This is the code I use currently (I fix the anomaly by hand when I get an
> error via email)
Why not start by sorting the files then assigning
numbers to them? That way you can put them in any
order you like:
my @filz = sort \&however_you_like @list;
my @numbered = ();
for( my $i = '000' ; @filz ; ++$i )
push @numbered, shift @filz . $i;
(or something like it) will number your files after they
Steven Lembark 2930 W. Palmer
Workhorse Computing Chicago, IL 60647
+1 888 359 3508
More information about the Chicago-talk