角待ちは対空

おもむろガウェイン

Perlに関する記事一覧

sedとperlと部屋とワイシャツと私

MacOSのsedは-iオプションのあとに空文字を指定しても(-i'')in-place(上書き)にしつつバックアップファイルは作らないみたいな動作はできない。 sed -i'' -e 's/foo/bar/' test.txt するとtest.text-eというファイルができて辛い。ちなみに''がなくてもだめ …

Furl::S3のTIPS100連発

Furl::S3 にはドキュメントに記載されている create_object メソッドの他に create_object_from_file が存在する。前者はファイルハンドルを引数に取るのに対して後者はファイル名を引数に取る。 また create_object_from_file は content type の判定を自動…

PerlでAWS S3の事前署名付きURLを生成する

忙しくて昨日一昨日サボったけどどっかでつじつま合わせるよ。 docs.aws.amazon.com 基本的にこの通り実装すれば良い。SDKがない言語だと苦労する。 use strict; use warnings; use utf8; use Digest::SHA qw(hmac_sha256_hex hmac_sha256 sha256_hex); use …

cpanモジュールのインストールに失敗したら

--configure-args をいい感じに渡せばどうにかなるモジュールもあればどうしようもないモジュールもある。 昔は全然解決方法がわからなかったけど、ここ一年は何かと手で解決してた。 基本は以下の通り。 cpanm --look Hoge::Hoge ディレクトリが開かれる。…

標準出力(標準エラー出力)の内容を一時的に Perl 変数に書き込みたい

Devel::Peek::Dump なんかは結果が標準エラー出力に表示されるだけなのでコード内で結果を使いたいと思うと標準エラー出力の出力先を変数へ書き換え、その後復元させてやる必要がある。 use strict; use warnings; use utf8; my $stderr; open my $temp, '>&…