[Tokyo.pm] Re: (Fun) mount.pl

[OKABE, Keiichi]

岡部です。

----- 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