Help for this page

Select Code to Download


  1. or download this
    $s =~ s/(?<=(?<!\d(?=[.,]\d))\p{P})(?!\s)/ /g;
  2. or download this
    $ perl -wle'use charnames (); for (0..255) { chr($_) =~ /\pP/ and prin
+t chr($_)
," ($_): ", charnames::viacode($_) }'
...
· (183): MIDDLE DOT
» (187): RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
¿ (191): INVERTED QUESTION MARK