Ich habe ein problem Umlaute in Widgets darzustellen.
Hier mal ein kurzer auszug:

# my $dir2=3DEncode::encode("iso-8859-1",'ruckgängig');
#funktioniert mit encode auch nicht....

$menubar->Menubutton(qw/-text Bearbeiten -underline 0 -tearoff 0
-menuitems/ =3D>
[
[Button =3D> $dir2, -command =3D> \&undo, -underline =3D> 0 ],
[Button =3D> 'Wiederherstellen', -command =3D> \&redo, -underline =3D> 0
],
[Button =3D> 'Löschen', -command =3D> \&edit_delete, -underline =3D> 1
],
])->pack(-side=3D>'left');

Hab Encode probiert geht aber nicht die Umlaute werden nocht
dargestellt..
Ich benutze SUSE 10, perl 5.8.7, tk 800.024-433

"doleman" <doleman [at] gmx.de> writes:

> Ich habe ein problem Umlaute in Widgets darzustellen.
> Hier mal ein kurzer auszug:
>
> # my $dir2=Encode::encode("iso-8859-1",'ruckgängig');
> #funktioniert mit encode auch nicht....
>
> $menubar->Menubutton(qw/-text Bearbeiten -underline 0 -tearoff 0
> -menuitems/ =>
> [
> [Button => $dir2, -command => \&undo, -underline => 0 ],
> [Button => 'Wiederherstellen', -command => \&redo, -underline => 0
> ],
> [Button => 'Löschen', -command => \&edit_delete, -underline => 1
> ],
> ])->pack(-side=>'left');
>
> Hab Encode probiert geht aber nicht die Umlaute werden nocht
> dargestellt..
> Ich benutze SUSE 10, perl 5.8.7, tk 800.024-433
>

Das sollte eigentlich ohne Konvertierungen funktionieren. Da du nur
ein altes Tk verwendest, gibt es hier keine Unicode-Unterstützung.
Solange du auch nicht "use utf8" in deinen Skripten schreibst, werden
alle Strings als iso-8859-1-Strings aufgefasst. Kannst du ein
minimales aber lauffähiges Skript, das das Problem zeigt, posten?

Gruß,
Slaven

--
Slaven Rezic - slaven <at> rezic <dot> de

need xpm or ppm output from GD?
http://search.cpan.org/search?mode=module&query=GD::Convert

use utf8 und es funzt....:)
danke