>>>>> "VST" == Vehbi Sinan Tunalioglu <[EMAIL PROTECTED]> writes:
>>>>> "Emre" == Emre Sevinc <[EMAIL PROTECTED]> writes:
>>>>> "VST" == Vehbi Sinan Tunalioglu <[EMAIL PROTECTED]> writes:
VST> http://www.holygoat.co.uk/blog/entry/2005-02-24-1 adresinde
VST> trivial http'yi extend eden birisinin calismasini da
VST> kullanabiliriz herhalde:
VST>
http://www.holygoat.co.uk/projects/trivial-http/trivial-http-1.1-extended.tar.bz2
VST> Ben yine de gerekli iki kutuphaneyi emaile ekliyorum.
VST> Sanirim yazar Brian Mastenbrook web sitesini tasimis. Ondan
VST> kaynaklaniyor.
Mösyö Mastenbrook'un makina herhalde hala "toast" durumda!
Neyse ki senin yolladigin .tar.gz dosyalarini bir yere kaydetmistim,
az önce asdf-install ile yükledim:
CL-USER> (asdf-install:install
"/home/fz/programming/Lisp/trivial-sockets.tar.gz")
CL-USER> (asdf-install:install
"/home/fz/programming/Lisp/trivial-http-1.1.tar.gz")
Install where?
1) System-wide install:
System in #P"/usr/lib/sbcl/site-systems/"
Files in #P"/usr/lib/sbcl/site/"
2) Personal installation:
System in #P"/home/fz/.sbcl/systems/"
Files in #P"/home/fz/.sbcl/site/"
--> 2
Her iki durumda da yukarida oldugu gibi 2 secmek durumunda kaldim
cünkü 1 dedigimde sikayet etti, acaba "root" kullanicisi olarak
baslatmadigim icin oldu bilmiyorum. Bu konuda bir aciklamasi olan
deneyimli asdf-install kullanicilarina sesleniyorum! :)
Neyse, sonra senin kodu derledim ve verdigin örneklerden
calistirmaya basladim REPL ortaminda SBCL ile (bu arada
benim makina Intel Celeron 2.40 GHz, Debian unstable, cekirdek
2.6.11-1-686 i686) ve baglanti hizim da 256 Kbps ADSL:
CL-USER> (setf *url-list* (get-the-list-of-mboxs
"http://cs.bilgi.edu.tr/pipermail/cs-lisp/";))
; in: LAMBDA NIL
; (SETF *URL-LIST*
; (GET-THE-LIST-OF-MBOXS "http://cs.bilgi.edu.tr/pipermail/cs-lisp/";))
; ==>
; (SETQ *URL-LIST*
; (GET-THE-LIST-OF-MBOXS "http://cs.bilgi.edu.tr/pipermail/cs-lisp/";))
;
; caught WARNING:
; undefined variable: *URL-LIST*
;
; caught WARNING:
; This variable is undefined:
; *URL-LIST*
;
; compilation unit finished
; caught 2 WARNING conditions
("http://cs.bilgi.edu.tr/pipermail/cs-lisp/2005-September.txt";
"http://cs.bilgi.edu.tr/pipermail/cs-lisp/2005-October.txt";
"http://cs.bilgi.edu.tr/pipermail/cs-lisp/2005-November.txt";
"http://cs.bilgi.edu.tr/pipermail/cs-lisp/2005-December.txt";)
Cok önemli degil elbette ama "warning" almamak namina ve dokümantasyon
kalitesi acisindan defparameter ya da defvar ile tanimlansa iyi
olur diye düsündüm.
CL-USER> (prepare-full-raw-archive *url-list* "/tmp/archive.mbox")
NIL
Bu asama yaklasik 40-50 saniye sürdü.
Ardindan:
=====================================================================
CL-USER> (setf *mails* (parse-mails-from-mbox "/tmp/archive.mbox"))
; in: LAMBDA NIL
; (SETF *MAILS* (PARSE-MAILS-FROM-MBOX "/tmp/archive.mbox"))
; ==>
; (SETQ *MAILS* (PARSE-MAILS-FROM-MBOX "/tmp/archive.mbox"))
;
; caught WARNING:
; undefined variable: *MAILS*
;
; caught WARNING:
; This variable is undefined:
; *MAILS*
;
; compilation unit finished
; caught 2 WARNING conditions
(NIL
((:FROM . "From emres at bilgi.edu.tr Fri Sep 2 13:17:49 2005")
(:DATE . "Date: Fri Sep 2 13:15:48 2005")
(:SUBJECT . "Subject: [Cs-lisp] Hadi hayirli ugurlu olsun")
(:MESSAGE-ID . "Message-ID: <[EMAIL PROTECTED]>")
(:CONTENT . "
Hepimize hayirli ugurlu olsun.
Dilerim pek cok calisma icin kataliz?r ve arsiv g?revi g?r?r cs-lisp
listemiz.
Emre Sevin?
eMBA Yaz?l?m Geli?tirme
?stanbul Bilgi ?niversitesi
<http://getfirefox.com/>
"))
======================================================================
Hatirladigim kadari ile bu asama da 5-6 sn. sürdü. (Yukaridaki cikti
%100 dogru degil tabii, ben copy-yank yaparken cift yatay cizgileri
cikardim altindakilerin tamami "signature" olarak algilanmasin diye)
Bundan sonraki asamada ne var? Mesela :FROM, :DATE, :SUBJECT
alanlarini biraz daha "parse" edip parcalamak, :MESSAGE-ID
vb. alanlari kullanip kimin kime hangi baslik altinda yazdiginin
bir matrisini cikarmak filan?
Bu arada epey eglenceli ama mesela Debian Ingilizce listesi
üzerinde denemeye korktum dakikalar sürebilir diye (10 yillik
cok geveze arsiv!)
--
Emre Sevinc
eMBA Software Developer Actively engaged in:
http:www.bilgi.edu.tr http://ileriseviye.org
http://www.bilgi.edu.tr http://fazlamesai.net
Cognitive Science Student http://cazci.com
http://www.cogsci.boun.edu.tr
_______________________________________________
cs-lisp mailing list
[email protected]
http://church.cs.bilgi.edu.tr/lcg
http://cs.bilgi.edu.tr/mailman/listinfo/cs-lisp
