Help for this page

Select Code to Download


  1. or download this
    open my $p, "< ". shift @ARGV
       or die "could not open pattern file: $!";
    ...
            $pattern;
        }
    }
    
  2. or download this
    # get column 0 from all result rows simultaneously....
    my $results = $sth->fetchall_arrayref([0]);
    ...
            $pattern;
        }
    }