language-specific syntax highlighting

Author: patch

count-bytes/perl5.md

@@ -3,4 +3,6 @@
 The core `length` function returns the number of bytes when called on a byte
 string instead of a character string.
 
-    $count = length $utf8;
+```perl
+$count = length $utf8;
+```

count-bytes/perl6.md

@@ -2,4 +2,6 @@
 
 The `bytes` method is available for buffers (`Buf` objects).
 
-    $count = $utf8.bytes;
+```perl
+$count = $utf8.bytes;
+```

count-characters/javascript.md

@@ -5,6 +5,8 @@
 The [Punycode.js](https://github.com/bestiejs/punycode.js) library can be used
 to count code points.
 
-    var puny = require('punycode');
+```javascript
+var puny = require('punycode');
 
-	$count = puny.ucs2.decode(str).length;
+$count = puny.ucs2.decode(str).length;
+```

count-characters/perl5.md

@@ -5,28 +5,36 @@
 The core `length` function returns the number of code points when called on a
 character string (instead of a byte string).
 
-    $count = length $str;
+```perl
+$count = length $str;
+```
 
 ## Grapheme clusters
 
 There is no core function to count the number of grapheme clusters; however,
 either of the following examples will perform the task.
 
-    $count = () = $str =~ /\X/g;
+```perl
+$count = () = $str =~ /\X/g;
 
-    $count++ while $str =~ /\X/g;
+$count++ while $str =~ /\X/g;
+```
 
 The CPAN module
 [Unicode::GCString](https://metacpan.org/module/Unicode::GCString) can also be
 used on character strings.
 
-    use Unicode::GCString;
+```perl
+use Unicode::GCString;
 
-    $count = Unicode::GCString->new($str)->length;
+$count = Unicode::GCString->new($str)->length;
+```
 
 As well as the CPAN module
 [Unicode::Util](Unicode::GCStrin://metacpan.org/module/Unicode::Util).
 
-    use Unicode::Util qw( grapheme_length );
+```perl
+use Unicode::Util qw( grapheme_length );
 
-    $count = grapheme_length($str);
+$count = grapheme_length($str);
+```

count-characters/perl6.md

@@ -4,10 +4,14 @@
 
 The `codes` method is available for strings (`Str` objects).
 
-    $count = $str.codes;
+```perl
+$count = $str.codes;
+```
 
 ## Grapheme clusters
 
 The `graphemes` method is available for strings (`Str` objects).
 
-    $count = $str.graphemes;
+```perl
+$count = $str.graphemes;
+```

count-characters/php.md

@@ -6,11 +6,15 @@ The `mb_strlen` function is available for strings in PHP 4.0.6 and requires the
 encoding of the string to either passed as the second argument or set in
 `mbstring.internal_encoding`.
 
-    $count = mb_strlen($str, 'UTF-8');
+```php
+$count = mb_strlen($str, 'UTF-8');
+```
 
 ## Grapheme clusters
 
 The `grapheme_strlen` function is available for UTF-8 strings in PHP 5.3.0 or
 the PECL extension [intl](http://pecl.php.net/package/intl).
 
-    $count = grapheme_strlen($str);
+```php
+$count = grapheme_strlen($str);
+```

encode-decode/perl5.md

@@ -1,6 +1,8 @@
 # Encode and decode in Perl 5
 
-    use Encode;
+```perl
+use Encode;
 
-    $utf8 = encode('UTF-8', $str);
-    $str  = decode('UTF-8', $utf8);
+$utf8 = encode('UTF-8', $str);
+$str  = decode('UTF-8', $utf8);
+```

encode-decode/perl6.md

@@ -2,10 +2,14 @@
 
 UTF-8 is the default.
 
-    $utf8 = $str.encode;
-    $str  = $utf8.decode;
+```perl
+$utf8 = $str.encode;
+$str  = $utf8.decode;
+```
 
 Other encodings can be explicitly specified.
 
-    $utf16 = $str.encode('UTF-16');
-    $str   = $utf16.decode('UTF-16');
+```perl
+$utf16 = $str.encode('UTF-16');
+$str   = $utf16.decode('UTF-16');
+```

io/perl5.md

@@ -9,27 +9,37 @@ and encode on output.
 All standard streams and filehandles.  This does not include command-line
 arguments.
 
-    use open qw( :encoding(UTF-8) :std );
+```perl
+use open qw( :encoding(UTF-8) :std );
+```
 
 Alternately, individual streams and filehandles can be handled as follows.
 
 ## Standard streams
 
-    binmode STDIN,  ':encoding(UTF-8)';
-    binmode STDOUT, ':encoding(UTF-8)';
-    binmode STDERR, ':encoding(UTF-8)';
+```perl
+binmode STDIN,  ':encoding(UTF-8)';
+binmode STDOUT, ':encoding(UTF-8)';
+binmode STDERR, ':encoding(UTF-8)';
+```
 
 ## Existing filehandles
 
-    binmode $fh, ':encoding(UTF-8)';
+```perl
+binmode $fh, ':encoding(UTF-8)';
+```
 
 ## New filehandles
 
-    open my $in_fh,  '<:encoding(UTF-8)', $path;
-    open my $out_fh, '>:encoding(UTF-8)', $path;
+```perl
+open my $in_fh,  '<:encoding(UTF-8)', $path;
+open my $out_fh, '>:encoding(UTF-8)', $path;
+```
 
 ## Command-line arguments
 
-    use Encode;
+```perl
+use Encode;
 
-    @args = map { decode('UTF-8', $_) } @ARGV;
+@args = map { decode('UTF-8', $_) } @ARGV;
+```

io/perl6.md

@@ -6,15 +6,21 @@ follows.
 
 ## Standard streams
 
-    $*IN.encoding  = 'UTF-16';
-    $*OUT.encoding = 'UTF-16';
-    $*ERR.encoding = 'UTF-16';
+```perl
+$*IN.encoding  = 'UTF-16';
+$*OUT.encoding = 'UTF-16';
+$*ERR.encoding = 'UTF-16';
+```
 
 ## Existing filehandles
 
-    $fh.encoding = 'UTF-16';
+```perl
+$fh.encoding = 'UTF-16';
+```
 
 ## New filehandles
 
-    my $in_fh  = open $path, :r, :enc<UTF-16>;
-    my $out_fh = open $path, :w, :enc<UTF-16>;
+```perl
+my $in_fh  = open $path, :r, :enc<UTF-16>;
+my $out_fh = open $path, :w, :enc<UTF-16>;
+```

letter-casing/go.md

@@ -3,12 +3,16 @@
 Letter casing functions are available in the core `strings` package and always
 have Unicode semantics.
 
-    lowercase = strings.ToLower(str)
-    uppercase = strings.ToUpper(str)
-    titlecase = strings.ToTitle(str)  // every character
-    titlecase = strings.Title(str)    // first character of each word
+```go
+lowercase = strings.ToLower(str)
+uppercase = strings.ToUpper(str)
+titlecase = strings.ToTitle(str)  // every character
+titlecase = strings.Title(str)    // first character of each word
+```
 
 Although there is no case folding function for strings, there is a caseless
 equality function that uses case folding, 
 
-    strings.EqualFold(str1, str2)
+```go
+strings.EqualFold(str1, str2)
+```

letter-casing/perl5.md

@@ -3,16 +3,20 @@
 Letter casing functions are available in the core language and have Unicode
 semantics for character strings but ASCII semantics for byte strings.
 
-    $lowercase = lc $str;
-    $uppercase = uc $str;
-    $titlecase = ucfirst $str;
+```perl
+$lowercase = lc $str;
+$uppercase = uc $str;
+$titlecase = ucfirst $str;
 
-    use v5.16;
-    $casefold = fc $str;
+use v5.16;
+$casefold = fc $str;
+```
 
 The `fc` function was added in Perl 5.16 and requires `use v5.16` or
 `use feature 'fc'`.  The CPAN module `Unicode::CaseFold` provides the `fc`
 function for Perl 5.8.1 or greater.
 
-    use Unicode::CaseFold;
-    $casefold = fc $str;
+```perl
+use Unicode::CaseFold;
+$casefold = fc $str;
+```

letter-casing/perl6.md

@@ -3,7 +3,9 @@
 Letter casing methods are available for strings (`Str` objects) in the core
 language and always have Unicode semantics.
 
-    $lowercase = $str.lc;
-    $uppercase = $str.uc;
-    $titlecase = $str.tc;
-    $casefold  = $str.fc;
+```perl
+$lowercase = $str.lc;
+$uppercase = $str.uc;
+$titlecase = $str.tc;
+$casefold  = $str.fc;
+```

letter-casing/php.md

@@ -3,9 +3,11 @@
 Letter casing functions are available in the core language and have Unicode
 semantics.
 
-    $lowercase = mb_convert_case($str, MB_CASE_UPPER, 'UTF-8');
-    $uppercase = mb_convert_case($str, MB_CASE_LOWER, 'UTF-8');
-    $titlecase = mb_convert_case($str, MB_CASE_TITLE, 'UTF-8');
-    # case folding?
+```php
+$lowercase = mb_convert_case($str, MB_CASE_UPPER, 'UTF-8');
+$uppercase = mb_convert_case($str, MB_CASE_LOWER, 'UTF-8');
+$titlecase = mb_convert_case($str, MB_CASE_TITLE, 'UTF-8');
+# case folding?
+```
 
 The `mb_convert_case` function was added in PHP 4.3.

letter-casing/python.md

@@ -3,9 +3,11 @@
 Letter casing methods are available for strings (`str` objects) in the core
 language and always have Unicode semantics.
 
-    lowercase = str.lower
-    uppercase = str.upper
-    titlecase = str.capitalize
-    casefold  = str.casefold
+```python
+lowercase = str.lower
+uppercase = str.upper
+titlecase = str.capitalize
+casefold  = str.casefold
+```
 
 The `casefold` method was added in Python 3.3.

letter-casing/ruby.md

@@ -4,9 +4,11 @@ Letter casing functionality with Unicode semantics is not available in the core
 language, only ASCII semantics.  The Ruby gem `unicode_utils` provides this
 functionality.
 
-    require 'unicode_utils'
+```ruby
+require 'unicode_utils'
 
-    lowercase = UnicodeUtils.downcase(str)
-    uppercase = UnicodeUtils.upcase(str)
-    titlecase = UnicodeUtils.titlecase(str)
-    casefold  = UnicodeUtils.casefold(str)
+lowercase = UnicodeUtils.downcase(str)
+uppercase = UnicodeUtils.upcase(str)
+titlecase = UnicodeUtils.titlecase(str)
+casefold  = UnicodeUtils.casefold(str)
+```

normalization/go.md

@@ -4,9 +4,11 @@ Unicode normalization is available in the
 [unicode/norm](http://godoc.org/code.google.com/p/go.text/unicode/norm) package
 from the [go.text](http://godoc.org/code.google.com/p/go.text) project.
 
-    import "code.google.com/p/go.text/unicode/norm"
+```go
+import "code.google.com/p/go.text/unicode/norm"
 
-    nfd  := norm.NFD.String(str)
-    nfc  := norm.NFC.String(str)
-    nfkd := norm.NFKD.String(str)
-    nfkc := norm.NFKC.String(str)
+nfd  := norm.NFD.String(str)
+nfc  := norm.NFC.String(str)
+nfkd := norm.NFKD.String(str)
+nfkc := norm.NFKC.String(str)
+```

normalization/java.md

@@ -4,9 +4,11 @@ Unicode normalization is available in the standard class
 [java.text.Normalizer](http://docs.oracle.com/javase/7/docs/api/java/text/Normalizer.html)
 with Java SE 6.
 
-    import java.text.Normalizer;
+```java
+import java.text.Normalizer;
 
-    nfd  = Normalizer.normalize(str, Normalizer.Form.NFD);
-    nfc  = Normalizer.normalize(str, Normalizer.Form.NFC);
-    nfkd = Normalizer.normalize(str, Normalizer.Form.NFKD);
-    nfkc = Normalizer.normalize(str, Normalizer.Form.NFKC);
+nfd  = Normalizer.normalize(str, Normalizer.Form.NFD);
+nfc  = Normalizer.normalize(str, Normalizer.Form.NFC);
+nfkd = Normalizer.normalize(str, Normalizer.Form.NFKD);
+nfkc = Normalizer.normalize(str, Normalizer.Form.NFKC);
+```

normalization/javascript.md

@@ -3,9 +3,11 @@
 Unicode normalization is available in the npm package
 [unorm](https://npmjs.org/package/unorm).
 
-    var unorm = require('unorm');
+```javascript
+var unorm = require('unorm');
 
-    nfd  = unorm.nfd(str);
-    nfc  = unorm.nfc(str);
-    nfkd = unorm.nfkd(str);
-    nfkc = unorm.nfkc(str);
+nfd  = unorm.nfd(str);
+nfc  = unorm.nfc(str);
+nfkd = unorm.nfkd(str);
+nfkc = unorm.nfkc(str);
+```

normalization/perl5.md

@@ -4,9 +4,11 @@ Unicode normalization is available in the core module
 [Unicode::Normalize](https://metacpan.org/pod/Unicode::Normalize) with Perl 5.8
 and available on CPAN.
 
-    use Unicode::Normalize;
+```perl
+use Unicode::Normalize;
 
-    $nfd  = NFD($str);
-    $nfc  = NFC($str);
-    $nfkd = NFKD($str);
-    $nfkc = NFKC($str);
+$nfd  = NFD($str);
+$nfc  = NFC($str);
+$nfkd = NFKD($str);
+$nfkc = NFKC($str);
+```