¤³¤Î¥¹¥¯¥ê¥×¥È¤Ï¡¤Á°²ó¤Î¤â¤Î¤È¤Û¤È¤ó¤ÉƱ¤¸¤Ç¡¤¹Ô¤Ë¤¢¤ë¤½¤ì¤¾¤ì¤Îñ¸ì¤ò ñ°ì¤Î‘a’¤Ë°ìÅÙÊÑ´¹¤·¤Þ¤¹(Á°²ó¤Î¥¹¥¯¥ê¥×¥È¤Ç¤Ï¡¤¤½¤ì¤¾¤ì¤Îʸ»ú¤ò ‘a’¤ËÊѹ¹¤·¤Æ¤¤¤Þ¤¹)¡¥
ËÜʪ¤Îwc
¥×¥í¥°¥é¥à¤Ïwc -c
¤ËÂФ·¥ë¡¼¥×¤¬ºÇŬ²½¤µ¤ì¤Æ¤¤¤ë¤Î
¤Ç¡¤Ê¸»ú¤ò¿ô¤¨¤ë¤è¤êñ¸ì¤ò¿ô¤¨¤ëÊý¤¬¤Ï¤ë¤«¤ËÃÙ¤¯¤Ê¤ê¤Þ¤¹¡¥¤³¤ì¤é¤Î¥¹¥¯
¥ê¥×¥È¤Î¥Ü¥È¥ë¥Í¥Ã¥¯¤Ï¡¤¤É¤Á¤é¤«¤È¤¤¤¦¤È»»¿ô¤Ë¤¢¤ê¡¤¤³¤Î¤¿¤á¡¤Ã±¸ì¤ò¿ô
¤¨¤ë¤â¤Î¤Ï¤è¤ê®¤¯¤Ê¤ê¤Þ¤¹(¤è¤ê¾®¤µ¤¤¿ô¤ò´ÉÍý¤¹¤ëɬÍפ¬¤¢¤ê¤Þ¤¹)¡¥
Á°²óƱÍÍ¡¤¶¦ÄÌÉôʬ¤Ë¤Ïsed
¥¹¥¯¥ê¥×¥È¤Ø¤Î¥³¥á¥ó¥È¤Î½ÅÍ×À¤ò¼¨¤¹
¥³¥á¥ó¥È¤¬¤¢¤ê¤Þ¤»¤ó¡¥
#!/usr/bin/sed -nf
# Convert words to a's s/[ tab][ tab]*/ /g s/^/ / s/ [^ ][^ ]*/a /g s/ //g
# Append them to hold space H x s/\n//
# From here on it is the same as in wc -c. /aaaaaaaaaa/! bx; s/aaaaaaaaaa/b/g /bbbbbbbbbb/! bx; s/bbbbbbbbbb/c/g /cccccccccc/! bx; s/cccccccccc/d/g /dddddddddd/! bx; s/dddddddddd/e/g /eeeeeeeeee/! bx; s/eeeeeeeeee/f/g /ffffffffff/! bx; s/ffffffffff/g/g /gggggggggg/! bx; s/gggggggggg/h/g s/hhhhhhhhhh//g :x $! { h; b; } :y /a/! s/[b-h]*/&0/ s/aaaaaaaaa/9/ s/aaaaaaaa/8/ s/aaaaaaa/7/ s/aaaaaa/6/ s/aaaaa/5/ s/aaaa/4/ s/aaa/3/ s/aa/2/ s/a/1/ y/bcdefgh/abcdefg/ /[a-h]/ by p