for my $pdu_num (3 .. 8) {
    while my $node (@nodes) {
        # more code here...
    }
}