It looks like it would be easy to ignore lines that start with + or contain "General manual list" or "Color Referenc", meaning you could just change the top of your code to something like:

use strict;

my @fromConnectors;
my @toConnectors;
my @fromPing;
my @toPing;

while (<>) {
    next if /^\+|General manual list|Color Referenc/;
    my ($misc1, $misc2, $from, $to, $length) = split (/\|/, $_);
    my ($fromConnector, $ping01) = split /\t/, $from;
    my ($toConnector, $ping02) = split /\t/, $to;
  ## ...etc.
[download]