GmailのSMTPを利用してPerlからメール送信(添付ファイル付)

Perl Gmail

さて、前稿でモジュールの準備ができたのでPerlからGmail経由で添付ファイルを送る。 #!/usr/bin/perl use lib '/home/xxxxxxxx/local/lib/perl5'; use Jcode; use Net::SMTP; use Net::SMTP::SSL; use MIME::Entity; my $smtp_server = 'smtp.gmail.com'; m…

2008-02-18

sakuraのレンタルサーバにCPANをインストール

Perl CPAN

cronで添付ファイルを飛ばすスクリプトをGmail経由にする。 Net::SMTP::SSLなどを使いたいのでCPANをユーザー領域にインストールする。 localディレクトリに入れることにする。 mkdir -p ~/local CPANの初期設定ファイルを作る。 echo no | cpan ~/.cpan/CPA…

2008-01-30

Attacking PHP

PHP

盛り上がってるみたいなので便乗。もともとは、 Mindblind - making web development suck less » Attacking PHP http://mindblind.net/2008/01/24/attacking-php/ こちらの記事で、それにいろんな人が意見を書いてるようです。日本語で分かりやすくまとめ…

2008-01-28

DoCoMoからシフトJISのメール

SMTP DoCoMo

最近DoCoMoのSMTPサーバーの仕様が変わったのか、DoCoMoからのメールがシフトJISで届くようになった。しかもSubjectまで、 Subject: =?shift_jis?B?hogefuga=?= こんな感じで。 PHSにきたメールをSOFTBANKにスクリプトで自動転送していたのですが、雑なつく…

2008-01-24

複数セッションでのhistory共有

Linux Bash

Ctrl+PやCtrl+Rで利用できるBashのコマンド履歴、実体は~/.bash_historyだが標準の動作ではセッション閉じた時に上書きなので、複数のセッションを同時利用してるとちと不便だ。ってことでプロンプト表示のたびにリロード、追記を行うことで共有する。 ~/.b…

2008-01-23

認証サイトのcrawler

Perl OpenSSL CPAN

無事にCrypt::SSLeayがインストールできたので、当初の目的のスクリプトを作成。 use strict; use LWP::UserAgent; use HTTP::Cookies; my $ua = LWP::UserAgent->new; my $url = 'https://www.example.com/login'; my $req = HTTP::Request->new('POST' => …

2008-01-23

HTTP::Responseのis_hogehoge

Perl CPAN

PerlのHTTP::Responseモジュールだがis_successというメソッドがある。前回のHTTPSのクローラーでも正常な通信の判定に利用していたが、これに落とし穴が。サーバーが302のMoved Permanentlyを返した時にFALSEとなるのである。CPANにあるドキュメントを読…

2008-01-23

SubVersionで更新があったファイルのみ抽出

SubVersion sed Linux

パッチじゃなくてそのまま上書きすればいいように、ディレクトリ構成を保持して更新ファイルを抽出したかった。 manを読むと、 $ cp -RP でもいけそうに思えたが、全ファイルが同じディレクトリにコピーされてしまった。探してたらcpioなるコマンドが見つか…

2008-01-23

trunkをbranchにmerge

SubVersion

branchで作業しててtrunkの修正をmergeしたいことがある。手順をいつも忘れるので備忘のために。 $ cd work-directory/branch $ svn merge -r xxx:yyy https://example.com/repos/hoge/trunk/ . branch作業してるワークディレクトリで上記コマンドを。 xxx…

2008-01-23

HTML5の草案発表

HTML XML

W3CのHTML Working Groupから最初の草案が発表されました。 W3C Publishes HTML 5 Draft, Future of Web Content(W3CのPR日本語) http://www.w3.org/2008/02/html5-pressrelease.html.en Web コンテンツの将来を担う HTML 5 草案を公開(W3CのPR日本語1/23付)…

2008-01-22

ActivePerl(x64)にCrypt::SSLeayのインストール(成功)

Perl CPAN OpenSSL

前回バイナリ版のOpenSSLを利用したせいでCrypt::SSLeayのインストールに失敗したので。 OpenSSLをソースから自前でコンパイル http://www.openssl.org/source/ からopenssl - 0.9.8g.tar.gzをダウンロードして解凍。中に入ってたINSTALL.W64を読むと Micro…

2008-01-21

ActivePerl(x64)にCrypt::SSLeayのインストール(失敗)

Perl CPAN OpenSSL

https通信をする簡単なcrawlerをPerlで書こうと思った。 Crypt::SSLeayモジュールを使おうと思うが、x64版のActivePerlでは、ppcでCrypt::SSLeayのインストールはできないようなのでCPANを使うことに。まずはOpenSSLをインストールこちらのWindows32用バイ…