Help for this page

Select Code to Download


  1. or download this
    if ( my $count = /^1(.*)/../^0(.*)/ and $count !~ /E/ )
  2. or download this
    if ( -( /^1(.*)/../^0(.*)/ ) )
  3. or download this
    if ( ( /^1(.*)/../^0(.*)/ ) =~ /^\d+$/ )