karl@h3002993:~/src/perl$ ./pmute.pl
1 8 1 2 1 7 1 3 1 6 1 5 1 4 1
karl@h3002993:~/src/perl$ ./pmute.pl
1 3 1 4 1 7 1 5 1 2 1 6 1 8 1
karl@h3002993:~/src/perl$ ./pmute.pl
1 4 1 8 1 6 1 5 1 3 1 2 1 7 1
karl@h3002993:~/src/perl$ ./pmute.pl
1 5 1 8 1 2 1 4 1 6 1 3 1 7 1
karl@h3002993:~/src/perl$ ./pmute.pl
1 7 1 5 1 4 1 3 1 8 1 2 1 6 1