Select Code to Download

#!/usr/bin/env perl

...
}

print join('; ', @output), "\n";

$data .= '; 43:1:8; 65:1:9; 65:1:3; 1:1:2; 1:1:1';

43:1:1-6; 43:1:8; 27:3:7-9; 65:1:3-4; 65:1:9; 65:1:18; 1:1:1-2