my @array = split /:/, $line;