perlに関する質問です。

$in_params=$ARGV[0];
@pairs = split( /&/,$in_params);

foreach $pair (@pairs){
($tag, $value) = split(/=/,$pair);
$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C",hex($1))/eg;
(中略)
}

師匠募集中！

現存する師匠達:http://twitter.com/#!/puriketu99/prk2master

下記に関する私の人力検索上の質問をTwitterのリプライで通知しようと思っています。
通知されることに差し支えがなければ、あなたのTwitterアカウントを教えてください。
得意分野や何か一言ありましたら、書き添えてご連絡頂けると幸いです
（連絡手段は、twitter、この質問の回答、コメントでお願い致します）

・Google App Engine for python
・Ruby on Rails
・jQuery
・JavaScript
・Mercurial
・Git
・Mac
・Heroku
・PhoneGap
・Facebook Connect
・その他周辺事項

補足
・全てに精通している必要はありません
・もし、途中で通知がご面倒になった場合は、一言おっしゃっていただければ通知をしないようにします
・気が向いたときに回答していただければ充分です
・開発をしているときは高い頻度で質問することがあります
・初歩的な質問が多いです(http://q.hatena.ne.jp/puriketu99/questionlist)
・なるべく、答えを知っている人であればすぐに答えられるような質問をするようにしています
・私のTwitterアカウント(http://twitter.com/#!/puriketu99)
・熟練のプログラマーの方だと嬉しいです
・何か不明点があれば、Twitterやコメント欄でお問い合わせください

ちなみに、スペースがまともにでコードされるエンコードなら"%20"だと思いますよ。

ネットの使い方もわからずに回答してしまい、申し訳ありませんでした。