Select Code to Download

use Modern::Perl;
use Data::Dump qw /dump/;

...
}

say dump(\@array);

[
  { first => "1 first", second => "1 second" },
  { first => "2 first", second => "2 second" },
  { first => "3 first", second => "3 second" },
  { first => "4 first", second => "4 second" },
]