Pray For Japanのまとめページつくりました。

昨日の昼から津波すごい威力だなーと思い、
#prayforjapan の TL を見てました。

朝から@naomi schneider さんから twitter をやっていない方にも伝えたいというメッセージをもらい、
少しでも被災者の方の励みになればと思い、
自己満足かもしれませんが一緒にページを作りました。

Pray For Japan

皆さんRTお願いします！

コメント

  1. Hajar2011年3月14日 6:50

    Isn't there any translation! :) I don't know Japanese language.
    I'll pray for Japan.

    返信削除
  2. watanabefg2011年3月14日 23:21

    Hi, Hajar. Sorry, I easily translation this post.
    A tsunami is so cruel that I feel like launching the site "Pray For Japan ( http://ow.ly/4cXd4%20 ) ".
    If you have your twitter account, please retweet this post, hope pray for Japan.

    返信削除

コメントを投稿

このブログの人気の投稿

GAEでOAuthというかTwitter認証してみた。

イメージ
結構てこずりましたが、Google App Engine for Pythonで OAuth認証というかTwitter認証をしてみました。 Softbankの夏モデル携帯でTwitterが機能の一つとして入っているものが発表され、 これからTwitterの人口はどんどん増えるはずなので、 OpenIDみたいな統合認証のようにOAuthを使えたらなぁという思いでコーディングしてみました。 元ネタは サンプルコードで分かるGAE＆Twitter API開発 。 その節はお世話になりました。 oauth.py, simple_cookie.pyなどは上記のリンク先から取得してください。 verify後にリロードするとバグっていたので、self.redirect('/')で直しました。 #!/usr/bin/env python # -*- coding:utf-8 -*- __author__ = "Hironori Watanabe" import time import datetime import logging import os import oauth import wsgiref.handlers from google.appengine.ext import webapp from google.appengine.ext.webapp import util from google.appengine.ext.webapp import template from simple_cookie import Cookies from google.appengine.ext import db _DEBUG = True INDEX_TEMPLATE_NAME = 'index.html' LOGIN_TEMPLATE_NAME = 'login.html' HOME_TEMPLATE_NAME = 'home.html' # twitterのconsumer_keyとconsumer_secret_keyを指定 CONSUMER_KEY = "xxxxx自分のコンシューマキーを入れてねxxxxx" CONSUM...
続きを読む

perlのMIME::Liteならメール送信はすぐ書ける。その２

メール送信のモジュールMIME::Liteを利用してそういえばこんなの作りました。のコード。 PHPMailerと比較してPerlは結構コーディングが楽だと感じました。 #!/usr/bin/perl # # $Id: perlmailer.pl 35560 2010-05-29 01:08:30Z watanabefg $ # use strict; use warnings; use Encode; use utf8; use MIME::Lite; use File::Basename; my $mail_from = $ENV{'MAIL_FROM'}; my $mail_to = $ENV{'MAIL_TO'}; my $mail_subject = decode('shiftjis', $ENV{'MAIL_SUBJECT'}); my $mail_body = decode('shiftjis', $ENV{'MAIL_BODY'}); my @mail_attach = (); my $message = MIME::Lite->new( From => $mail_from, To => $mail_to, Subject => encode('MIME-Header-ISO_2022_JP', $mail_subject), Type => 'multipart/mixed', ); # メール本文 $message->attach( Type => 'text/plain; charset="ISO-2022-JP"', Data => encode('ISO-2022-JP', $mail_body), ); # 添付ファイルを取得 if ($ENV{'MAIL_ATTACH'} ne ""){ @mail_attach = split(/\,/, $ENV{'MAIL_ATTACH'}); } if ($#m...
続きを読む

PerlのMIME::Liteならメール送信はすぐ書ける。その１

今日はPerlで、メール送信するスクリプトを書いてました。 かなり前になりますが、JCode.pmを使って ISO-2022-JPにエンコーディングしてたんですが、 今となってはuse Encode;でいけるようになってるんですね。 機種依存文字も使わず、メール本文も決まっているため、 それほど関係はなかったのですが少し参考にさせてもらいました。 Perlで日本語を送信 こっちはドンピシャな記事でした。 メールを送るなど ちょっとカスタマイズした部分を追記。 Cシェルの中身を抜粋。 setenv MAIL_ATTACH filename1,filename2,filename3 perl ./perlmailer.pl  perlmailer.plをうろ覚えで記載。(間違ってたらごめんなさい。) @mail_attach = split(/\,/,$ENV{"MAIL_ATTACH"}); foreach $attach_file ( @mail_attach ) {     # 添付ファイルの処理 } 何がやりたいかというと、ある条件でgrepしたログファイルを添付して、 デイリーの夜間バッチでメール送信したかったのです。 そのため、添付ファイルはいくつでもつけれるように、 ファイル名をカンマ区切りでつなげてシェルからperlmailer.plをキックしてみました。 バッチの場合は大体環境変数に持っていくと、可読性もメンテナンス性も上がり、 プログラムがうまく書ける気がします。 ★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★ 何かぼんやりと勉強会をしたいなぁと思っています。 ネタ募集中です。 関西で開催する予定ですので、関西の方はお楽しみに！ ★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★
続きを読む