コマンドの実行を呟く

実際に実行してないので、妄想。

% tw ./a.out aaa bbb ccc

と実行したときに、Twitterで
"./a.outを実行なう"
と、つぶやいて実行が完了したら
"./a.outの実行が完了しましたにゃん"
とか呟くのとかあれだよねぇ

ということで、スクリプトを書いてみるかぁあああああああ

POSTするperlスクリプト

#!/usr/bin/perl
use strict;
use warnings;
use utf8;
use Net::Twitter::Lite;
my $consumer_key = 'xxxxxx';
my $consumer_key_secret = 'xxxx';
my $access_token = 'xxxxx';
my $access_token_secret = 'xxxxxxxx';
my $nt = Net::Twitter::Lite->new(
  consumer_key    => $consumer_key,
  consumer_secret => $consumer_key_secret,
);
$nt->access_token($access_token);
$nt->access_token_secret($access_token_secret);
  eval{
    $nt->update({ status =>$ARGV[0]});
  };

シェルスクリプト

#!/bin/bash
perl tw.pl "$1を実行なう"
$@
perl tw.pl "$1の実行完了だにゃん"

これで、いけるかわかんないけど多分いけるんじゃね？
プログラムを走らせている間に買い物とか行ってて、
Twitterで終わったかどうか確認できるのは結構いいかも？かも？

参照：
Net::Twitter::Lite
http://d.hatena.ne.jp/hab_kun/20101215/1292393039