foreach my $pdu_num (3 .. 8) 
{
        $pdu_num = 11 - $pdu_num unless defined $order;
        if (my $node = shift @nodes)
        {
                $map{$node} = $pdu . '['.$pdu_num.']';
        }
}