#!/usr/local/bin/perl5.003 # -*-perl-*- # $Id: $ # require 5.003; use SelfLoader; print "Enter a file prefix: "; my $file = ; chomp $file; print "Enter the title: "; my $title = ; chomp $title; $filename = ">$file.html"; open (FILE, $filename) || die ("open $filename failed"); print FILE <<"END"; $title


Return to Cereal Chart

lopez\@halcyon.com END