Help for this page

Select Code to Download

Select or download this

    while (my $cond = shift) {
        $filter = "($op $filter $cond)" if defined $cond;
    }