Select Code to Download

#!/usr/bin/perl
use strict;
...
        print Dumper($section) . "\n";
}

  $Action->[
             {  this => 123, that => 'some text', theother => 111 },
             {  this => 123, that => 'some text', theother => 112 },
             {  this => 123, that => 'some text', theother => 113 }
           ]

$VAR1 = [
          {
...
          'theother' => 113,
          'this' => 123
        };