Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl

...
        @$arr[$i,$j] = @$arr[$j,$i];
    }
}

Select or download this

03 04 01 02 11 08 09 06 07 12 05 10
03 04 01 02 11 08 09 06 07 12 05 10
...
03 04 01 02 11 08 09 06 07 12 05 10
03 04 01 02 11 08 09 06 07 12 05 10
03 04 01 02 11 08 09 06 07 12 05 10