Select Code to Download

$mac2 = $2;

if ($macs[1] =~ /(\S{17})\|(\S{17})/) {
                print "$macs[0] MAC1: $1\n";
                print "$macs[0] MAC2: $2\n";
...
                $mac2 =~ s/:/-/g;  
                print "Converted Mac1: $mac1 Mac2: $mac2\n";
            }

$mac1 =~ s/:/-/g;