エントリーの編集
![loading...](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/common/loading@2x.gif)
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
記事へのコメント0件
- 注目コメント
- 新着コメント
注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
![アプリのスクリーンショット](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/entry/app-screenshot.png)
- バナー広告なし
- ミュート機能あり
- ダークモード搭載
関連記事
為替レート取得プログラム
#!/usr/bin/perl #Yahooより現在の円・ドル取引レートを取得し、閾値を超えた場合にメールを送信します... #!/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 || $
2011/06/26 リンク