Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    my $kid = open (HTML, "-|") or exec("tail","-f","testlog.txt");
    print while <HTML>;
    kill 2, $kid;