[ perl ] field naar twee pagina's sturen - Softwareontwikkeling

donderdag 21 februari 2002 02:19

Acties:

Verwijderd

Topicstarter

Ik heb momenteel een pagina waar je een bericht kan posten en komt mooi automatisch op de site te staan, alleen wil ik nu ook dat het geheel ook op een andere page wordt gepost...hoe doe ik dat? dit is mijn huidige script:

#!/usr/bin/perl

print "Content-type: text/html\n\n";

use LWP::Simple;
use CGI;

chdir "/home/http/users/www.ttkdesign.nl/html/";
$filenaam = "contentreply.html";
open(F,"< $filenaam"); while (<F>) { $file.=$_ } close(F);

($begin, $eind) = split(//, $file);

$query = CGI::new();
$reply = $query->param("reply");

chdir "/home/http/users/www.ttkdesign.nl/html/";
open(FH, ">$filenaam");
print FH $begin;
@tijd = localtime(time);
$dag = $tijd[3];
$maand = $tijd[4]+1;
$jaar = 1900+$tijd[5];
print FH "$dag-$maand-$jaar";
print FH "<tr><TD><p>$reply</p></TD></tr>\n";
print FH "";
print FH $eind;
close(FH);

print <<einde;

>html>
<head>
<title>Redirect</title>
<script language="JavaScript"></script>
</head>

einde

</html>

donderdag 21 februari 2002 16:26

Acties:

Verwijderd

bedoel je dat je twee ongeveer identieke pagina's hebt/wilt maken????

donderdag 21 februari 2002 17:11

Acties:

Verwijderd

Zoals het er nu uitziet hoop ik niet voor je dat je site erg druk wordt, want dan krijg je geheid problemen.

Wat gaat er nu namelijk gebeuren als twee gebruikers op hetzelfde moment een reply plaatsen? Dan gaan ze waarschijnlijk allebei tegelijk schrijven in dat bestand en gaat er van alles mis. Zeker omdat je niet eens checkt of je file open command wel lukt.

Ik raad je aan om de locking faciliteiten van perl eens te bekijken.

donderdag 21 februari 2002 17:16

Acties:

Verwijderd

helemaal mee eens nono, en de rest van die code is ook een beetje brak, levert dit:

code:

print <<einde;

>html>
[..]

einde

</html>

geen eens een 500 op?
flock info kan je trouwens hier vinden.
veel suc6,
je hebt trouwens wel veel problemen met dit script he, dis nou al de 3 keer dat je het post (ook nog onder de nick ttkdesign.nl), en blijft je eerste bericht nu niet altijd bovenaan staan (of is dat ook de bedoeling

)

vrijdag 22 februari 2002 15:44

Acties:

Verwijderd

Topicstarter

Op donderdag 21 februari 2002 17:16 schreef Foxboy het volgende:
helemaal mee eens nono, en de rest van die code is ook een beetje brak, levert dit:
code:
1
2
3
4
5
6
7
8
print <<einde;

>html>
[..]

einde

</html>
geen eens een 500 op?
flock info kan je trouwens hier vinden.
veel suc6,
je hebt trouwens wel veel problemen met dit script he, dis nou al de 3 keer dat je het post (ook nog onder de nick ttkdesign.nl), en blijft je eerste bericht nu niet altijd bovenaan staan (of is dat ook de bedoeling )

laatste bericht staat inderdaad altyd onderaan, hoe kan ik dat oplossen, inderdaad zoveelste topic mijn excuses, de perl man is op vakantie dus dan moet deze designer even de problemen oplossen, met bijna geen perl ervaring...

vrijdag 22 februari 2002 21:00

Acties:

Verwijderd

boven de laatste reply zetten ipv eronder.
maar wil je nou op twee html pagina's dezelfde
tekst zetten???

zaterdag 23 februari 2002 17:24

Acties:

Verwijderd

Topicstarter

Op vrijdag 22 februari 2002 21:00 schreef Foxboy het volgende:


boven de laatste reply zetten ipv eronder.
maar wil je nou op twee html pagina's dezelfde
tekst zetten???

nee het eerste vervalt; gewoon de de laatste post boven krijgen [zonder dat het op twee pagina's moet worden gepost;....maar om hier weer een nieuw topic te moeten voor openen wordt me te gortig...]

zaterdag 23 februari 2002 22:52

Acties:

Verwijderd

Topicstarter

($begin, $eind) = split(//, $file);

moet ik dit aanpassen?