use warnings; use strict; use CGI::Carp qw(fatalsToBrowser); use CGI qw/:standard/; my $teaser_show = 3; # number of headlines to show in TEASER mode my $page_show = 50; # number of headlines to show on page my $intro = "Hi; # top message on screen when it's showing all results print header, start_html(); my $show = url_param("show"); my $show1 = param("show"); if ($show ne "all" || $show1 ne "all") { print "no SHOW param was found"; } else { print "this prints if the param is found"; }