2010-01 / 2010-01-31

前のエントリ: スキー [diary]
次のエントリ: レジストリの参照/更新 [perl]

クリップボードのテキストをコマンドラインperlで変換
2010-01-31-1 / カテゴリ: [cygwin][perl] / [permlink]

  • /usr/bin/getclip
クリップボードの中身をstdoutへ出力する。
cygutilsパッケージに含まれる。

  • /usr/bin/putclip
stdinをクリップボードへコピーする。
cygutilsパッケージに含まれる。

これらとperl(-e によるコマンドライン実行)をパイプで組み合わせれば、「エディタの置換機能じゃちょっと困難だけど、スクリプトにするまでもない変換」なんかをサクサク実行。

例: 開いているエクセルの特定部分をコピーしたデータ(tab区切り)をpukiwikiの表形式に変換
% getclip | perl -ple 's/^|[,\r]/|/g' | putclip
入力
入力エクセル
出力
|ID|曲名|アーティスト|ファイルサイズ|再生時間|再生回数|
|4863|私の時間|初音ミク|6412945|266919|1024|
|4879|SUPER HATSUNE BEAT vol.1|初音ミク|4613135|575373|919|
|4917|SING＆SMILE LONG ver.|初音ミク|1809195|223869|919|
|5081|ぴんぽんだっしゅ！|初音ミク|2188842|136097|954|
|5133|みくみくにしてあげる♪|初音ミク|1198334|99134|940|
|5149|ラジカルペイント|初音ミク|1572383|97567|984|
|5193|教えて!! 魔法のLyric|初音ミク|2070128|257619|952|
|5257|電脳スキル|初音ミク|3157470|196832|866|
|5267|魔法少女ラジカルペイント（Long Ver）|初音ミク|1838250|228649|885|
|5691|とらいあんぐる☆Girl's Heart|初音ミク|3608040|180035|1091|

例が適当すぎるだろ…

-p はこっち。
スクリプトでがっつり変換するならこちら。=> [2006-03-08-3]
[ コメント ]
前のエントリ: スキー [diary]
次のエントリ: レジストリの参照/更新 [perl]

2013 : 01 02 03 04 05 06 07 08 09 10 11 12
2012 : 01 02 03 04 05 06 07 08 09 10 11 12
2011 : 01 02 03 04 05 06 07 08 09 10 11 12
2010 : 01 02 03 04 05 06 07 08 09 10 11 12
2009 : 01 02 03 04 05 06 07 08 09 10 11 12
2008 : 01 02 03 04 05 06 07 08 09 10 11 12
2007 : 01 02 03 04 05 06 07 08 09 10 11 12
2006 : 01 02 03 04 05 06 07 08 09 10 11 12
2005 : 01 02 03 04 05 06 07 08 09 10 11 12
2004 : 01 02 03 04 05 06 07 08 09 10 11 12

最終更新時間: 2013-05-02 16:12