dealing with arrayref of hashes

test-arrayref-of-hashes.pl

# tested on https://www.tutorialspoint.com/execute_perl_online.php
use warnings;
use strict;
use Data::Dumper;

my @errors = (
    {
        at => "Thu Jun  6 20:31:11 2019",
        error => "/url/1/2/3: 403 Forbidden"
        
    },
    {
        at => "Thu Jun  7 20:31:11 2019",
        error => "/url/1/2/3: 403 Forbidden"
        
    }
    );
    
# when i receive it, it is $errors, passed in as arrayref of hashes
my $errors = \@errors;


my $errorOutput = "";

# be sure to cast as array again for foreach loop
foreach my $error (@$errors) {
    #print Dumper($error);
    $errorOutput .= @$error{'at'} . ": " . @$error{'error'} . "\n";
}

# i want to split by ": " and join as indented new-line
$errorOutput = join("\n  ", split(": ", $errorOutput));
print $errorOutput;