Also fixes a test which was comparing the length of two lists instead of the values inside the lists. Dang, Perl.
IVOH2GWJYQICKNVXJK2CXZHJYTQLQB2EHGWPAFTLIEPI6VBHT24AC
my @expected_names = [ "bogus-1", "bogus-2" ];
my @actual_names = sort([
$event->{"called_with"}[0]->name,
$event->{"called_with"}[1]->name
]);
my @expected_names = ( "bogus-1", "bogus-2" );
my @actual_names = sort(
$event->{"called_with"}[0]->name,
$event->{"called_with"}[1]->name
);