CPAN モジュールがインスコされたパスを調べる時 - にぽたん研究所
いつも、インスコした CPAN モジュールの .pm ファイルがある場所を探すのに、今までいい方法が思いつかずに % perl -MDBIx::Class -e'print $INC{"DBIx/Class.pm"}, "\n"' こんなんしてたわけだが、よくよく考えたら、こんな方法でイケることに気付く。 % perldoc -ml DBIx::Class あぁぁ、今まで同じ結果を求めるために、なんであんなに苦労していたんだろう…。 ちょっと .pm を書き換えてみたい時とかも % sudo $EDITOR `perldoc -ml DBIx::Class` いや、こんなんすればいいなんてラクだ…。 これって常識なのか？ 知らないおいらが非常識？？ 上記例のようにさ、DBIx::Class みたいな「そんなに長くないモジュール名」ならいいですよ。 でも長いと、そりゃもうウンザリっすよ。 %
String::ShellQuote でコマンドラインをクォートしてリモートで実行する - @kyanny's blog
追記 コメント欄で指摘されているように、 Net::SSH::Perl モジュールを利用したほうが無用なことで困らずに済みそうです。 use String::ShellQuote; my $command = q[gunzip -c /path/to/access_log.gz | perl -e 'while(<>){print}']; my $quoted_command = shell_quote($command); # ' => '\'' とクォートされる qx/ssh $server $quoted_command/; しかしこれが何度やっても失敗するサーバがあり、エラーメッセージ Badly placed ()'s. でぐぐってみると csh/tcsh に特有のものらしく、確かに該当サーバのログインシェルは csh だった。 \(\) などとしなくてはならないらしい。が St
Test::Base でこういうのどう書けば良いのだろう - @kyanny's blog
追記 http://d.hatena.ne.jp/a666666/20090406/1238986138#c1238990265 でご指摘いただいたように、 yaml フィルターを使って - ~ で undef を表現してやれば良いそうです。 #!/usr/bin/perl use strict; use warnings; use Test::Base; plan tests => 1 * blocks; sub match { my $input = shift; my $re = qr/^(\w+)\s(\w+)\s(\w+)\s?(\w+)?$/; my @matched = $input =~ $re; return \@matched; } filters { expected => [qw(lines chomp array)], }; run_is_deeply input
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
