Help for this page

Select Code to Download


  1. or download this
    #!/usr/local/bin/perl -w

...
print $_->{title},br for @Retrieves;
  2. or download this
    #!/usr/local/bin/perl -w

...
);
print header;
print $results_tmpl->output();
  3. or download this
    # send back the sitesearch input box:
<form method="get" action="http://your_path/cgi-bin/sitesearch.pl">
...
<TMPL_LOOP RESULTS>
    <a href="http://your_path/<TMPL_VAR FILENAME>"><TMPL_VAR TITLE></a
+><br>
</TMPL_LOOP>