Help for this page

Select Code to Download


  1. or download this
    use strict;
    use warnings;
    
  2. or download this
    while ( my $q = new CGI::Fast ) {
        my $query = $q->param('node');
    ...
        $nodes{ exists $nodes{$query} ? $query : '_err' }();
        print "done!\n";
    }