Macã§ã®ã·ãªã¢ã«éä¿¡ã®ãã§ãã¯ç¨ã«ä½ã£ãã¹ã¯ãªããã§ã ASCIIã10/16é²æ°ãæ··å¨ããã¿ã¼ããã«ã½ãããæã£ã¦ããªãã£ãã®ã§æ¸ãã¦ã¿ãã ï¼Windowsç¨ã«ã¯ã·ãªã¢ã«ã³ãã³ãã¨ã¯ã¹ããã¼ã©2ã便å©ã§ãï¼ ã¾ãã¯éä¿¡ç¨ã®txmon #! /usr/bin/perl -w # txmon foreach (@ARGV) { unless (/^-/) { open (FH, ">$_") or die ("can't open port\n") ; } } while (<STDIN>) { @params = split(/,/) ; @txarr = () ; $valid = 1 ; foreach (@params) { s/(^\s+)|(\s+$)//g ; if (/^"(.+)"$/s) { for ($i=0; $i<length($1); $i++) { pu
{{#tags}}- {{label}}
{{/tags}}