Select Code to Download

# Traverse a tree using localize state
 $tree = [
...
 # q.3.4 = three_four 
 # q.4 = four 
 # q.5.1.1 = five_one_one

my @servers = (
     {
...
     },
     ...
);

use constant { TOTAL => 0, FREE => 1 };

...
        printf "\tTotal: %d  Free: %d\n", @{ $target }[ TOTAL, FREE ];
    }
}