123456789101112131415161718 use strict;use warnings;use Test2::V0;use Text::HyperScript qw(raw);sub main { my $raw = raw('<p>hello, world!</p>'); isa_ok( $raw, 'Text::HyperScript::Element' ); is( $raw->markup, '<p>hello, world!</p>' ); is( "${raw}", '<p>hello, world!</p>' ); done_testing;}main;
use
strict;
warnings;
Test2::V0;
Text::HyperScript
qw(raw)
;
sub
main {
my
$raw
= raw(
'<p>hello, world!</p>'
);
isa_ok(
,
'Text::HyperScript::Element'
is(
->markup,
"${raw}"
done_testing;
}
main;