4 件 見つかりました。

先日購入した無印良品のスチールユニットシェルフ[2005-05-06-4]が届きました。さっそく組み立ててたのですが、一部の部品に不良品があり一段だけ固定できません(本来5段なのが4段棚です)。どうやら運搬中に痛んだみたいです。再包装が甘かったのかもしれません(展示品だったため工場ではなくお店の人が包装)。今週中にまた無印のお店に行って相談してきます。

- スチール棚セット・ワイド 大

会話をスムーズに進行させるためのTips集といったところ。
「うなづき」だけじゃだめですよー!
■水野敬也, 小林昌平, 山本周嗣 / ウケる技術

![]()
![]()
サンプル会話自体は爆笑オオウケというものではなく、
一部寒さが漂っていますが、笑いを取ることは本質ではないのです。
いかにボケたりツッコんだりして会話をつなげていけばいいのかという
「会話を進める手順」の参考とするのが良いかと。
もちろんそういう会話テクに関しては、「普段から使ってるよ」
「当たり前すぎ」との意見もあるとは思いますが、リストアップされてる
と「なるほどな」と再考させられるわけです。
ref. [2004-04-21-3]
はてなダイアリー「たつをはてな」を、この「たつをの ChangeLog」の記
事リストとして利用してみることにしました。はてなキーワードをたどる
人を呼び込んでみる作戦。はたして?
過去記事は chalow の cl.itemlist をはてなダイアリー形式XMLに変換し、
一気にインポート。
以下のやっつけコード cli2hatena.pl で変換します。
cli2hatena.pl
(「無償・無保証・著作権放棄」<http://lifehacks.ta2o.net/byebye-copyright.html>)
#!/usr/bin/perl
# cli2hatena
use strict;
my %hash;
my $date;
while(<>){
my ($url, $tit) =split(/\t/,$_);
($date) = ($url =~ /(\d{4}-\d\d-\d\d)/);
next unless ($url =~ s!^.+"(.+)".+$!http://nais.to/~yto/clog/$1!);
$tit =~ s!\[.+?\]\s*$!!g;
unshift @{$hash{$date}}, {url=>$url,title=>$tit};
}
my $all = qq(<?xml version="1.0" encoding="UTF-8"?>\n<diary>\n);
foreach (sort {$b cmp $a} keys %hash) {
$all .= qq(<day date="$_" title="">\n<body>\n);
my $ctr;
foreach (@{$hash{$_}}) {
$ctr++;
$all .= qq(*p$ctr*$_->{title}\n$_->{url}\n);
}
$all .= qq(</body>\n</day>\n);
}
$all .= qq(</diary>);
use Jcode;
print Jcode->new($all)->utf8;
使い方:
cli2hatena.pl cl.itemlist > hd.xml
たつをの ChangeLog