my ($erster, $zweiter, $rest) = $string =~ m/(\w+)\:\:(\w+)\:\:(.+)/;
print "1: $erster, 2: $zweiter, r: $rest\n";