Select Code to Download

use strict;
use warnings;
use diagnostics; # not everyone puts this in but I think it's helpful

foreach my $pdu_num (3 .. 8) 
{
...
                $map{$node} = $pdu . '['.$pdu_num.']';
        }
}