##
my $aref = [{name => 'Zambia', abbr => 'ZA'}, {name => 'Afghanistan', abbr => 'AF'}, {name => 'Andorra', abbr => 'AN'}];
say $_->{name} for sort { $a->{abbr} cmp $b->{abbr} } @{$aref};'
####
Afghanistan
Andorra
Zambia
####
my $struct = result_of_some_call();
say ref($struct);
####
use Data::Dumper;
my $result = result_of_some_call();
say Dumper $result;