ich hab eben nochmal ein bisschen probiert.
hat erstmal nicht funktioniert.$s =~ s/\\,/\|\|/g;
@a = split(/,/, $s);
$r = join('#', @a);
print $r . "\n";
$r =~ s/\|\|/\\,/g;
print $r;
Jetzt hab ich den Fehler aber gefunden

Den String habe ich in Anführungszeichen an die Variable übergeben.
$s="cn=Frank\,Naumann,ou=test,1,o=test\,2,c=de";
Wenn ich nun einfache Hochkomma verwende, dann klappts
$s='cn=Frank\,Naumann,ou=test,1,o=test\,2,c=de';
Ich hätte echt nicht gedacht das da ein Unterschied ist. Naja, jetzt geht's.
Vielen Herzlichen Dank für die Unterstützung !!!
MfG,
Naumi