Changeset 27669


Ignore:
Timestamp:
06/20/13 09:26:05 (8 years ago)
Author:
jmt12
Message:

Sort compute nodes naturally before labelling them with incremental worker numbers (otherwise they go 0, 1, 10, 11 etc)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • gs2-extensions/parallel-building/trunk/src/bin/script/hadoop_report.pl

    r27583 r27669  
    55
    66use Devel::Peek;
     7use Sort::Key::Natural qw(natsort);
    78use Time::Local;
    89
     
    214215  # For each compute node record
    215216  my $known_workers = {};
    216   foreach my $worker_id (sort keys %{$node_records})
     217  foreach my $worker_id (natsort(keys(%{$node_records})))
    217218  {
    218219    my $node_record = $node_records->{$worker_id};
Note: See TracChangeset for help on using the changeset viewer.