use strict; use warnings; use HTML::Element; use Test::More qw(no_plan); my $element = HTML::Element->new('td', "class"=>"zwischanspalte"); $element->push_content(' '); my $expected = ' '; my $html = $element->as_HTML(); is($html, $expected); #### not ok 1 # Failed test (pseudoelement.pl at line 12) # got: '  # ' # expected: ' ' 1..1 # Looks like you failed 1 tests of 1.