Select Code to Download

#!/usr/bin/perl -w
use strict;
# 1188105
...
}           

print "\n)\n";

(
1   1 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0
...
    xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
13  1 1 0 0 0 0 1 1 1 1 0 0 0 0 0 0 0
)