It does recurssion in the meblog, but I'm not causing it to my knowledge.
I didn't right any recurrisions. I finally got around it
by objectifying the code and putting everying in one block.
[- use INNS;
$obj = INNS->new;
$statement = $obj->make_data(\%fdat);
-]
Now I have another problem.
I need to create html files on the fly. I read in a
template in the module and print it out through another filehandle to the
drive.
It only writes 188 characters. I tried setting $| = 1 in the module, but it seems
to have no effect. Is their a method to write the whole file out?
I've tried different variations of this
my $dir = "/usr/local/apache/htdocs/inns/$recs[8]";
my $base = $recs[4];
$base =~ s/ //g;
my $file = "/usr/local/apache/htdocs/inns/$recs[8]/$base";
print STDERR "$dir\n";
unless ( -e $dir ){
mkdir $dir or die $!;
}
open IN, "/usr/local/apache/htdocs/inns/addmysite/full_results_page.html" or
die $!;
open OUT, ">$file" or die $!;
my @outputfile = <IN>;
print STDERR @outputfile;
$|=1;
for(@outputfile){
print OUT;
}
It does print everything to STDERR (the Apache log file)
Ruben
On 2002.04.11 02:00 Gerald Richter wrote:
> >
> > EMBPERL LOG
> >
> > [29842]SRC: Line 4: [- $statement = INNS::make_data(\%fdat) -]
> > [29842]EVAL< $statement = INNS::make_data(\%fdat)
> > [29842]MEM: Reload /usr/local/apache/htdocs/inns/addmysite/enterdata.html
> in HTML::Embperl::DOC::_1
> > [29842]REQ: Package = HTML::Embperl::DOC::_1
> > [29842]SRC: Line 1: <HTML><HEAD><TITLE>Enter Site Info</TITLE></HEAD>
> >....
>
> Looks like your make_data is recursivly calling your page. Does it?
>
> If yes, it looks to me like a bug in an old Embperl version. Which version
> do you using?
>
> Gerald
>
>
> -------------------------------------------------------------
> Gerald Richter ecos electronic communication services gmbh
> Internetconnect * Webserver/-design/-datenbanken * Consulting
>
> Post: Tulpenstrasse 5 D-55276 Dienheim b. Mainz
> E-Mail: [EMAIL PROTECTED] Voice: +49 6133 925131
> WWW: http://www.ecos.de Fax: +49 6133 925152
> -------------------------------------------------------------
>
>
>
> ---------------------------------------------------------------------
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>
--
__________________________
Brooklyn Linux Solutions
__________________________
http://www.mrbrklyn.com - Consulting
http://www.brooklynonline.com - For the love of Brooklyn
http://www.nylxs.com - Leadership Development in Free Software
http://www.nyfairuse.org - The foundation of Democracy
http://www2.mrbrklyn.com/resources - Unpublished Archive or stories and articles from
around the net
http://www2.mrbrklyn.com/mp3/dr.mp3 - Imagine my surprise when I saw you...
http://www2.mrbrklyn.com/downtown.html - See the New Downtown Brooklyn....
1-718-382-5752
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
