🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.perl
Article #403

Czyszczenie mojego archiwum :(

#403
From: Robert M. Czerwinski
Date: Tue, 24 Jun 1997 01:08
45 lines
2648 bytes
Vtam,

 Niestety nie moge sobie poradzic z chyba dosc prostym ( niestety ) 
zadaniem :(.
 Administruje archiwum ulokowanum na UNIXie ( SunSITE ) a zarzadzanym z PC 
( generator html itp ). Problem jest taki, ze ludzie czesto zmieniaja nazwy 
swoich plikow, tak ze w moim archiwum pojawiaja sie "martwe" pliki, ktore 
nie maja opisu na stronach html i powinny byc usuniete. Lista wszystkich 
plikow jakie POWINNY byc w moim archiwum jest dostepna na UNIXie ( 
wykozystywana przez search engine napisany w perlu ), a wyglada mniej 
wiecej tak
 nazwa_pliku^katalog^co_tam^cos_tam^  ....
( posortowane w/g nazw plikow, a nie katalogow - jakby sie ktos pytal )

problem polega na tym, ze jestem w stanie ( no, no, ale bystrzacha ;) ) 
zrobic dwie listy:
  @powinno          wczytane z opisanego pliku
  @jest             lista zrobiona przez find

"algorytm" czyszczenia jest silowy: w petli dla kazdego pliku z 
@powinno jest sprawdzana lista @jest ( tez w peli foreach - moze da sie 
to jakos prosciej ? ). W przypadku jesli element z listy @powinno odpowiada 
elementowi z listy @jest to te oba elementy powinny byc ze swoich list 
usuniete. Niby proste, ale jak usuwac|nie usuwac elementy z listy, gdy 
dostep do elementow jest przez foreach $one_file ( @powinno ) { } 
Poza tym, taka petla w petli da od diaska operacji :( 

 Po takiej operacji w listach powinno mi zostac:
  @powinno  : nic, jak cos jest to sa jakies niewlasciwe wpisy
  @jest :  to co do skasowania  

Dzieki z gory za wszelkie uwagi, sugestie  ( no poza gon sie, albo cos 
podobnego :) )

Pozdawiam,
Robert
   


--
==============================================================
Robert M. Czerwinski        mail:  robert@asp.biogeo.uw.edu.pl
Warsaw University/Poland                       
Visit my Delphi Super Page:  http://sunsite.icm.edu.pl/delphi/
==============================================================                                                                                                                                                                                                 
Technical Details
Message-ID: <79377.robert@asp.biogeo.uw.edu.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!pingwin.icm.edu.pl!news.icm.edu.pl!not-for-mail

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!pingwin.icm.edu.pl!news.icm.edu.pl!not-for-mail
From: "Robert M. Czerwinski" <robert@asp.biogeo.uw.edu.pl>
Newsgroups: pl.comp.lang.perl
Subject: Czyszczenie mojego archiwum :(
Date: Mon, 23 Jun 97 19:08:07 CST
Organization: ICM
Lines: 45
Message-ID: <79377.robert@asp.biogeo.uw.edu.pl>
NNTP-Posting-Host: zbo1.geo.uw.edu.pl
X-Minuet-Version: Minuet1.0_Beta_16
X-POPMail-Charset: English
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 7bit