Select Code to Download

use Data::Dumper;

...
}

print Dumper(\@loop_data)

$VAR1 = [
          {
            'a' => '-',
...
            'b' => '-'
          }
        ];