sub fetSort($$) {  # Prototype necessary.
    my $ftA = $_[0]->{"fet"};
    my $ftB = $_[1]->{"fet"};
    $fetType->{$ftA} <=> $fetType->{$ftB}
}

package something_else;

sort netFetObj::fetSort @{ $OBJ->{"fets"} }