From the top of Search.pm
my $args = $IN->get_hash;
$args->{query} =~ s,^\s*|\s*$,,g;
$args->{bool} = (defined $args->{bool} and $args->{bool} =~ /^(and|or)$/i) ? uc $1 : $CFG->{search_bool};
$args->{nh} = (defined $args->{nh} and $args->{nh} =~ /^(\d+)$/) ? $1 : 1;
$args->{mh} = (defined $args->{mh} and $args->{mh} =~ /^(10|25|50|100)$/) ? $1 : $CFG->{search_maxhits};
$args->{substring} = defined $args->{substring} ? $args->{substring} : $CFG->{search_substring};
$args->{so} = (defined $args->{so} and $args->{so} =~ /^(asc|desc)$/i ? $1 : '');
$args->{sb} and ($args->{sb} =~ /^[\w\s,]+$/ or ($args->{sb} = ''));
So, both Paul and my suggestion *should* work. If it's not, then there is a bug somewhere.
That statement looks *way* too complicated to be working correctly <G>
PUGDOG� Enterprises, Inc.
The best way to contact me is to NOT use Email.
Please leave a PM here.
Code:
# First get our search options. my $args = $IN->get_hash;
$args->{query} =~ s,^\s*|\s*$,,g;
$args->{bool} = (defined $args->{bool} and $args->{bool} =~ /^(and|or)$/i) ? uc $1 : $CFG->{search_bool};
$args->{nh} = (defined $args->{nh} and $args->{nh} =~ /^(\d+)$/) ? $1 : 1;
$args->{mh} = (defined $args->{mh} and $args->{mh} =~ /^(10|25|50|100)$/) ? $1 : $CFG->{search_maxhits};
$args->{substring} = defined $args->{substring} ? $args->{substring} : $CFG->{search_substring};
$args->{so} = (defined $args->{so} and $args->{so} =~ /^(asc|desc)$/i ? $1 : '');
$args->{sb} and ($args->{sb} =~ /^[\w\s,]+$/ or ($args->{sb} = ''));
So, both Paul and my suggestion *should* work. If it's not, then there is a bug somewhere.
That statement looks *way* too complicated to be working correctly <G>
PUGDOG� Enterprises, Inc.
The best way to contact me is to NOT use Email.
Please leave a PM here.
