Help for this page

Select Code to Download


  1. or download this
    print "funny"
  if ($c =~ /[[:^ascii:][:cntrl:]]/);
  2. or download this
    print "funny"
  if ($c =~ /[\x00-\x1f\x7f-\xff]/s);