|
Lines 297-303
my @TABS;
Link Here
|
| 297 |
if ( $op eq 'search' ) { |
297 |
if ( $op eq 'search' ) { |
| 298 |
my $searchfield = $input->param( 'searchfield' ); |
298 |
my $searchfield = $input->param( 'searchfield' ); |
| 299 |
|
299 |
|
| 300 |
$searchfield =~ s/[^a-zA-Z0-9_ -]//g; |
300 |
$searchfield =~ s/^\s+//; |
|
|
301 |
$searchfield =~ s/\s+$//; |
| 301 |
|
302 |
|
| 302 |
$template->param( searchfield => $searchfield ); |
303 |
$template->param( searchfield => $searchfield ); |
| 303 |
|
304 |
|
| 304 |
- |
|
|