use lib 'lib'; use Test::More tests => 7; use pQuery; my $foo = do { local $/; }; my $html = eval { pQuery($foo)->html }; like($html, qr/html }; like($html, qr/html }; like($html, qr/find("link[rel=stylesheet]")->each(sub { ok(1, "Got a stylesheet"); }); __DATA__

Hello World