Thread View: pl.comp.lang.perl
3 messages
3 total messages
Started by mrek
Tue, 14 Sep 2010 14:47
Zonk ...
Author: mrek
Date: Tue, 14 Sep 2010 14:47
Date: Tue, 14 Sep 2010 14:47
61 lines
4392 bytes
4392 bytes
Witam. Mam na "warsztacie" skrypt do sprawdzania zawartości skrzynki pocztowej. Możliwe, że będzie punktem wyjścia do dalszych wariacji w temacie sprawdzania skrzynki np. sygnalizowania donośnie (dźwiękiem) nadejścia nowych wiadomości itp. Na tą chwilę dopracowuję jednak wyłuskiwanie i wyświetlanie tematu. Poniżej dołączyłem wynik działania tegoż skryptu - fragment listy tematów w postaci surowej i przetworzonej. Wygląda na to że działa poprawnie. Parafrazując prawa Tima jeżeli coś ma się zepsuć to na pewno się zepsuje ;-). Wśród tematów wiadomości pojawił się zonk - temat nr 64 - brak kodowania ... - jak do tego podejść? $VAR1 = 'Nowe oferty 13-09-2010'; 73 - Nowe oferty 13-09-2010 ---------------------------------------------------------------------------- $VAR1 = 'wolfgang.pl - zamówienie: 6292'; 72 - wolfgang.pl - zamówienie: 6292 ---------------------------------------------------------------------------- $VAR1 = 'Jak pieniadze pacjentow zmieniaja wlasciciela'; 71 - Jak pieniadze pacjentow zmieniaja wlasciciela ---------------------------------------------------------------------------- $VAR1 = '=?UTF-8?B?UG93aWFkb21pZW5pZSBvIGFrdHl3bm/Fm2NpIHpuYWpvbXljaCBuYSA=?= =?UTF-8?B?bmsucGwgKDIwMTAtMDktMTIp?='; 70 - Powiadomienie o aktywności znajomych na nk.pl (2010-09-12) ---------------------------------------------------------------------------- $VAR1 = 'Inwazja =?ISO-8859-2?Q?=A6wiat=B3a?= - kup bilet na Allegro'; 69 - Inwazja Światła - kup bilet na Allegro ---------------------------------------------------------------------------- $VAR1 = 'YOUR LINUX TODAY NEWSLETTER FOR September 10, 2010'; 68 - YOUR LINUX TODAY NEWSLETTER FOR September 10, 2010 ---------------------------------------------------------------------------- $VAR1 = '=?iso-8859-2?Q?W_Skalniku_skupujemy_stare_=B6piwory_i_dajemy_co_trzeci_?= =?iso-8859-2?Q?=B6piw=F3r_Marmot_Wave_za_darmo?='; 67 - W Skalniku skupujemy stare śpiwory i dajemy co trzeci śpiwór Marmot Wave za darmo ---------------------------------------------------------------------------- $VAR1 = 'Issue Special: Analog & Digitial ICs'; 66 - Issue Special: Analog & Digitial ICs ---------------------------------------------------------------------------- $VAR1 = '=?utf-8?B?TmEgd2Vla2VuZDoga2xhd2lhdHVyYSArIG15c3ogemEgcMOz?= =?utf-8?B?xYIgY2VueSE=?='; 65 - Na weekend: klawiatura + mysz za pół ceny! ---------------------------------------------------------------------------- $VAR1 = '[SUSPECTED SPAM]=W co warto =?UNKNOWN?Q?inwestowa=E6=3D?= iccuxw'; 64 - [SUSPECTED SPAM]=W co warto inwestować= iccuxw ---------------------------------------------------------------------------- $VAR1 = 'YOUR LINUX TODAY NEWSLETTER FOR September 9, 2010'; 63 - YOUR LINUX TODAY NEWSLETTER FOR September 9, 2010 ---------------------------------------------------------------------------- $VAR1 = 'Your Linux Today Security Letter for September 9, 2010'; 62 - Your Linux Today Security Letter for September 9, 2010 ---------------------------------------------------------------------------- $VAR1 = 'Dr. Dobb\'s Update - 09/09/10 - More Windows, Windows, Windows'; 61 - Dr. Dobb's Update - 09/09/10 - More Windows, Windows, Windows ---------------------------------------------------------------------------- $VAR1 = '=?utf-8?B?RGFyb3dpem55IG9kIHBhbmkgQ0FUSFJJTkUgRU1NRVIgQUtJU1NJLCBQcm9z?= =?utf-8?B?esSZIG1pIGRhxIcgc3p5YmtpZWogcmVha2NqaS4=?='; 60 - Darowizny od pani CATHRINE EMMER AKISSI, Proszę mi dać szybkiej reakcji. ----------------------------------------------------------------------------
Re: Zonk ...
Author: Szymon Sokół
Date: Wed, 15 Sep 2010 18:08
Date: Wed, 15 Sep 2010 18:08
18 lines
1975 bytes
1975 bytes
On 14 Sep 2010 14:47:52 GMT, mrek wrote: > Parafrazując prawa Tima jeżeli coś ma się zepsuć to na pewno się zepsuje > ;-). Wśród tematów wiadomości pojawił się zonk - temat nr 64 - brak > kodowania ... - jak do tego podejść? > $VAR1 = '[SUSPECTED SPAM]=W co warto =?UNKNOWN?Q?inwestowa=E6=3D?= > iccuxw'; 64 - [SUSPECTED SPAM]=W co warto inwestować= iccuxw Albo przyjąć kodowanie domyślne (np. ISO-8859-2), tak samo jak robi to większość programów pocztowych, albo, jeśli Ci się chce się bawić, próbować odgadywać za pomocą odpowiednich heurystyk, jakie to powinno być kodowanie. -- Szymon Sokół (SS316-RIPE) -- Network Manager B Computer Center, AGH - University of Science and Technology, Cracow, Poland O http://home.agh.edu.pl/szymon/ PGP key id: RSA: 0x2ABE016B, DSS: 0xF9289982 F Free speech includes the right not to listen, if not interested -- Heinlein H
Re: Zonk ...
Author: felippe
Date: Thu, 16 Sep 2010 09:48
Date: Thu, 16 Sep 2010 09:48
2 lines
1358 bytes
1358 bytes
Uzupełniając wypowiedź kolegi. Zgadywać kodowanie możesz poprzez moduł: http://search.cpan.org/~dankogai/Encode-2.39/lib/Encode/Guess.pm
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