Windows åãã®ã½ããã«èªã¿è¾¼ã¾ãããã¡ã¤ã«ãUTF-8(BOMä»ã)ã«ããå¿ è¦ããã£ãã®ã§ããã£ã¦ã¿ããTeraPadã§éãã¦ãæåã³ã¼ãæå®ä¿åãããã°ã§ãããã ãã©ãã¹ã¯ãªããå¦çã®ä¸é£ã®æµãã«ä¹ãããã£ãã®ã§ããã£ã¦ã¿ã¾ããã Windows7(64bit)ç°å¢ã§ãã£ã¦ã¾ããã #!/usr/bin/perl # # UTF-8(BOMç¡ã) â UTF-8(BOMä»ã)ã«ãã¡ã¤ã«ãå¤æãã # # 2014.09.07_scripted by perl48 use strict; use warnings; use utf8; # èªã¿è¾¼ããã¡ã¤ã«åãã»ãã my $old = 'before.txt'; # æ¸ãåºããã¡ã¤ã«åãã»ãã my $new = 'after.txt'; # ãã¡ã¤ã«ãã³ãã«ããªã¼ãã³ãã¦ãå¤é¨ããã¹ããã¡ã¤ã«ã®èªã¿è¾¼ã¿æºå open my $r
{{#tags}}- {{label}}
{{/tags}}