Help for this page

Select Code to Download


  1. or download this
    $ perl -v

...
$ perl -le '$_="abc"; print "ok" if (/^[\x00-\x7f]+$/)'
ok
  2. or download this
    $ perl5.8.0 -le '$_="abc"; print "ok" if (/^[[:ascii:]]+$/)'
ok