Help for this page

Select Code to Download


  1. or download this
    if($str !~ /[^[:ascii:]]/)
    {
       print "Non ASCII character found in $.";
    }