[Tokyo.pm] Re: はじめまして

[OKABE, Keiichi]

岡部です。

----- Original Message ----- 
From: "Takashi IMANISHI/HOME" <wotaka ＠ ceres.dti.ne.jp>
To: <tokyo-pm-list ＠ happyfunball.pm.org>
Sent: Monday, May 29, 2000 12:50 PM
Subject: [Tokyo.pm] はじめまして


> ＃Perlで部屋の掃除と彼女の相手をしてくれるスクリプトが
> ＃作れればいいのですが・・・

部屋の掃除はロボット使えばなんとかなるけど、
彼女の相手をしてくれるスクリプト。それは永遠の課題かも

とりあえず、今まさに私がそれに直面してたりする。
---
use Tk;$c=tkinit->Canvas(-height=>50,-width=>100)->pack;$a="15115155,223342,
2343,3335,24254544,6163,5292918185,53939484,7273,6465757464";$a=~s/\s//g;
map{s/(\d)/sprintf("%s,",$1*10)/eg;$c->createLine(split /,/,$_)}(split /,/,$a);
MainLoop; #okabek ＠ beige.ocn.ne.jp