use XML::GRDDL; use LWP::Simple; use RDF::TrineX::Functions -shortcuts; my $grddl = XML::GRDDL->new(); my $url = 'http://example.com/document.html'; my $html = <<'HTML'; Homepage

my home page

HTML my $r = $grddl->data($html, $url, force_rel=>1, metadata=>1); print rdf_string($r, 'nquads');