Re: [PERL] Lock filer

[Anders Sønderberg Mortensen <sslug@sslug>]

On Wed, 13 Nov 2002, Frank Nørvig wrote:

> >Jeg forstår ikke helt, hvad det er, du vil sætte locks på? Du bliver nok
> >nødt til at forklare dit problem lidt nærmere...
>
> Et perl-script kigger en mappe igennem efter filer hvert 5. minut. I denne
> mappe kan f.eks. være 230 text-filer som hver især skal behandles og
> konverteres til PostScript format. Jeg har allerede lavet det script som
> behandler text-filerne (lad os kalde det convert.pl), men det belaster
> serveren ret kraftigt, hvis der startes 230 eksemplarer af scriptet på én
> gang.
>
> For at serveren ikke overbelastes, må der max. startes 5-10 eksemplarer af
> convert.pl, og det er her jeg er løbet ind i en mur. Min første tanke var
> lockfiler, men da min erfaring med Perl ligger på et meget lille sted,
> ønsker jeg lidt hjælp til dette, eller eventuelt et alternativ.
>

Hmm, jeg forstår stadig ikke helt, hvad du vil lock'e. Vil du putte locks
på de tekst-filer, som er ved at blive konverteret, så ikke andre
convert.pl scripts tager sig af dem? Det må kunne laves simplere med en
slags kø-struktur af en art. F.eks. kunne du lave et script, der hele
tiden ligger og holder øje med nye tekstfiler. Hver gang en sådan dukker
op, så push'es filnavnet bag på en liste. Samtidig kunne scriptet
vedligeholde en population af convert.pl scripts (f.eks. 5 eller 10), der
hver især shift'er det første element i køen og behandler det.

--Anders