if ($field eq "name") {
  $a->{$field} cmp $b->{$field}
}
else {
  $a->{$field} <=> $b->{$field}
}

##</code><code>##

if ($field eq "name") { @sorted = sort @data; }
else { @sorted = sort {$a <=> $b} @data; }