🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Thread View: pl.comp.lang.perl
3 messages
3 total messages Started by Piotr Gapinski Thu, 21 May 1998 20:09
usuwanie danych z pliku
#1462
Author: Piotr Gapinski
Date: Thu, 21 May 1998 20:09
13 lines
911 bytes
** To reply in e-mail, remove ".vislep" from address **

Czesc,
mam guestbook w ktorym zapisywane sa dane
w tym i data (`$date_cmd +"%A, %B %d, %Y at %T (%Z)"`; chop($date);
Problem polega na tym, ze musze po jakims czasie (np 30 dni) usuwac
POSZCZEGOLNE wpisy.
Jak to zorbic?

 Pozdrawiam,
-----///-----------------------
 Piotr Gapinski
 http://www.ely.pg.gda.pl/~pgapin
Re: usuwanie danych z pliku
#1463
Author: Marcin 'Qrczak' Kowalczyk
Date: Thu, 21 May 1998 21:15
21 lines
1699 bytes
On 21 May 1998, Piotr Gapinski wrote:

> Problem polega na tym, ze musze po jakims czasie (np 30 dni) usuwac
> POSZCZEGOLNE wpisy.

Skopiować plik na nowo, wyszukując i przepuszczając tylko te wpisy,
które mają nie być usunięte. Nie ma czegoś takiego jak wycięcie kawałka
ze środka pliku.

Jak rozpoznawać daty? Oczywiście wyrażeniem regularnym. Mam nadzieję, że
się w nich orientujesz, bo trudno streścić w jednym zdaniu... Opis
perlowych wyrażeń regularnych pod Linuxem: man perlre.

Do łatwiejszego zapisania nowej wersji danego pliku w miejsce starej
może się przydać opcja -i perla (man perlrun).

-- 
 __("<   Marcin Kowalczyk * qrczak@knm.org.pl http://qrczak.home.ml.org/
 \__/       GCS/M d- s+:-- a21 C+++>+++$ UL++>++++$ P+++ L++>++++$ E->++
  ^^                W++ N+++ o? K? w(---) O? M- V? PS-- PE++ Y? PGP->+ t
QRCZAK                  5? X- R tv-- b+>++ DI D- G+ e>++++ h! r--%>++ y-
Re: usuwanie danych z pliku
#1464
Author: Piotr Piatkowski
Date: Thu, 21 May 1998 22:17
40 lines
2250 bytes
Piotr Gapinski <narg.vislep@irc.pl> wrote:
: ** To reply in e-mail, remove ".vislep" from address **

: Czesc,
: mam guestbook w ktorym zapisywane sa dane
: w tym i data (`$date_cmd +"%A, %B %d, %Y at %T (%Z)"`; chop($date);

Aaarghh... Ludzie, błagam, uczcie się pisać programy. Używanie 
programu zewnętrznego gdy jest coś takiego jak localtime:

bash$ perl -le 'print scalar(localtime())'
Fri May 22 00:12:55 1998

...albo...

bash$ perl -le '@data = localtime(), print "$data[3]-$data[4]-$data[5]"'
22-4-98

...to naprawdę nie jest dobry pomysł.

: Problem polega na tym, ze musze po jakims czasie (np 30 dni) usuwac
: POSZCZEGOLNE wpisy.
: Jak to zorbic?

Nic tylko przepisać z jednego pliku do drugiego. Odczytać z 
oryginału, zapisać po przefiltrowaniu do innego pliku, usunąć 
oryginał, zmienić nazwę nowego pliku na taką jaką miał oryginał.
I nie robić tego przez system('mv $a $b') tylko przez rename($a,$b).

P.S. Trochę drażliwy jestem, to dlatego że zrobiłem sobie upgrade 
     apache'a i od 24 godzin siedzę i myślę czemu mi fcgi nie działa :-/
     A może ktoś wie? (Michał?) Apache 1.3b6, fcgi2.0, perl+sfio. 
     Pierwsza aplikacja chodzi jak trza, ale jak zrobi exit to 
     następna nie startuje, wszystko się wiesza (aż do timeout'u) i 
     ogólnie jest bałagan... Acha - to istotne - RedHat 4.1, bez 
     większych patchy. Upgrade na razie nie wchodzi w grę, padł mi 
     CDROM :-(

-- 
Piotr Piątkowski, Uczelniane Centrum Informatyki, AGH Krakow, POLAND
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads