@foo = (1,4,76,2,5,1);
@bar = ('sdf', 'wrtvdf', 'erteg', 'dhrthy','rtyfgrty');
@baz = ( 'aa', 'bb', 'cc', 'dd', 'ee', 'ff');

##</code><code>##

@data = (
 {foo => 1, bar => 'sdf', baz => 'aa'},
 {foo => 4, bar => 'wrtvdf', baz => 'bb'},
 {foo => 76, bar => 'erteg', baz => 'cc'},
 {foo => 2, bar => 'dhrthy', baz => 'dd'},
 {foo => 5, bar => 'rtyfgrty', baz => 'ee'},
 {foo => 1, bar => undef, baz => 'ff'}, # did you notice we had one less @bar ?
);

##</code><code>##

@sorted = sort {$a->{foo} <=> $b->{foo}} @data;
#or
@sorted = sort {$a->{bar} cmp $b->{bar}} @data;