Help for this page

Select Code to Download


  1. or download this
    sub new {
    my ( $class, $init ) = @_;
...
    $self->init($init);
    return $self;
}
  2. or download this
    # uncomment this if you want to use query string and POST at the same 
+time (not recommended)
# $data .= $ENV{'QUERY_STRING'};
  3. or download this
        $data =~ s/%00//g;   # prevent null byte hacks
    $data =~ tr/\000//d;