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
Author: Piotr Gapinski
Date: Thu, 21 May 1998 20:09
Date: Thu, 21 May 1998 20:09
13 lines
911 bytes
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
Author: Marcin 'Qrczak' Kowalczyk
Date: Thu, 21 May 1998 21:15
Date: Thu, 21 May 1998 21:15
21 lines
1699 bytes
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
Author: Piotr Piatkowski
Date: Thu, 21 May 1998 22:17
Date: Thu, 21 May 1998 22:17
40 lines
2250 bytes
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