Help for this page

Select Code to Download

Select or download this

#######################################
sub get_file_name {
...
   $FILE_NAME="$BASEDIR/$PREF$newnum$proc$EXT";
   $URL_NAME="$BASEURL/$PREF$newnum$proc$EXT";
}

Select or download this

#######################################
sub poem_page {
...
</HTML>
__END_OF_POEM_BODY__
}