perl -wle'
my $x = {name => "abc", id => 1};
my $y = {name => "bcd", id => 2};
push(my @files, $y, $x); 
@files = sort {$a->{'name'} cmp $b->{'name'}} @files;
print map {$_->{'name'}} @files;'