Help for this page

Select Code to Download


  1. or download this
    my $tidy = HTML::Tidy::Document->new();
    $tidy->Create();
    ...
    $tidy->OptSetValue( $tidy->TidyBodyOnly, 1);
    $tidy->ParseString($messy);
    my $tidied = $tidy->SaveString();
    
  2. or download this
    my $tidied = html_tidy($messy, 'TidyBodyOnly' => 1)