__DATA__
0.ids.xml 500 2004-10-01
1.ids.xml 2 2004-10-01
2.ids.xml 30 2004-10-01
3.ids.xml 600 2004-10-01
4.ids.xml 40 2004-10-01
5.ids.xml 7000 2004-10-01
6.ids.xml 8000 2004-10-01
7.ids.xml 1 2004-10-01
8.ids.xml 100000 2004-10-01
9.ids.xml 90000 2004-10-01

##</code><code>##

2004-10-01 100000
2004-10-01  90000
2004-10-01   8000
2004-10-01   7000
2004-10-01    600
2004-10-01    500
2004-10-01     40
2004-10-01     30
2004-10-01      2
2004-10-01      1

##</code><code>##

    push @{$hash{$common}}, [ $input_file, $date, $time ];

##</code><code>##

    @files = sort {$b->[1] cmp $a->[1] || $b->[2] <=> $a->[2]} @{$hash{$k}};