#sorry win quote
perl -wle "@r=({k=>'r'},{k=>'s'},{k=>'t'});print $_->{k} for sort { $a->{k} cmp $b->{k} } @r;"
r
s
t