[Tokyo.pm] Re: [Tokyo.pm] ５月例会

[OKABE, Keiichi]

$B2,It$G$9!#(B

----- Original Message ----- 
From: "Yasuo Matsumoto" <yasuo.matsumoto ＠ jalinfotec.co.jp>
To: <tokyo-pm-list ＠ happyfunball.pm.org>
Sent: Friday, May 12, 2000 2:01 PM
Subject: [Tokyo.pm] $B#57nNc2q(B


> $B-#(B os-Multi $BJd407W2h(B(perl-5.6)

Perl5.6$BMQ$N(BWin32::GUI$B$,$G$-$F$$$k$h$&$J$s$G$9$,!"(B
$B%"%/%;%9$G$-$J$$$N$G;n$;$F$$$^$;$s!#(B
http://www.httptech.com/archives/0005/msg00032.html
---
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