PC/AT互換機上のベアマシン上にPerl処理系(v5.8.8)をのっけて、普段絶対にやらないであろう低級なプログラムをPerlで書いてみたよ！、という報告です。簡単なデバイスドライバとファイルシステムをPerlで実装して、組み込み関数open/read/closeができるようになるまでの流れを紹介したいと思います。
I would like to introduce 'Perl Machine' - Perl Interpreter on a bare machine, talking to PC/AT architecture.
Using above interpreter, I have produced "Perl's" system softwares :
o Device drivers : pic, keyboard, vram, floppy(RO)
o Filesystems(RO) : fat12, fat16, fat32, ext2
A below code might get correct contents :
open (IN, '/foo');
while (<IN>)
{ print; }
close (IN);
# but you're NOT content with response time
