Help for this page

Select Code to Download

Select or download this

#! perl
use strict;
...
1 3 3 3 3 1 1     -> 3 1 3 1 3 1 3
1 1 1 2 3         -> 1 2 1 3 1
1 1 1 2 3 3 2 2 1 -> 1 2 1 2 1 3 1 3 2