Re: Last mod on my Perl action page

You can't put a print in the middle of a here document. You should assign the value to a variable first,

$latmod=localtime((stat(/cgi-bin/dir/lastmodif.pl))[9]);
print header, <<"EOF"
...
<br>Last Modified: $lastmod</td>
...
[download]

Comment on Re: Last mod on my Perl action page Download Code

Replies are listed 'Best First'.
Re: Re: Last mod on my Perl action page by Fletch (Bishop) on May 17, 2004 at 19:53 UTC
Not a print, but you can interpolate an arbitrary expression: `print header, <<"EOF" ... <br/>Last Modified: @{[ scalar localtime( (stat( ".../blah" ))[9] ) ]} </td> ... EOF` [download]	[reply] [d/l]