Select Code to Download

############################################################
#specifica cosa deve fare la subroutine edit
...
    close FH;
    }
}

sub edit {
    my $file = $_;
...
    print $getmaindiv->as_HTML, "\n";    
    close FH;
}

sub edit {
    my $file = $_;
...
    my $getmaindiv = $tree->look_down(_tag => "div",id  => "post_princ
+ipale") || die $!;
    print $getmaindiv->as_HTML, "\n";    
}