perl - html::tagFilter でヘルプが必要

Question

このようなフィルターをperlで書きました

my $tf = HTML::TagFilter->new(
            allow => {
                img => { src => [] },
                b   => { all => [] },
                i   => { all => [] },
                em  => { all => [] },
                u   => { all => [] },
                s   => { all => [] }
            }
        );

$message_body = $tf->filter($message_body);

このフィルターで必要だったのは、指定されたタグを許可することと、img で src 属性を許可することです。このコードは、このようなタグを除いて素晴らしい結果をもたらします。これは、私が望むものの代わりに<img src="cid:img.png" alt="Smiley face">返されるだけです。<img><img src="sid:imp.png">