Select Code to Download

#!/usr/bin/perl -w
use strict;
...

print Dumper($stuff);

$VAR1 = {
          'server' => [
...
                                      'primary' => 'Storage Servers'
                                    }
                      },