Help for this page

Select Code to Download


  1. or download this
      if(  grep( $_ !~ /^\d+$/, @{$INPUT{'checked_ids'}) ){
    # you have bad data
  }
  2. or download this
      my @ids = split (/, +/, $INPUT{'checked_ids'});
  # now check @ids w/grep() using the method above
  3. or download this
      if( $INPUT{'checked_ids'} !~ /^(\d+(, +)?)+$/ ){
    # you have bad data
  }