Ticket Swapping solutions

Ticket Swapping was solved using Perl by 4 contestants. Solution sizes: average 4464 bytes (shortest: 2107; longest: 9501).

1379.

abliss (S) (2107 B)
1635.

Chip.Whaley (S) (9501 B)
1668.

zolom (S) (2180 B)
1770.

afoo (S) (4068 B)