--- title: Gaucheで外部コマンドを実行する author: kazu634 date: 2011-09-19 wordtwit_post_info: - 'O:8:"stdClass":13:{s:6:"manual";b:0;s:11:"tweet_times";i:1;s:5:"delay";i:0;s:7:"enabled";i:1;s:10:"separation";s:2:"60";s:7:"version";s:3:"3.7";s:14:"tweet_template";b:0;s:6:"status";i:2;s:6:"result";a:0:{}s:13:"tweet_counter";i:2;s:13:"tweet_log_ids";a:1:{i:0;i:5447;}s:9:"hash_tags";a:0:{}s:8:"accounts";a:1:{i:0;s:7:"kazu634";}}' author: - kazu634 categories: - gauche - Lisp ---

Gaucheで外部コマンドを実行しようとしたのですが、うまく行かなかったのでとりあえずダンプしておきます。

やりたいこと

外部コマンドをGaucheから実行したい!

ここまではわかった

Gaucheで外部コマンドを実行する場合は、どうやら run-process というものがあるらしいので、このコマンドを使えばよさそう

うまく行かなかったこと

次のようなコマンドを実行したかったけれど、実行に失敗した:

% virt-install --name dev1 --ram 512 --disk path=dev1.img,size=10 --vcpus 1 --network bridge=br0,model=virtio --graphic vnc,listen=... --pxe

とりあえず REPL から実行してみます:

gosh> (use gauche.process)
#<undef>
gosh> (run-process '(virt-install --name dev1 --ram 512 --disk path=dev1.img,size=10 --vcpus 1 --network bridge=br0,model=virtio --graphic vnc,listen=0.0.0.0 --pxe))
#<process 1148 "virt-install" active>
gosh> ERROR    Unknown argument ',size=10'

なんか上手くいかない。マニュアルにはこんな記述が。。。:

cmd/argsの各要素は、x->stringで文字列に変換されます。

Gauche ユーザリファレンス: 9.16 gauche.mop.singleton – シングルトン

というわけで実験:

gosh> (x->string '(virt-install --name dev1 --ram 512 --disk path=dev1.img,size=10 --vcpus 1 --network bridge=br0,model=virtio --graphic vnc,listen=0.0.0.0 --pxe))
"(virt-install --name dev1 --ram 512 --disk path=dev1.img ,size=10 --vcpus 1 --network bridge=br0 ,model=virtio --graphic vnc ,listen=0.0.0.0 --pxe)"

あっ、なんか「,」のところにスペースが入っている。。。原因はこれか。

さてさて

解決策はどうすればいいのだろうか。。。