Select Code to Download

my %table;
my %map;
...
    print join ', ', @lines;
    print "\n";
}

Ref: 1, parts: 1, 2, 3
Ref: 2, parts: 2, 3, 4
Ref: 1, lines: 5, 4, 6
Ref: 2, lines: 17, 18, 16