# this is what $agent->content does
print "outerHTML \n\n",
  $agent->Document->documentElement->{outerHTML},"\n"; 

# this returns same content
print "innerHTML \n\n",
  $agent->Document->documentElement->{innerHTML},"\n";