Select Code to Download

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

print "nonoverlap: @nonoverlap\n";    # 1ab2 3ab4
print "overlap:    @overlap\n";       # 1ab2 2ab3 3ab4