[Tokyo.pm] Re: (Fun) mount.pl
OKABE, Keiichi
okabek @ beige.ocn.ne.jp
2000年 2月 3日 (木) 09:55:53 CST
岡部です。
----- Original Message -----
From: "Shimpei Yamashita" <shimpei @ gol.com>
To: <tokyo-pm-list @ happyfunball.pm.org>
Sent: Thursday, February 03, 2000 11:50 PM
Subject: Re: [Tokyo.pm] Re: (Fun) mount.pl
> それにしても…なんで?
> …と聞くのは野暮なんでしょうね、やっぱり。
野暮と思ったらそう言ってみるのも大事だと思います。 ;-)
そして自分がかっこいいと思うものを目指す・・・
# う~ん、最近寝てないから考えが暴走してるかな?
Linuxのdistributionのひとつにtomsrtbtってのがあって、
いろんなコマンドをawkで書いてあるんです。いつかは私も
Perlで作ってみたいと思ってました。
これはFloppyベースのrescue用distributionなんです。
んでもって、メモリファイルシステムのマシンならmountを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
Tokyo-pm メーリングリストの案内