Help for this page

Select Code to Download


  1. or download this
    # note that we have to check if its defined
# because it's possible it could be 0, and false
#62 exit 0 unless ((defined ($page))
  and (defined($pages{$page}))
  and ($pages{$page} == '1'));
  2. or download this
    NOWHINING: {
  no warnings qw (uninitialized);
...
  my $page = shift;
  exit 0 unless $pages{$page} == '1'; 
}