[kansaipm] Re: Programming Perl, 3rd Edition

[OKABE, Keiichi]

岡部です

----- Original Message ----- 
From: "IWAI, Masaharu" <css at geocities.co.jp>
To: <kansai-pm-list at pm.org>
Sent: Sunday, August 13, 2000 5:42 AM
Subject: Re: [kansaipm] Re: Programming Perl, 3rd Edition


> http://www.skysoft.co.jp/GetTitleDetail.asp?UserID=106869&ISBN=0596000278&Source=J3
> こっちっぽいです。現在は在庫切れみたいですけど。

あ、ほんとだ。でもこれページ数が妙に少ないみたいですね。
1104ページあるはずなのに850ページになってる。
---
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 at beige.ocn.ne.jp