Help for this page

Select Code to Download


  1. or download this
    while ( $content =~ /^(Server error:\n.*?)^server info/gsm ) {
        my $record = $1;
        print $record if $record =~ /Btree/;
    }