Perl æ¨æºå ¥å㨠utf8 2007-02-07-1 [Programming] èªæãè¾¼ããèªåç¨ã¡ã¢ã åºæ¬ã¬ãã«ã®è©±ã ãããã©ãã¯ããããªããã¡ãã£ã¨ã¯ã¾ã£ã¦ãã®ã§ã test.pl : #!/usr/bin/perl use strict; use warnings; use Encode; use utf8; binmode STDIN, ":utf8"; binmode STDOUT, ":utf8"; while (<>) { print if (/[ã-ã]/); } ã¨ããã³ã¼ããæ¸ããã ãããã test.pl ã¯è¡ãããã test.pl utf8.txt ã¯ã ãã ã§ãããããã #!/usr/bin/perl use strict; use warnings; use Encode; use utf8; binmode STDOUT, "
{{#tags}}- {{label}}
{{/tags}}