Select Code to Download

A1 abc yellow
B1 xyz green
...
A1 abc green
A2 cde yellow
A1 abc blue

#!/usr/bin/env perl

...
    my $joined = join(":", @data);
    return($joined);
}

A1 abc yellow:green:blue
A2 cde red:yellow
B1 xyz green