Select Code to Download

use strict;
use warnings;
...
    }
  }
}

use strict;
use warnings;
...
    }
  }
}

use strict;
use warnings;
...
    }
  }
}

use strict;
use warnings;
...
$mce->shutdown;

print $hash{"a"}{"area"}, "\n";