[その他]


この日記のはてなブックマーク数 このエントリーを含むはてなブックマーク
為替アラートプログラム。cronに定期的に実行するようにして利用。

#!/usr/bin/perl

#Yahooより現在の円・ドル取引レートを取得し、閾値を超えた場合にメールを送信します。
#$mailtoと$mailfromは適宜変更してください。


use Jcode;
use MIME::Lite;

$max = 112.00; #max閾値
$min = 109.00; #min閾値

#YAHOOより円/ドルの為替相場を取得
@result = `lwp-request 'http://quote.yahoo.co.jp/m5?a=1&s=USD&t=JPY'`;

foreach (@result){
        chomp $_;
        $_ = jcode($_)->euc;
        if($_ =~ /(\d\d\d)\.(\d\d)/g){
                $rate = "$1\.$2";
        }
}


#現在の為替が閾値の範囲外ならメールを送信
if($rate > $max || $rate < $min){
        &sendmail();
}


sub sendmail{
my $mailto = 'アラート送信先メールアドレス';
my $mailfrom = 'アラート送信元'メールアドレス;
my $subject = '為替レートアラート';
$subject = jcode($subject)->mime_encode;

my $message = << "__HERE__";
為替レートが閾値を超えました。
閾値: $min 〜 $max

現在のレート: $rate

__HERE__

$message = jcode($message)->jis;

my $msg = MIME::Lite->new(
From => "$mailfrom",
To => "$mailto",
Subject => "$subject",
Type => 'text/plain; charset="ISO-2022"',
Encoding => '7bit',
Data => "$message"
);

$msg->send();
}


関連記事
IE8スタイル崩れ
viのキーバインドをbashで使用する
Firefoxでブックマークの保存先変更
一定期間以上のメールを削除
Subversionの基本操作
sshでリモートのCVSリポジトリにアクセスするには
日本語ドメインのDNSへの登録
phpMyFAQにて質問をできなくするには
rndc: connection to remote host closed
PHP Fatal error: Allowed memory size of 8388608 bytes exhausted
サブホスト使用時のMXエントリー
text-align: centerが効かない
Firefoxの独自検索プラグイン
openoffice wirter メモ書き
pleskの覚え書き
javax.net.ssl.SSLException: Unrecognized SSL handshake
Pleskのバーチャルホスト設定
Thunderbirdで外部エディタを使う
phpMyFAQ
外部スタイルシートの読み込み
PHPのメール文字化け
YahooがAPIを公開
MovableType - Jcodeのエラー
MovableType - ディレクトリ構造の変更
MovableType - 最終更新日順にエントリーを表示
centosのアップデート時のサーバ指定
vsftpd - use_localtime
glib-config - glibのバージョンチェック
WebStart 4.xにおけるSSL
ThunderbirdでHTMLメールをテキスト形式にて表示
webminのパスワード変更
Turbolinux - DBD::mysqlのインストールに失敗
dpkg - パッケージの管理
APNICにて国別に割り当てられているIPアドレスを調べる
ページ内のリンク総数
様々な検索
MovableType - トラックバックスパムとコメントスパム対策
vsftpd - 改行コード
MovableType - 同一カテゴリ内のエントリー移動
為替レート取得プログラム
Movabletype - mod_perlの使用
vsftpd - 上位ディレクトリにいけないようにする
MovableType - パンくずメニューの作成
トラックバックPingのタイムアウト
Yahooへの登録
AWSTATSにセキュリティホール
WebDruid - Webalizerの後継
MovableType - アーカイブのソート
MovableType - 一度にリビルドするエントリーの数を変更するには
IPアドレスの範囲指定 - CIDRとサブネットマスク
MovableType - 3.1へのアップグレード
10進数から2進数への変換
textフィールドの改行をさせる
独自ドメイン取得の際の注意
自宅サーバ構築に適したプロバイダー
METAタグによるURLのリダイレクション
IMEをOFFにするには
MovableType - インストール
広告