Hello.
Napsal sem perlovou vychytavku na kyberkovani. hlavne mi de o posilani a prijimani mailu... kdyby nekdo zvladnul napsat v perlu funkci na rozparsovani obsahu https://kyberia.sk/id/24/ , udelal bych kyberia mail klienta v GTK+ nebo nCurses... Za absolutni cil povazuji napsani Pidgin pluginu (taky v PERLu), ktery by umoznil komunikovat pres kyberku. Dneska napisu aspon tray ikonku, ktera zacne blikat, pokud budou na kyberce nove zpravy... po kliknuti pak spusti jeden z nasledujicich prikazu:

gnome-open 'https://kyberia.sk/id/24/'
kde-open 'https://kyberia.sk/id/24/'
start "https://kyberia.sk/id/24/"

To co sem udelal se zatim pouziva takhle:


require "Kyberia.pl";

my $kyberia = new Kyberia('https://kyberia.sk/');
$kyberia->Login('Harvie', 'Beruska');
print $kyberia->GetNode(24);
$kyberia->SendMail('Harvie', 'Hello dolly!');
$kyberia->ReadMail();
my($num, $name, $text) = $kyberia->CheckMail(); print $text."n"; #treba: You have 2 unread mails, last from ||.
$kyberia->Logout();


Na kodu se stale pracuje, ale obcasny snapshot je tady: http://softz.harvie.cz/kyberia/

|| zaridil CSV export mailu, odpada tak problem s parsovanim. pokud by to nekdo chtel vyuzit, tak to najde tady: https://kyberia.sk/id/2176597/

Harvie --> DedaMaroz

test;test;
rofl

te;st
---------------------------------
DedaMaroz --> Harvie

Hello dolly!
---------------------------------

    Harvie    
     -->
    DedaMaroz    
     --

        20:13:53 - 29.08.2009   
      lorem ipsum dolor fuck it ;) omg wtf?





    DedaMaroz    
     -->
    Harvie    
     --

        17:27:53 - 29.08.2009   
      zdarec, musim rict, ze zatim lorem ipsum rofl git eunuch :-)