[HTML::Restrict] Probleme mit Attributen und deren Werten mit Nicht-ASCII-Zeichen nach Filtern (gelöst) - #196782 (Fragen zu Perl-Modulen)

Linuxer

2025-12-30 19:17

User since
2006-01-27
3891 Artikel
HausmeisterIn

user image

Hi,

kannst Du bitte mal ein minimales Code-Beispiel liefern, womit das nachvollziehbar wird, was Du da genau versuchst?

Ich kenne das Modul bisher nicht und mein einfaches Testskript liefert mir:

Code: (dl )

1
2
3

ÄÖÜẞ
<a href="//" title="&Auml;&Ouml;&Uuml;&#x1E9E;">ÄÖÜẞ</a>
<img src="/a.jpg" alt="&Auml;&Ouml;&Uuml;&#x1E9E;">

Und das schaut mir doch OK aus...

Das Testskript:

Code (perl): (dl )

#! /opt/perls/perls/perl-5.38.2/bin/perl
use strict;
use warnings;
use 5.038;

use utf8;

use CGI::Carp qw( fatalsToBrowser );
use CGI;
use HTML::Restrict;

my $html = do { local $/; <DATA> };
my $cgi = CGI->new();
my $hr = HTML::Restrict->new( rules => {
    a   => [ qw( href title ) ],
    img => [ qw( src alt ) ],
});

my $processed = $hr->process($html);

binmode(STDOUT,':utf8');

say $cgi->header({
                -type => 'text/html',
                -charset => 'UTF-8',
        }),
        $processed;


__DATA__
ÄÖÜẞ
<a href="//" title="ÄÖÜẞ">ÄÖÜẞ</a>
<img src="/a.jpg" alt="ÄÖÜẞ">

Modulversionen:
HTML::Restrict v3.0.2
HTML::Entities 3.82
CGI 4.66
CGI::Carp 4.66

meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!