One way to do this,

$t = 'FD02:3539:700B:1::FE';
if ($t =~ /^([^:]*):([^:]*):([^:]*):([^:]*)::([^:]*)/)
{
    print "$1\t$2\t$3\t$4\t$5";
}
[download]

This will match.

updated