my @tokens = split /\s*([:=;()+]+)\s*/, $string;