Help for this page

Select Code to Download


  1. or download this
    data:     iOrig     iSort
    0: e20        0            4
    ...
    6: e99        6            6
    
    @sorted[ @iOrig ] = @data[ @iSort ]
    
  2. or download this
    #! perl -slw
    use strict;
    ...
    xray
    lima
    papa