#!/usr/local/bin/perl print "Contet-type: text/html\n\n"; open(NAME,"onamae.dat"); $namae = ; close(NAME); print << "HTML_HEAD"; データファイルの操作 私の名前は$namaeです HTML_HEAD __END__