Help for this page

Select Code to Download

Select or download this

sub my_sort {
  my ($c,$d,$type) = @_;
...
    }
  }
}