perl code snippet for additional programming symbols

[unicode-sampler.git] / unicode.txt
diff --git a/unicode.txt b/unicode.txt

index 2d14aab99bfbde08c9ae649130771925846bc8c4..88dd0c189f95d813f3d680565139057642d5ed2d 100644 (file)
--- a/unicode.txt
+++ b/unicode.txt
@@ -9,6 +9,10 @@ Code:
  
    <html><pre><span class=""><!-- H&#x54;M --></span>
  
+  Hash[ :nbsp => 0O2_40 ].each {|name, cp| puts "#{name} is '#{cp.chr}'" }
+
+  perl -pe's/\w/$^=~$&>chop($^=$&.$^)?"@-":$&/ge'
+
  Mathematics and sciences:
  
    ∮ E⋅da = Q,  n → ∞, ∑ f(i) = ∏ g(i),      ⎧⎡⎛┌─────┐⎞⎤⎫