####################################### sub get_file_name { ####################################### $proc=$$; $newnum=time; $newnum=substr($newnum,4,5); $date=localtime(time); ($day, $month, $num, $time, $year) = split(/\s+/,$date); $month=~tr/A-Z/a-z/; $PREF = "$month$num-"; $id="$PREF$newnum$proc"; $FILE_NAME="$BASEDIR/$PREF$newnum$proc$EXT"; $URL_NAME="$BASEURL/$PREF$newnum$proc$EXT"; }
This is the sub that produces the html output page:
####################################### sub poem_page { ####################################### $poembody =<<__END_OF_POEM_BODY__; <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> <HTML> <HEAD> <title>$fields{'poem_title'} by $fields{'author_name'}</title> <link rel="stylesheet" type="text/css" href="/poems/poem_font.css" /> <SCRIPT LANGUAGE="JavaScript"> <!-- if(navigator.userAgent.indexOf("MSIE") != -1) document.writeln (''); else document.writeln ('<EMBED SRC="$BASEURL/$fields{'midifile'}" AUTOSTART +="true" HIDDEN="true" VOLUME="60%">'); //--> </SCRIPT> </head> <BGSOUND SRC="$BASEURL/$fields{'midifile'}"> $BODYTAG $params <CENTER> <P> <TABLE WIDTH=584 BGCOLOR=WHITE BACKGROUND="/IMAGES/2x2.gif" BORDER=0 C +ELLPADDING=0 CELLSPACING=0> <TR> <TD ALIGN=CENTER VALIGN=MIDDLE height="70" BACKGROUND="$BASEURL/theme +s/$fields{'theme'}/head_bg.jpg" class="$fields{'font_family'}_title"> $fields{'poem_title'} </TD> </TR> <TR> <TD ALIGN=CENTER VALIGN=TOP> <TABLE> <TR> <TD WIDTH="30" align="right"> </TD> <TD ALIGN="justify" VALIGN="TOP" class="$fields{'font_family'}"><d +iv align="justify"> <BR> <PRE align="justify" class="$fields{'font_family'}">$fields{'poem_ +body'}</PRE> </div> </TD> <TD WIDTH="30" align="right"> </TD> </TR> </TABLE> </TD> </TR> <TR> <TD ALIGN=LEFT VALIGN=MIDDLE> <TABLE> <TR> <TD WIDTH="250" align="right" height="50"> </TD> <TD WIDTH="250" ALIGN="left" class="$fields{'font_family'}"> - $fields{'author_name'} </TD> </TR> </TABLE> </TD> </TR> <TR> <TD ALIGN="CENTER" VALIGN="BOTTOM"><font face="arial" size="1" color= +"#444444">Copyright © 2003</font> <p> <!--#include virtual="/cgi-bin/rating/rate_display.cgi?java=yes&produc +t=Name_of_Product&id=$id"--> </TD> </TR> </TABLE> </CENTER> </BODY> </HTML> __END_OF_POEM_BODY__ }
Any way to get that $id to print?
In reply to Re: Re: Just a simple task
by Migey
in thread Just a simple task
by Migey
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |