Help for this page

Select Code to Download


  1. or download this
    #!/agl/tools/perl/bin/perl
my @a=qx (rsh -l sonaxisz 'source.login ; findbug -p | sort -u | %s se
+rver);
...
}
print "</table></body></html>";
  2. or download this
    @a = ("A","B","C");
print "Content-type:text/html\n\n";
print "<html><body><table>";
print map("<tr><td>$_</td></tr>",@a);
print "</table></body></html>";