The reason I think the alternate html.pl file is easier to edit is that the header and footer for each page need only be defined once, instead of for every subroutine and the form tags are closer together, so it's easier to see what you can delete.
For your display to look as you want it to, you'll need to edit sub html_record. Be sure to keep:
at the beginning of the subroutine.
Use an existing page as a template. Copy the part of your page which will change with each record -- your main text of your movie review. Delete the actual data, and, its place, use a variable in the form
$rec{'fieldname'}. For example,
Code:
print qq|
<TABLE border="0" width="100%" cellspacing="0" cellpadding="0">
<TR>
<TD width="320" bgcolor="#C0C0C0" valign="top">
<TABLE border="0" width="100%" cellspacing="0" cellpadding="2">
<TR>
<TD width="100%">
<P><SMALL><FONT face="Georgia">$rec{'Review'}</font></SMALL>
</TR>
</TABLE>
</TD>
<TD width="2" valign="top"><IMG src="../images/transspacer.gif" width="2" height="2"></TD>
<TD width="139" bgcolor="#C0C0C0" valign="top">
<TABLE border="0" width="100%" cellspacing="0" cellpadding="2">
<TR>
<TD width="100%"><FONT face="Arial"><SMALL><STRONG>Rating:</STRONG> $rec{'Rating'}<BR>
<STRONG>MPAA:</STRONG>$rec{'MPAA'}<BR> <STRONG>Runtime:</STRONG>$rec{'Runtime'}<BR>
<STRONG>IMDb Top 250:</STRONG>
<A href="http://us.imdb.com/top_250_films">$rec{'IMDB'}</A></SMALL><BR>
<SMALL><STRONG>Genre:</STRONG> $rec{'Genre'}</SMALL><BR>
You will probably need to expand all of your graphic URLs to full URLs instead of relative ones.
Also, to keep your formatting in your review section, after
my (%rec) = @_;
you should add
Code:
$rec{'Review'} =~ s/\n/<BR>/g;
If your field name isn't "Review," change the above to match your actual field name.
The rest of it is just trial and error. Try something and take a look at it. If it isn't what you want, change it.
The thing you must remember, though, is that whatever you want to be printed to your page must start with
print qq|
and end with
|;
You can put anything -- except a | character -- within those and they will print out on the screen.
------------------
JPD