Perl

[MoD]

Hi,

kann mir mal jemand erklären was dieser Code macht:

$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$value =~ s/<!--(.|\n)*-->//g;

Soweit ich das verstanden habe vergleicht Perl den Wert von $value
mit regulären Ausdrücken -> werden hier Zeichen rückübersetzt, welche im Hex-Code versendet wurden ?

Danke MoD