Help for this page

Select Code to Download


  1. or download this
    use locale;
  2. or download this
    setlocale(LC_CTYPE, "pl");
  3. or download this
      use locale; $a="Pérl"; $b = uc($a); print $b;
  4. or download this
    for ($x = 0;$x < 255;$x++){
    $_ = chr($x);
    if (/\w/){ print "$_ ";}
}