ロボット屋さんMisskeyサーバー立てたのでアカウント作って！ 
Haskell版のcgi-nameとketa
Sun Dec 29 16:16:50 JST 2013 (modified: Fri Sep 29 21:38:45 JST 2017)
views: 1722, keywords:コマンド,Haskell,open この記事は最終更新日が7年以上前のものです。
Haskell版のOpen usp Tukubaiのコマンド：cgi-namea.hsとketa.hsをリリースしましたー。他にやることが山積みですが。
正月は実家に帰りますが基本、ずっと仕事の模様。
南無阿弥陀仏。
使い方
まずGHCでコンピャイル。
uedamac:COMMANDS.HS ueda$ ghc keta.hs
[1 of 1] Compiling Main ( keta.hs, keta.o )
Linking keta ...
uedamac:COMMANDS.HS ueda$ ghc cgi-name.hs
[1 of 1] Compiling Main ( cgi-name.hs, cgi-name.o )
Linking cgi-name ...cgi-nameは、GETやPOSTで投げられた文字列をキーバリューの形式に整形するコマンドです。
uedamac:COMMANDS.HS ueda$ echo "https://www.google.co.jp/search?q=%E3%83%8A%E3%83%AA%E3%82%BF%E3%82%BF%E3%82%A4%E3%82%B7%E3%83%B3&oq=%E3%83%8A%E3%83%AA%E3%82%BF%E3%82%BF%E3%82%A4%E3%82%B7%E3%83%B3&aqs=chrome..69i57j0l5.1951j0j4&sourceid=chrome&espv=210&es_sm=91&ie=UTF-8" | sed 's/.*?//' | ./cgi-name
q ナリタタイシン
oq ナリタタイシン
aqs chrome..69i57j0l5.1951j0j4
sourceid chrome
espv 210
es_sm 91
ie UTF-8ketaは桁揃えするコマンドで、端末で手作業でデータいじりするときにはかなり便利です。さっきの例（なぜナリタタイシンなのか自分でもよく分からんが。）
###右揃え###
uedamac:COMMANDS.HS ueda$ echo "https://www.google.co.jp/search?q=%E3%83%8A%E3%83%AA%E3%82%BF%E3%82%BF%E3%82%A4%E3%82%B7%E3%83%B3&oq=%E3%83%8A%E3%83%AA%E3%82%BF%E3%82%BF%E3%82%A4%E3%82%B7%E3%83%B3&aqs=chrome..69i57j0l5.1951j0j4&sourceid=chrome&espv=210&es_sm=91&ie=UTF-8" |
sed 's/.*?//' | ./cgi-name | ./keta
q ナリタタイシン
oq ナリタタイシン
aqs chrome..69i57j0l5.1951j0j4
sourceid chrome
espv 210
es_sm 91
ie UTF-8
###左揃え###
uedamac:COMMANDS.HS ueda$ echo "https://www.google.co.jp/search?q=%E3%83%8A%E3%83%AA%E3%82%BF%E3%82%BF%E3%82%A4%E3%82%B7%E3%83%B3&oq=%E3%83%8A%E3%83%AA%E3%82%BF%E3%82%BF%E3%82%A4%E3%82%B7%E3%83%B3&aqs=chrome..69i57j0l5.1951j0j4&sourceid=chrome&espv=210&es_sm=91&ie=UTF-8" |
sed 's/.*?//' | ./cgi-name | ./keta --
q ナリタタイシン
oq ナリタタイシン
aqs chrome..69i57j0l5.1951j0j4
sourceid chrome
espv 210
es_sm 91
ie UTF-8
###桁揃えに必要な桁数を求める###
uedamac:COMMANDS.HS ueda$ echo "https://www.google.co.jp/search?q=%E3%83%8A%E3%83%AA%E3%82%BF%E3%82%BF%E3%82%A4%E3%82%B7%E3%83%B3&oq=%E3%83%8A%E3%83%AA%E3%82%BF%E3%82%BF%E3%82%A4%E3%82%B7%E3%83%B3&aqs=chrome..69i57j0l5.1951j0j4&sourceid=chrome&espv=210&es_sm=91&ie=UTF-8" |
sed 's/.*?//' | ./cgi-name | ./keta -v
8 26
###1列目を8文字で右揃え、2列目を26文字で左揃え###
uedamac:COMMANDS.HS ueda$ echo "https://www.google.co.jp/search?q=%E3%83%8A%E3%83%AA%E3%82%BF%E3%82%BF%E3%82%A4%E3%82%B7%E3%83%B3&oq=%E3%83%8A%E3%83%AA%E3%82%BF%E3%82%BF%E3%82%A4%E3%82%B7%E3%83%B3&aqs=chrome..69i57j0l5.1951j0j4&sourceid=chrome&espv=210&es_sm=91&ie=UTF-8" |
sed 's/.*?//' | ./cgi-name | ./keta 8 -26
q ナリタタイシン
oq ナリタタイシン
aqs chrome..69i57j0l5.1951j0j4
sourceid chrome
espv 210
es_sm 91
ie UTF-8 ぜひお使いください。
ノート
Tweet
