[Tokyo.pm] today's one-liner quiz

[maeda ＠ src.ricoh.co.jp]

$BF10FB??t$H$O;W$&$1$I!"$3$s$J$N$O$I$&(B?

perl -l040e 'for($_="x"x shift,s/././;/x/;s/($x)./$1./g){print length($x=$`)+1}' 100

# $B$C$F$3$l!"0lEY$b%P%C%/%H%i%C%/$7$F$J$$$d$s!#(B

-------------------------------  Avatar          Md+   d/=$B""(B=\.   Md+
 $BA0ED(B $B70(B maeda ＠ src.ricoh.co.jp   75t 170km/h   AFC50  O \*oo*/ "  LG+ LG+
 ($B3t(B)$B%j%3!<(B $B%=%U%H%&%'%"8&5f=j(B   HeatSink 15   LRM10   .=X$B!1(BX=.   LRM10
-------------------------------  Armor 2164      Md+  _|_    _|_  Md+