display_results( $num, @sorted );
sub display_results {
    my( $num, @sorted )= @_;