
というわけで1ヶ月ほど食事制限だけによるダイエットをしている。人生2度目のダイエット
ちょっと前に座っている時に何か服が小さい気がして、久しぶりに体重計にのってみたら「ひーーーー!」となったので一念発起してその日から食事の内容を見直した。
しばらくただ単純に量を減らしてたんだけど、数週間グラフと食事の記録を取って把握した結果、自分の体重は朝・昼の分量を調節するのが重要だと感じた。朝は基本的にご飯1膳、納豆、目玉焼きの繰り返し。昼は最初は迷ってたんだけど、最近はほぼ必ずおにぎり2個と炭酸水。夜は気持ち少なめ程度、野菜中心。週末は食べ過ぎにだけ気をつけてわりと好きに食べる。酒は通常飲んでてもあまり関係がない、というパターンが見えてきたのわりと普通に飲んでる。
特に「酒」と「週末はわりと緩く」というのはガス抜きという意味でも重要で、これがなかったら結構挫折の可能性が高いと思う。某バーには相変わらず出入りしている。酒くらい飲めなかったらこんなストレスのたまることできんわー。ちなみにそこのバーテンダーの皆様は俺が歯ぎしりしながらおつまみを何も頼まずに帰っているのを何回も見ている。これからもがんばる。
今のところ5キロちょい。7キロくらいでやっと体重3桁が2桁になる。挫折しないためにも公開しておいた。
このペースなら子供が生まれるまでには90kgくらいまで落とせるはず・・・ッ
小ネタ。GETした内容のMD5が欲しかったので。
use strict;
use Furl::HTTP;
use Digest::MD5;
my $digest = Digest::MD5->new;
my $furl = Furl::HTTP->new;
$furl->request(
method => "GET",
url => "http://whatever/text.txt",
write_code => sub {
my ($code, $msg, $hdrs, $partial) = @_;
return unless $code ne 200;
$digest->add( $partial );
}
);
print $digest->hexdigest;
Daisuke Maki (a.k.a lestrrat): Perl hacker, Director of Japan Perl Association, YAPC::Asia Tokyo Organizer (2009-2012), Fluent in Japanese, English. Ex-Brazilian (sorta)
#perl #c #ruby #java #mysql #english #japanese #opensource #stf #cooking #scotch #cigar
翔泳社よりモダンPerl入門(2010)を出版させていただいております。できれば内容をアップデートしたいので是非皆様・・・現在の在庫処理にお力をお貸しください!><