From dsimonov gmail.com Sun Mar 1 00:58:38 2015 From: dsimonov gmail.com (Dmitry Simonov) Date: Sun, 1 Mar 2015 11:58:38 +0300 Subject: [Moscow.pm] perl5i In-Reply-To: References: <54E94F8E.9000206@knutov.com> Message-ID: uni::perl common::sense? "Fix as much of Perl 5 as possible in one pragma" just another perl configuration. --- Dmitriy V. Simonov 1 2015 ., 6:15 Mons Anderson : > ӣ . > > . > , , , > . > > 2015-02-22 6:39 GMT+03:00 Nick Knutov : >> perl5i, , . >> >> , - >> ? (5.14 5.20, )? >> ? >> >> >> -- >> Best Regards, >> Nick Knutov >> http://knutov.com >> ICQ: 272873706 >> Voice: +7-904-84-23-130 >> -- >> Moscow.pm mailing list >> moscow-pm pm.org | http://moscow.pm.org > > > > -- > Best wishes, > Vladimir V. Perepelitsa aka Mons Anderson > , > http://github.com/Mons > -- > Moscow.pm mailing list > moscow-pm pm.org | http://moscow.pm.org From yu.pats gmail.com Sun Mar 1 01:39:17 2015 From: yu.pats gmail.com (Yury Pats) Date: Sun, 1 Mar 2015 12:39:17 +0300 Subject: [Moscow.pm] perl5i In-Reply-To: References: <54E94F8E.9000206@knutov.com> Message-ID: 2015-03-01 11:58 GMT+03:00 Dmitry Simonov : > uni::perl common::sense? > "Fix as much of Perl 5 as possible in one pragma" > > . : - ? ? > just another perl configuration. > > --- > Dmitriy V. Simonov > > > 1 2015 ., 6:15 Mons Anderson : > > ӣ . > > > > . > > , , , > > . > > > > 2015-02-22 6:39 GMT+03:00 Nick Knutov : > >> perl5i, , . > >> > >> , - > >> ? (5.14 5.20, )? > >> ? > >> > >> > >> -- > >> Best Regards, > >> Nick Knutov > >> http://knutov.com > >> ICQ: 272873706 > >> Voice: +7-904-84-23-130 > >> -- > >> Moscow.pm mailing list > >> moscow-pm pm.org | http://moscow.pm.org > > > > > > > > -- > > Best wishes, > > Vladimir V. Perepelitsa aka Mons Anderson > > , > > http://github.com/Mons > > -- > > Moscow.pm mailing list > > moscow-pm pm.org | http://moscow.pm.org > -- > Moscow.pm mailing list > moscow-pm pm.org | http://moscow.pm.org > -- WBR, Yury Pats cellular: +375 (29) 5870723 ----------- ----------- HTML … URL: From foxcool333 gmail.com Sun Mar 1 01:55:26 2015 From: foxcool333 gmail.com (=?UTF-8?B?0JDQu9C10LrRgdCw0L3QtNGAINCk0L7QutGB0LrRg9C7?=) Date: Sun, 1 Mar 2015 13:55:26 +0400 Subject: [Moscow.pm] perl5i In-Reply-To: References: <54E94F8E.9000206@knutov.com> Message-ID: . . . , , , , . 01.03.2015 12:39 "Yury Pats" : > > > 2015-03-01 11:58 GMT+03:00 Dmitry Simonov : > >> uni::perl common::sense? >> "Fix as much of Perl 5 as possible in one pragma" >> >> . : > - ? > ? > > >> just another perl configuration. >> >> --- >> Dmitriy V. Simonov >> >> >> 1 2015 ., 6:15 Mons Anderson : >> > ӣ . >> > >> > . >> > , , , >> > . >> > >> > 2015-02-22 6:39 GMT+03:00 Nick Knutov : >> >> perl5i, , . >> >> >> >> , - >> >> ? (5.14 5.20, )? >> >> ? >> >> >> >> >> >> -- >> >> Best Regards, >> >> Nick Knutov >> >> http://knutov.com >> >> ICQ: 272873706 >> >> Voice: +7-904-84-23-130 >> >> -- >> >> Moscow.pm mailing list >> >> moscow-pm pm.org | http://moscow.pm.org >> > >> > >> > >> > -- >> > Best wishes, >> > Vladimir V. Perepelitsa aka Mons Anderson >> > , >> > http://github.com/Mons >> > -- >> > Moscow.pm mailing list >> > moscow-pm pm.org | http://moscow.pm.org >> -- >> Moscow.pm mailing list >> moscow-pm pm.org | http://moscow.pm.org >> > > > > -- > WBR, Yury Pats > cellular: +375 (29) 5870723 > > -- > Moscow.pm mailing list > moscow-pm pm.org | http://moscow.pm.org > > ----------- ----------- HTML … URL: From mons cpan.org Sun Mar 1 07:14:01 2015 From: mons cpan.org (Mons Anderson) Date: Sun, 1 Mar 2015 19:14:01 +0400 Subject: [Moscow.pm] perl5i In-Reply-To: References: <54E94F8E.9000206@knutov.com> Message-ID: common::sense uni::perl . "". ( ) ( - , ( use utf8). ? is_positive, is_negative? أ? ? // , , > 0 < 0, >=0 <=0. array->grep? array->foreach(func ($item) { say $item }) ? javascript ? , TIMTOWTDI, for fun. " " - . Java, Ruby JavaScript . 2015-03-01 11:58 GMT+03:00 Dmitry Simonov : > uni::perl common::sense? > "Fix as much of Perl 5 as possible in one pragma" > > just another perl configuration. > > --- > Dmitriy V. Simonov > > > 1 2015 ., 6:15 Mons Anderson : >> ӣ . >> >> . >> , , , >> . >> >> 2015-02-22 6:39 GMT+03:00 Nick Knutov : >>> perl5i, , . >>> >>> , - >>> ? (5.14 5.20, )? >>> ? >>> >>> >>> -- >>> Best Regards, >>> Nick Knutov >>> http://knutov.com >>> ICQ: 272873706 >>> Voice: +7-904-84-23-130 >>> -- >>> Moscow.pm mailing list >>> moscow-pm pm.org | http://moscow.pm.org >> >> >> >> -- >> Best wishes, >> Vladimir V. Perepelitsa aka Mons Anderson >> , >> http://github.com/Mons >> -- >> Moscow.pm mailing list >> moscow-pm pm.org | http://moscow.pm.org > -- > Moscow.pm mailing list > moscow-pm pm.org | http://moscow.pm.org -- Best wishes, Vladimir V. Perepelitsa aka Mons Anderson , http://github.com/Mons From foxcool333 gmail.com Sun Mar 1 09:09:48 2015 From: foxcool333 gmail.com (Foxcool) Date: Sun, 01 Mar 2015 20:09:48 +0300 Subject: [Moscow.pm] perl5i In-Reply-To: References: <54E94F8E.9000206@knutov.com> Message-ID: <54F347DC.8090302@gmail.com> - , . , "" , , , . . (: From dzirtik gmail.com Mon Mar 2 03:56:28 2015 From: dzirtik gmail.com (=?UTF-8?B?0J/QsNCy0LXQuyDQqdC10YDQsdC40L3QuNC9?=) Date: Mon, 2 Mar 2015 14:56:28 +0300 Subject: [Moscow.pm] =?utf-8?b?0JLRgdGC0YDQtdGH0LAgTW9zY293LnBtIDUg0Lw=?= =?utf-8?b?0LDRgNGC0LAgMjAxNQ==?= Message-ID: 5 Mail.Ru Group ? Perl- Moscow.pm. Perl Mongers ( . ??) 8 . , . Perl 6. Perl , , . 2000 Perl Perl 6 . , , Perl 6. ? . Perl 6 . Perl-, , Python, Go Ruby : Perl 6 . * *, Perl-, ?Perl 6 2.0? , Perl 6 . ? Perl 6 , ? . ? , , Perl 6 , , 2015-. : ! , Perl 6, , . * *, , ?Perl 6 : 8 ? ? pugs? 2007 Perl- Perl 6, ? . ? , , -. FOSDEM , . , Perl 6 2007 . 19.30. : -., 39, . 79 (. ??). , , http://corp.mail.ru/stream/MoscowPM/ -- , ----------- ----------- HTML … URL: From yu.pats gmail.com Mon Mar 2 05:00:23 2015 From: yu.pats gmail.com (Yury Pats) Date: Mon, 2 Mar 2015 16:00:23 +0300 Subject: [Moscow.pm] =?utf-8?b?0JLRgdGC0YDQtdGH0LAgTW9zY293LnBtIDUg0Lw=?= =?utf-8?b?0LDRgNGC0LAgMjAxNQ==?= In-Reply-To: References: Message-ID: . :) , . 2015-03-02 14:56 GMT+03:00 : > 5 Mail.Ru Group ? Perl- > Moscow.pm. Perl Mongers ( . ??) 8 > . , > . > > Perl 6. Perl > , , > . 2000 Perl > Perl 6 . > , , > Perl 6. > > ? . > Perl 6 . > Perl-, , Python, > Go Ruby : Perl 6 > . > > * *, Perl-, ?Perl 6 2.0? > , Perl 6 . > ? Perl 6 , ? . ? > , > , Perl 6 , , 2015-. > : > ! , > Perl 6, , > . > > * *, , ?Perl 6 : 8 > ? > > ? pugs? 2007 Perl- > Perl 6, ? . ? > , , > -. FOSDEM , > . , Perl 6 > 2007 . > > 19.30. > : -., 39, . 79 (. ??). > > , , > > http://corp.mail.ru/stream/MoscowPM/ > > -- > , > > > -- > Moscow.pm mailing list > moscow-pm pm.org | http://moscow.pm.org > > -- WBR, Yury Pats cellular: +375 (29) 5870723 ----------- ----------- HTML … URL: From dzirtik gmail.com Mon Mar 2 05:04:09 2015 From: dzirtik gmail.com (=?UTF-8?B?0J/QsNCy0LXQuyDQqdC10YDQsdC40L3QuNC9?=) Date: Mon, 2 Mar 2015 16:04:09 +0300 Subject: [Moscow.pm] =?utf-8?b?0JLRgdGC0YDQtdGH0LAgTW9zY293LnBtIDUg0Lw=?= =?utf-8?b?0LDRgNGC0LAgMjAxNQ==?= In-Reply-To: References: Message-ID: Moscow.pm : https://www.youtube.com/channel/UCXG2gjCfXDkvg9TfPmNXPIg 2 2015 ., 16:00 Yury Pats : > . :) > , . > > 2015-03-02 14:56 GMT+03:00 : > >> 5 Mail.Ru Group ? Perl- >> Moscow.pm. Perl Mongers ( . ??) 8 >> . , >> . >> >> Perl 6. Perl >> , , >> . 2000 Perl >> Perl 6 . >> , , >> Perl 6. >> >> ? . >> Perl 6 . >> Perl-, , Python, >> Go Ruby : Perl 6 >> . >> >> * *, Perl-, ?Perl 6 2.0? >> , Perl 6 . >> ? Perl 6 , ? . ? >> , >> , Perl 6 , , 2015-. >> : >> ! , >> Perl 6, , >> . >> >> * *, , ?Perl 6 : 8 >> ? >> >> ? pugs? 2007 Perl- >> Perl 6, ? . ? >> , , >> -. FOSDEM , >> . , Perl 6 >> 2007 . >> >> 19.30. >> : -., 39, . 79 (. ??). >> >> , , >> >> http://corp.mail.ru/stream/MoscowPM/ >> >> -- >> , >> >> >> -- >> Moscow.pm mailing list >> moscow-pm pm.org | http://moscow.pm.org >> >> > > > -- > WBR, Yury Pats > cellular: +375 (29) 5870723 > > -- > Moscow.pm mailing list > moscow-pm pm.org | http://moscow.pm.org > > -- , ----------- ----------- HTML … URL: From andy shitov.ru Mon Mar 2 05:05:56 2015 From: andy shitov.ru (Andrew Shitov) Date: Mon, 2 Mar 2015 14:05:56 +0100 Subject: [Moscow.pm] =?utf-8?b?0JLRgdGC0YDQtdGH0LAgTW9zY293LnBtIDUg0Lw=?= =?utf-8?b?0LDRgNGC0LAgMjAxNQ==?= In-Reply-To: References: Message-ID: 2015-03-02 14:00 GMT+01:00 Yury Pats : > . :) ! :-) -- Andrew Shitov ______________________________________________________________________ andy shitov.ru | http://shitov.ru From yu.pats gmail.com Mon Mar 2 07:14:57 2015 From: yu.pats gmail.com (Yury Pats) Date: Mon, 2 Mar 2015 18:14:57 +0300 Subject: [Moscow.pm] =?utf-8?b?0JLRgdGC0YDQtdGH0LAgTW9zY293LnBtIDUg0Lw=?= =?utf-8?b?0LDRgNGC0LAgMjAxNQ==?= In-Reply-To: References: Message-ID: . :) , . 2015-03-02 16:05 GMT+03:00 Andrew Shitov : > 2015-03-02 14:00 GMT+01:00 Yury Pats : > > . :) > > ! :-) > > -- > Andrew Shitov > ______________________________________________________________________ > andy shitov.ru | http://shitov.ru > -- > Moscow.pm mailing list > moscow-pm pm.org | http://moscow.pm.org > -- WBR, Yury Pats cellular: +375 (29) 5870723 ----------- ----------- HTML … URL: From dzirtik gmail.com Tue Mar 3 04:47:36 2015 From: dzirtik gmail.com (=?UTF-8?B?0J/QsNCy0LXQuyDQqdC10YDQsdC40L3QuNC9?=) Date: Tue, 3 Mar 2015 15:47:36 +0300 Subject: [Moscow.pm] SQL Builder Message-ID: , ! ORM , . SQL Builder SQL::Absrtract . SQL::Absrtract::More , Moose - , ? -- , ----------- ----------- HTML … URL: From warstone list.ru Tue Mar 3 05:02:13 2015 From: warstone list.ru (=?UTF-8?B?V2Fyc3RvbmVAbGlzdC5ydQ==?=) Date: Tue, 03 Mar 2015 16:02:13 +0300 Subject: [Moscow.pm] =?utf-8?q?SQL_Builder?= In-Reply-To: References: Message-ID: <1425387733.985512804@f399.i.mail.ru> http://cpansearch.perl.org/src/DAMI/SQL-Abstract-More-1.26/lib/SQL/Abstract/More.pm - Moose ?.. 3? , 03 2015, 15:47 +03:00 : >, ! > > ORM , . > > ŚSQL Builder SQL::Absrtract . > >SQL::Absrtract::More , Moose > > > - , ? > >-- > , > >-- >Moscow.pm mailing list >moscow-pm pm.org | http://moscow.pm.org ----------- ----------- HTML … URL: From pef-secure yandex.ru Tue Mar 3 05:13:41 2015 From: pef-secure yandex.ru (PEF Secure) Date: Tue, 03 Mar 2015 14:13:41 +0100 Subject: [Moscow.pm] SQL Builder In-Reply-To: References: Message-ID: <1669794.95ucZapvTl@rawen> On Tuesday, March 03, 2015 15:47:36 wrote: > , ! > > ORM , > . > SQL Builder SQL::Absrtract > . > > SQL::Absrtract::More , Moose > > > - , ? > https://github.com/pef-secure/dbix-struct . . http://mail.pm.org/pipermail/moscow-pm/2015-January/018988.html -- PEF Developer From dzirtik gmail.com Tue Mar 3 05:15:28 2015 From: dzirtik gmail.com (=?UTF-8?B?0J/QsNCy0LXQuyDQqdC10YDQsdC40L3QuNC9?=) Date: Tue, 3 Mar 2015 16:15:28 +0300 Subject: [Moscow.pm] SQL Builder In-Reply-To: <1425387733.985512804@f399.i.mail.ru> References: <1425387733.985512804@f399.i.mail.ru> Message-ID: https://widgets.stratopan.com/wheel?q=SQL-Abstract-More-1.26&fs=1 , Moo, rpm Moose. . https://widgets.stratopan.com/wheel?q=SQL-Maker-1.21&fs=1 ) 3 2015 ., 16:02 Warstone list.ru : > > http://cpansearch.perl.org/src/DAMI/SQL-Abstract-More-1.26/lib/SQL/Abstract/More.pm > > - Moose ?.. 3? > > > , 03 2015, 15:47 +03:00 >: > > , ! > > ORM , > . > > SQL Builder SQL::Absrtract > . > > SQL::Absrtract::More , Moose > > > - , ? > > -- > , > > -- > Moscow.pm mailing list > moscow-pm pm.org | > http://moscow.pm.org > > > > -- > Moscow.pm mailing list > moscow-pm pm.org | http://moscow.pm.org > > -- , ----------- ----------- HTML … URL: From dzirtik gmail.com Tue Mar 3 05:24:10 2015 From: dzirtik gmail.com (=?UTF-8?B?0J/QsNCy0LXQuyDQqdC10YDQsdC40L3QuNC9?=) Date: Tue, 3 Mar 2015 16:24:10 +0300 Subject: [Moscow.pm] SQL Builder In-Reply-To: <1425387733.985512804@f399.i.mail.ru> References: <1425387733.985512804@f399.i.mail.ru> Message-ID: https://cloud.mail.ru/public/be33cad365b6/SQL-Abstract-More.png 3 2015 ., 16:02 Warstone list.ru : > > http://cpansearch.perl.org/src/DAMI/SQL-Abstract-More-1.26/lib/SQL/Abstract/More.pm > > - Moose ?.. 3? > > > , 03 2015, 15:47 +03:00 >: > > , ! > > ORM , > . > > SQL Builder SQL::Absrtract > . > > SQL::Absrtract::More , Moose > > > - , ? > > -- > , > > -- > Moscow.pm mailing list > moscow-pm pm.org | > http://moscow.pm.org > > > > -- > Moscow.pm mailing list > moscow-pm pm.org | http://moscow.pm.org > > -- , ----------- ----------- HTML … URL: From shafiev gmail.com Tue Mar 3 05:30:09 2015 From: shafiev gmail.com (Naim Sh) Date: Tue, 03 Mar 2015 17:30:09 +0400 Subject: [Moscow.pm] SQL Builder In-Reply-To: References: <1425387733.985512804@f399.i.mail.ru> Message-ID: <54F5B761.3000408@gmail.com> ? On 03/03/2015 05:24 PM, wrote: > https://cloud.mail.ru/public/be33cad365b6/SQL-Abstract-More.png > > 3 2015 ., 16:02 Warstone list.ru > > > : > > http://cpansearch.perl.org/src/DAMI/SQL-Abstract-More-1.26/lib/SQL/Abstract/More.pm > > - Moose ?.. 3? > > > , 03 2015, 15:47 +03:00 > >: > > , ! > > ORM , > . > > SQL Builder SQL::Absrtract > . > > SQL::Absrtract::More , Moose > > > > - , ? > > -- > , > > -- > Moscow.pm mailing list > moscow-pm pm.org > | > http://moscow.pm.org > > > > -- > Moscow.pm mailing list > moscow-pm pm.org | http://moscow.pm.org > > > > > -- > , > > > -- ----------- ----------- HTML … URL: From dzirtik gmail.com Tue Mar 3 05:37:17 2015 From: dzirtik gmail.com (=?UTF-8?B?0J/QsNCy0LXQuyDQqdC10YDQsdC40L3QuNC9?=) Date: Tue, 3 Mar 2015 16:37:17 +0300 Subject: [Moscow.pm] SQL Builder In-Reply-To: <54F5B761.3000408@gmail.com> References: <1425387733.985512804@f399.i.mail.ru> <54F5B761.3000408@gmail.com> Message-ID: ) 3 2015 ., 16:30 Naim Sh : > ? > On 03/03/2015 05:24 PM, wrote: > > https://cloud.mail.ru/public/be33cad365b6/SQL-Abstract-More.png > > 3 2015 ., 16:02 Warstone list.ru > : > >> >> http://cpansearch.perl.org/src/DAMI/SQL-Abstract-More-1.26/lib/SQL/Abstract/More.pm >> >> - Moose ?.. 3? >> >> >> , 03 2015, 15:47 +03:00 > >: >> >> , ! >> >> ORM , >> . >> >> SQL Builder SQL::Absrtract >> . >> >> SQL::Absrtract::More , Moose >> >> >> - , ? >> >> -- >> , >> >> -- >> Moscow.pm mailing list >> moscow-pm pm.org | >> http://moscow.pm.org >> >> >> >> -- >> Moscow.pm mailing list >> moscow-pm pm.org | http://moscow.pm.org >> >> > > > -- > , > > > > > -- > > > > -- > Moscow.pm mailing list > moscow-pm pm.org | http://moscow.pm.org > > -- , ----------- ----------- HTML … URL: From shafiev gmail.com Tue Mar 3 05:43:38 2015 From: shafiev gmail.com (Naim Sh) Date: Tue, 03 Mar 2015 17:43:38 +0400 Subject: [Moscow.pm] SQL Builder In-Reply-To: References: <1425387733.985512804@f399.i.mail.ru> <54F5B761.3000408@gmail.com> Message-ID: <54F5BA8A.1010408@gmail.com> ( , - , ϣ . ) On 03/03/2015 05:37 PM, wrote: > ) > > 3 2015 ., 16:30 Naim Sh > : > > ? > On 03/03/2015 05:24 PM, wrote: >> >> https://cloud.mail.ru/public/be33cad365b6/SQL-Abstract-More.png >> >> 3 2015 ., 16:02 Warstone list.ru >> > > : >> >> http://cpansearch.perl.org/src/DAMI/SQL-Abstract-More-1.26/lib/SQL/Abstract/More.pm >> >> - Moose ?.. >> 3? >> >> >> , 03 2015, 15:47 +03:00 >> >: >> >> , ! >> >> ORM , >> . >> >> SQL Builder SQL::Absrtract >> . >> >> SQL::Absrtract::More , Moose >> >> >> >> - , ? >> >> -- >> , >> >> -- >> Moscow.pm mailing list >> moscow-pm pm.org >> | >> http://moscow.pm.org >> >> >> >> -- >> Moscow.pm mailing list >> moscow-pm pm.org | http://moscow.pm.org >> >> >> >> >> -- >> , >> >> >> > > -- > > > > -- > Moscow.pm mailing list > moscow-pm pm.org | http://moscow.pm.org > > > > > -- > , > > > -- ----------- ----------- HTML … URL: From ivan bessarabov.ru Tue Mar 3 06:54:30 2015 From: ivan bessarabov.ru (=?UTF-8?B?0JjQstCw0L0g0JHQtdGB0YHQsNGA0LDQsdC+0LI=?=) Date: Tue, 3 Mar 2015 18:54:30 +0400 Subject: [Moscow.pm] SQL Builder In-Reply-To: <54F5BA8A.1010408@gmail.com> References: <1425387733.985512804@f399.i.mail.ru> <54F5B761.3000408@gmail.com> <54F5BA8A.1010408@gmail.com> Message-ID: ? cpan ? https://widgets.stratopan.com/wheel?q=SQL-Abstract-More-1.26&runtime=1&fs=1 ( "Dependency graph" https://metacpan.org/pod/SQL::Abstract::More ) 2015-03-03 16:43 GMT+03:00 Naim Sh : > ( , - , ϣ > . ) > On 03/03/2015 05:37 PM, wrote: > > ) > > 3 2015 ., 16:30 Naim Sh : >> >> ? >> On 03/03/2015 05:24 PM, wrote: >> >> https://cloud.mail.ru/public/be33cad365b6/SQL-Abstract-More.png >> >> 3 2015 ., 16:02 Warstone list.ru >> : >>> >>> >>> http://cpansearch.perl.org/src/DAMI/SQL-Abstract-More-1.26/lib/SQL/Abstract/More.pm >>> >>> - Moose ?.. 3? >>> >>> >>> , 03 2015, 15:47 +03:00 >>> : >>> >>> , ! >>> >>> ORM , >>> . >>> >>> SQL Builder SQL::Absrtract >>> . >>> >>> SQL::Absrtract::More , Moose >>> >>> >>> - , ? >>> >>> -- >>> , >>> >>> -- >>> Moscow.pm mailing list >>> moscow-pm pm.org | http://moscow.pm.org >>> >>> >>> >>> -- >>> Moscow.pm mailing list >>> moscow-pm pm.org | http://moscow.pm.org >>> >> >> >> >> -- >> , >> >> >> >> >> -- >> >> >> >> -- >> Moscow.pm mailing list >> moscow-pm pm.org | http://moscow.pm.org >> > > > > -- > , > > > > > -- > > > > -- > Moscow.pm mailing list > moscow-pm pm.org | http://moscow.pm.org > From dzirtik gmail.com Tue Mar 3 06:57:02 2015 From: dzirtik gmail.com (=?UTF-8?B?0J/QsNCy0LXQuyDQqdC10YDQsdC40L3QuNC9?=) Date: Tue, 3 Mar 2015 17:57:02 +0300 Subject: [Moscow.pm] SQL Builder In-Reply-To: References: <1425387733.985512804@f399.i.mail.ru> <54F5B761.3000408@gmail.com> <54F5BA8A.1010408@gmail.com> Message-ID: , , All Phases https://widgets.stratopan.com/wheel?q=SQL-Abstract-More-1.26&fs=1 3 2015 ., 17:54 : > ? cpan > ? > https://widgets.stratopan.com/wheel?q=SQL-Abstract-More-1.26&runtime=1&fs=1 > > ( "Dependency graph" > https://metacpan.org/pod/SQL::Abstract::More ) > > 2015-03-03 16:43 GMT+03:00 Naim Sh : > > ( , - , ϣ > > > . ) > > On 03/03/2015 05:37 PM, wrote: > > > > ) > > > > 3 2015 ., 16:30 Naim Sh : > >> > >> ? > >> On 03/03/2015 05:24 PM, wrote: > >> > >> > https://cloud.mail.ru/public/be33cad365b6/SQL-Abstract-More.png > >> > >> 3 2015 ., 16:02 Warstone list.ru > >> : > >>> > >>> > >>> > http://cpansearch.perl.org/src/DAMI/SQL-Abstract-More-1.26/lib/SQL/Abstract/More.pm > >>> > >>> - Moose ?.. 3? > >>> > >>> > >>> , 03 2015, 15:47 +03:00 > >>> : > >>> > >>> , ! > >>> > >>> ORM , > >>> . > >>> > >>> SQL Builder SQL::Absrtract > > >>> . > >>> > >>> SQL::Absrtract::More , Moose > > >>> > >>> > >>> - , ? > >>> > >>> -- > >>> , > >>> > >>> -- > >>> Moscow.pm mailing list > >>> moscow-pm pm.org | http://moscow.pm.org > >>> > >>> > >>> > >>> -- > >>> Moscow.pm mailing list > >>> moscow-pm pm.org | http://moscow.pm.org > >>> > >> > >> > >> > >> -- > >> , > >> > >> > >> > >> > >> -- > >> > >> > >> > >> -- > >> Moscow.pm mailing list > >> moscow-pm pm.org | http://moscow.pm.org > >> > > > > > > > > -- > > , > > > > > > > > > > -- > > > > > > > > -- > > Moscow.pm mailing list > > moscow-pm pm.org | http://moscow.pm.org > > > -- > Moscow.pm mailing list > moscow-pm pm.org | http://moscow.pm.org > -- , ----------- ----------- HTML … URL: From warstone list.ru Tue Mar 3 05:57:27 2015 From: warstone list.ru (=?UTF-8?B?V2Fyc3RvbmVAbGlzdC5ydQ==?=) Date: Tue, 03 Mar 2015 16:57:27 +0300 Subject: [Moscow.pm] =?utf-8?q?SQL_Builder?= In-Reply-To: References: <1425387733.985512804@f399.i.mail.ru> Message-ID: <1425391047.324478740@f59.i.mail.ru> , - , : #---------------------------------------------------------------------- # utility function : cheap version of Scalar::Does (too heavy to be included) #---------------------------------------------------------------------- my %meth_for = ( ARRAY => '@{}', HASH => '%{}', ); sub does { my ($data, $type) = @_; my $reft = reftype $data; return defined $reft && $reft eq $type || blessed $data && overload::Method($data, $meth_for{$type}); } 2/3 . , 03 2015, 16:24 +03:00 : > Ԛ https://cloud.mail.ru/public/be33cad365b6/SQL-Abstract-More.png > >3 2015 ., 16:02 Warstone list.ru < warstone list.ru > : >>http://cpansearch.perl.org/src/DAMI/SQL-Abstract-More-1.26/lib/SQL/Abstract/More.pm >> - Moose ?.. 3? >> >> >>, 03 2015, 15:47 +03:00 < dzirtik gmail.com >: >>>, ! >>> >>> ORM , . >>> >>> ŚSQL Builder SQL::Absrtract . >>> >>>SQL::Absrtract::More , Moose >>> >>> >>> - , ? >>> >>>-- >>> , >>> >>>-- >>>Moscow.pm mailing list >>>moscow-pm pm.org | http://moscow.pm.org >> >> >>-- >>Moscow.pm mailing list >>moscow-pm pm.org | http://moscow.pm.org >> > > > >-- > , > >-- >Moscow.pm mailing list >moscow-pm pm.org | http://moscow.pm.org ----------- ----------- HTML … URL: From dzirtik gmail.com Tue Mar 3 06:59:30 2015 From: dzirtik gmail.com (=?UTF-8?B?0J/QsNCy0LXQuyDQqdC10YDQsdC40L3QuNC9?=) Date: Tue, 3 Mar 2015 17:59:30 +0300 Subject: [Moscow.pm] SQL Builder In-Reply-To: References: <1425387733.985512804@f399.i.mail.ru> Message-ID: Scalar::Does, , 1.26 . , , . 3 2015 ., 16:24 : > https://cloud.mail.ru/public/be33cad365b6/SQL-Abstract-More.png > > 3 2015 ., 16:02 Warstone list.ru > : > >> >> http://cpansearch.perl.org/src/DAMI/SQL-Abstract-More-1.26/lib/SQL/Abstract/More.pm >> >> - Moose ?.. 3? >> >> >> , 03 2015, 15:47 +03:00 > >: >> >> , ! >> >> ORM , >> . >> >> SQL Builder SQL::Absrtract >> . >> >> SQL::Absrtract::More , Moose >> >> >> - , ? >> >> -- >> , >> >> -- >> Moscow.pm mailing list >> moscow-pm pm.org | >> http://moscow.pm.org >> >> >> >> -- >> Moscow.pm mailing list >> moscow-pm pm.org | http://moscow.pm.org >> >> > > > -- > , > > -- , ----------- ----------- HTML … URL: From dzirtik gmail.com Tue Mar 3 07:01:15 2015 From: dzirtik gmail.com (=?UTF-8?B?0J/QsNCy0LXQuyDQqdC10YDQsdC40L3QuNC9?=) Date: Tue, 3 Mar 2015 18:01:15 +0300 Subject: [Moscow.pm] SQL Builder In-Reply-To: <1425391047.324478740@f59.i.mail.ru> References: <1425387733.985512804@f399.i.mail.ru> <1425391047.324478740@f59.i.mail.ru> Message-ID: ) , 1.23. , ! 3 2015 ., 16:57 Warstone list.ru : > , - , > : > > #---------------------------------------------------------------------- > # utility function : cheap version of Scalar::Does (too heavy to be included) > #---------------------------------------------------------------------- > my %meth_for = ( > ARRAY => '@{}', > HASH => '%{}', > ); > > sub does { > my ($data, $type) = @_; > my $reft = reftype $data; > return defined $reft && $reft eq $type > || blessed $data && overload::Method($data, $meth_for{$type}); > } > > 2/3 . > > > , 03 2015, 16:24 +03:00 >: > > https://cloud.mail.ru/public/be33cad365b6/SQL-Abstract-More.png > > 3 2015 ., 16:02 Warstone list.ru > < > warstone list.ru > > : > > > http://cpansearch.perl.org/src/DAMI/SQL-Abstract-More-1.26/lib/SQL/Abstract/More.pm > > - Moose ?.. 3? > > > , 03 2015, 15:47 +03:00 >: > > , ! > > ORM , > . > > SQL Builder SQL::Absrtract > . > > SQL::Absrtract::More , Moose > > > - , ? > > -- > , > > -- > Moscow.pm mailing list > moscow-pm pm.org | > http://moscow.pm.org > > > > -- > Moscow.pm mailing list > moscow-pm pm.org > | > http://moscow.pm.org > > > > > -- > , > > -- > Moscow.pm mailing list > moscow-pm pm.org | > http://moscow.pm.org > > > > -- > Moscow.pm mailing list > moscow-pm pm.org | http://moscow.pm.org > > -- , ----------- ----------- HTML … URL: From maxim.vuets gmail.com Tue Mar 3 08:00:03 2015 From: maxim.vuets gmail.com (Maxim Vuets) Date: Tue, 3 Mar 2015 17:00:03 +0100 Subject: [Moscow.pm] SQL Builder In-Reply-To: References: <1425387733.985512804@f399.i.mail.ru> Message-ID: 2015-03-03 14:15 GMT+01:00 : > https://widgets.stratopan.com/wheel?q=SQL-Abstract-More-1.26&fs=1 > , Moo, rpm Moose. > > . , Moo ? "" ? From warstone list.ru Tue Mar 3 08:24:51 2015 From: warstone list.ru (=?UTF-8?B?V2Fyc3RvbmVAbGlzdC5ydQ==?=) Date: Tue, 03 Mar 2015 19:24:51 +0300 Subject: [Moscow.pm] =?utf-8?q?SQL_Builder?= In-Reply-To: References: Message-ID: <1425399891.513952816@f212.i.mail.ru> , uses ISA - . 2.18 - (AA::func() AA::BB::func()) . + c3 c3 ( , , ). CGI , FCGI. , 03 2015, 17:00 +01:00 Maxim Vuets : >2015-03-03 14:15 GMT+01:00 < dzirtik gmail.com >: >> https://widgets.stratopan.com/wheel?q=SQL-Abstract-More-1.26&fs=1 >> , Moo, rpm Moose. >> >> . > > , Moo ? "" > ? >-- >Moscow.pm mailing list >moscow-pm pm.org | http://moscow.pm.org ----------- ----------- HTML … URL: From onokonem gmail.com Tue Mar 3 09:13:01 2015 From: onokonem gmail.com (Daniel Podolsky) Date: Tue, 3 Mar 2015 21:13:01 +0400 Subject: [Moscow.pm] SQL Builder In-Reply-To: <1425399891.513952816@f212.i.mail.ru> References: <1425399891.513952816@f212.i.mail.ru> Message-ID: > CGI , FCGI. - FCGI? From i.petro.77.00 gmail.com Tue Mar 3 10:57:21 2015 From: i.petro.77.00 gmail.com (Ivan Petrov) Date: Tue, 3 Mar 2015 21:57:21 +0300 Subject: [Moscow.pm] SQL Builder In-Reply-To: <1425399891.513952816@f212.i.mail.ru> References: <1425399891.513952816@f212.i.mail.ru> Message-ID: <20150303185721.GW28103@vdsl.uvw.ru> > CGI , FCGI. CGI FCGI? . . From yu.pats gmail.com Tue Mar 3 12:19:43 2015 From: yu.pats gmail.com (Yury Pats) Date: Tue, 3 Mar 2015 23:19:43 +0300 Subject: [Moscow.pm] Work for oDesk! Perl Developer- Full-time, long term Message-ID: , . 1-2 . https://www.odesk.com/jobs/_~0176dcbf25d006a06e . -- WBR, Yury Pats cellular: +375 (29) 5870723 ----------- ----------- HTML … URL: From akovbovich gmail.com Tue Mar 3 14:33:02 2015 From: akovbovich gmail.com (Andrey Kovbovich) Date: Wed, 4 Mar 2015 02:33:02 +0400 Subject: [Moscow.pm] Work for oDesk! Perl Developer- Full-time, long term In-Reply-To: References: Message-ID: ? ) 3 2015 ., 23:19 Yury Pats : > , . 1-2 . > > https://www.odesk.com/jobs/_~0176dcbf25d006a06e > > . > > -- > WBR, Yury Pats > cellular: +375 (29) 5870723 > > -- > Moscow.pm mailing list > moscow-pm pm.org | http://moscow.pm.org > > ----------- ----------- HTML … URL: From an.gorohovski gmail.com Tue Mar 3 22:36:45 2015 From: an.gorohovski gmail.com (Alessandro Gorohovski) Date: Wed, 04 Mar 2015 08:36:45 +0200 Subject: [Moscow.pm] Work for oDesk! Perl Developer- Full-time, long term In-Reply-To: References: Message-ID: Andrey Kovbovich () ϣ Wed, 04 Mar 2015 00:33:02 +0200: > ? ) ? > 3 2015 ., 23:19 Yury Pats > : > >> , . 1-2 . >> >> https://www.odesk.com/jobs/_~0176dcbf25d006a06e >> >> . >> >> -- >> WBR, Yury Pats >> cellular: +375 (29) 5870723 >> >> -- >> Moscow.pm mailing list >> moscow-pm pm.org | http://moscow.pm.org >> >> -- ANG From yu.pats gmail.com Wed Mar 4 03:21:50 2015 From: yu.pats gmail.com (Yury Pats) Date: Wed, 4 Mar 2015 14:21:50 +0300 Subject: [Moscow.pm] Work for oDesk! Perl Developer- Full-time, long term In-Reply-To: References: Message-ID: 2015-03-04 9:36 GMT+03:00 Alessandro Gorohovski : > Andrey Kovbovich () ϣ Wed, 04 > Mar 2015 00:33:02 +0200: > > ? ) >> > > , hr, . , . > ? > > 3 2015 ., 23:19 Yury Pats >> : >> >> , . 1-2 . >>> >>> https://www.odesk.com/jobs/_~0176dcbf25d006a06e >>> >>> . >>> >>> -- >>> WBR, Yury Pats >>> cellular: +375 (29) 5870723 >>> >>> -- >>> Moscow.pm mailing list >>> moscow-pm pm.org | http://moscow.pm.org >>> >>> >>> > > -- > ANG > > -- > Moscow.pm mailing list > moscow-pm pm.org | http://moscow.pm.org > -- WBR, Yury Pats cellular: +375 (29) 5870723 ----------- ----------- HTML … URL: From mi на ya.ru Sun Mar 8 15:33:12 2015 From: mi на ya.ru (Nikolay Mishin) Date: Mon, 09 Mar 2015 01:33:12 +0300 Subject: [Moscow.pm] Test::Spelling Message-ID: <6841111425853992@web30o.yandex.ru> Moscow-PM О великий, могучий и ужасный Perl!! Решил тут перевести дистрибутив на Dist::Milla и у Миягавы был тест podspell.t ну я запилил себе такой же https://github.com/mishin/POD-to-RU/blob/master/xt/podspell.t use Test::More; eval q{ use Test::Spelling }; plan skip_all => "Test::Spelling is not installed." if $@; add_stopwords(); set_spell_cmd("aspell -l ru-yo list"); #set_spell_cmd("aspell -l en list"); #set_spell_cmd("aspell --lang=ru-yo list|aspell --lang=en list"); all_pod_files_spelling_ok('lib'); __DATA__ Nikolay Mishin Но проблема в том, что у меня тексты двуязычные русский с английским, если бы не тест на perl, то проверить орфографию из ком строки аспеллом легко: https://pseudoscripter.wordpress.com/2011/05/11/aspell-using-more-than-one-language/ cat lib/POD2/RU/perlretut.pod | aspell --lang=ru-yo list | aspell --lang=en list | sort -u но!! в скрипт на perl aspell --lang=ru-yo list|aspell --lang=en list то ничего не произойдет, это и понятно там внутри в модуле он последовательно проходит по всем файлам склеить анг и русский словари, как в http://habrahabr.ru/post/133552/ тоже не получается - пишет aspell is not in the proper format. в общем что-то я заколупался на простом казалось бы вопросе, но уже неделю, как вишу, спасите.. p.s. uname -a Linux mishin-Satellite-T230 3.13.0-46-generic #77-Ubuntu SMP Mon Mar 2 18:23:39 UTC 2015 x86_64 x86_64 x86_64 GNU/Linux -- С уважением Николай Мишин From mi на ya.ru Mon Mar 9 11:22:33 2015 From: mi на ya.ru (Nikolay Mishin) Date: Mon, 09 Mar 2015 21:22:33 +0300 Subject: [Moscow.pm] Test::Spelling In-Reply-To: <6841111425853992@web30o.yandex.ru> References: <6841111425853992@web30o.yandex.ru> Message-ID: <8651621425925353@web28j.yandex.ru> Всем привет, 1) решил проблему sp_ch () {(cat $1|aspell --lang=ru-yo list|aspell --lang=en list); };sp_ch создавая налету функцию в bash use Test::More; eval q{ use Test::Spelling }; plan skip_all => "Test::Spelling is not installed." if $@; add_stopwords(); set_spell_cmd("sp_ch () {(cat $1|aspell --lang=ru-yo list|aspell --lang=en list); };sp_ch"); all_pod_files_spelling_ok('lib'); __DATA__ regop regops 2) Добавил Dist::Milla и теперь можно клонить мой(наш) проект прямо с метасипана https://metacpan.org/release/MISHIN/POD2-RU-5.18.0.1.16 3) заодно доперевел perlretut https://metacpan.org/pod/release/MISHIN/POD2-RU-5.18.0.1.16/lib/POD2/RU/perlretut.pod 09.03.2015, 01:33, "Nikolay Mishin" : > Moscow-PM > > О великий, могучий и ужасный Perl!! > Решил тут перевести дистрибутив на Dist::Milla > и у Миягавы был тест podspell.t > > ну я запилил себе такой же > > https://github.com/mishin/POD-to-RU/blob/master/xt/podspell.t > > use Test::More; > eval q{ use Test::Spelling }; > plan skip_all => "Test::Spelling is not installed." if $@; > add_stopwords(); > set_spell_cmd("aspell -l ru-yo list"); > #set_spell_cmd("aspell -l en list"); > #set_spell_cmd("aspell --lang=ru-yo list|aspell --lang=en list"); > all_pod_files_spelling_ok('lib'); > __DATA__ > Nikolay > Mishin > > Но проблема в том, что у меня тексты двуязычные русский с английским, > если бы не тест на perl, то проверить орфографию из ком строки аспеллом легко: > > https://pseudoscripter.wordpress.com/2011/05/11/aspell-using-more-than-one-language/ > > cat lib/POD2/RU/perlretut.pod | aspell --lang=ru-yo list | aspell --lang=en list | sort -u > > но!! в скрипт на perl > aspell --lang=ru-yo list|aspell --lang=en list > то ничего не произойдет, > это и понятно там внутри в модуле он последовательно проходит по всем файлам > > склеить анг и русский словари, как в http://habrahabr.ru/post/133552/ > тоже не получается - пишет aspell is not in the proper format. > > в общем что-то я заколупался на простом казалось бы вопросе, но уже неделю, как вишу, > спасите.. > p.s. > > uname -a > Linux mishin-Satellite-T230 3.13.0-46-generic #77-Ubuntu SMP Mon Mar 2 18:23:39 UTC 2015 x86_64 x86_64 x86_64 GNU/Linux > > -- > С уважением > Николай Мишин > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org -- С уважением Николай Мишин From akovbovich на gmail.com Tue Mar 10 07:03:36 2015 From: akovbovich на gmail.com (Andrey Kovbovich) Date: Tue, 10 Mar 2015 17:03:36 +0300 Subject: [Moscow.pm] =?utf-8?b?0JHRi9GB0YLRgNCw0Y8g0LrQvtC90LrQsNGC0LU=?= =?utf-8?b?0L3QsNGG0LjRjyDRgdGC0YDQvtC6?= Message-ID: Кто-нибудь знает, за счет чего substr быстрее? $ perl -MBenchmark=cmpthese -wE'my$x="0"x1_000_000;my$b="1"x100_000;cmpthese(10000,{concat=>sub{my$z=$x.$b;},substr=>sub{my$z="";substr$z,(length$z),(length$x),$x;substr$z,(length$z),(length$b),$b;},join=>sub{my$z=join("",$x,$b)}});' Rate join concat substr join 3922/s -- -0% -58% concat 3937/s 0% -- -57% substr 9259/s 136% 135% -- ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From akovbovich на gmail.com Tue Mar 10 07:21:14 2015 From: akovbovich на gmail.com (Andrey Kovbovich) Date: Tue, 10 Mar 2015 17:21:14 +0300 Subject: [Moscow.pm] =?utf-8?b?0JHRi9GB0YLRgNCw0Y8g0LrQvtC90LrQsNGC0LU=?= =?utf-8?b?0L3QsNGG0LjRjyDRgdGC0YDQvtC6?= In-Reply-To: References: Message-ID: Отвечая на свой же вопрос - потому что join и concat предварительно делают что-то наподобие my$z=" "x((length$x)+(length$y)); Т.к. такое выражение выравнивает substr к показателям join и concat. Кстати, еще вопрос, где у Перла функция конкатенации (та, что символ-точка)? В CORE::* не нашел. Мне нужен кодереф от нее. 2015-03-10 17:03 GMT+03:00 Andrey Kovbovich : > Кто-нибудь знает, за счет чего substr быстрее? > > $ perl -MBenchmark=cmpthese > -wE'my$x="0"x1_000_000;my$b="1"x100_000;cmpthese(10000,{concat=>sub{my$z=$x.$b;},substr=>sub{my$z="";substr$z,(length$z),(length$x),$x;substr$z,(length$z),(length$b),$b;},join=>sub{my$z=join("",$x,$b)}});' > Rate join concat substr > join 3922/s -- -0% -58% > concat 3937/s 0% -- -57% > substr 9259/s 136% 135% -- > > ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From pavel на kuptsov.info Tue Mar 10 08:06:37 2015 From: pavel на kuptsov.info (=?UTF-8?B?0J/QsNCy0LXQuyDQmtGD0L/RhtC+0LI=?=) Date: Tue, 10 Mar 2015 18:06:37 +0300 Subject: [Moscow.pm] Mojolicious cookie Message-ID: Всем привет! Есть небольшое затруднение в конце дня @_@ Имею на входе mojolicious- приложения куки поставленные джаваскриптом - погуглил, почитал доки, но кроме разбора $self->req->headers->cookie ничего внятного не нашел. Может есть более аккуратный способ доступа к таким "сырым" кукам? Ткните носом? :-D ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From parserpro на gmail.com Tue Mar 10 08:15:17 2015 From: parserpro на gmail.com (=?UTF-8?B?0JDQu9C10LrRgdC10Lkg0JzRi9GI0LrQuNC9?=) Date: Tue, 10 Mar 2015 18:15:17 +0300 Subject: [Moscow.pm] Mojolicious cookie In-Reply-To: References: Message-ID: Возможно оно: https://metacpan.org/pod/Mojolicious::Controller#cookie 10 марта 2015 г., 18:06 пользователь Павел Купцов написал: > Всем привет! > Есть небольшое затруднение в конце дня @_@ > Имею на входе mojolicious- приложения куки поставленные джаваскриптом - > погуглил, почитал доки, но кроме разбора $self->req->headers->cookie ничего > внятного не нашел. Может есть более аккуратный способ доступа к таким > "сырым" кукам? Ткните носом? :-D > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > > -- С уважением, Мышкин Алексей. ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From warstone на list.ru Tue Mar 10 08:25:56 2015 From: warstone на list.ru (=?UTF-8?B?V2Fyc3RvbmVAbGlzdC5ydQ==?=) Date: Tue, 10 Mar 2015 18:25:56 +0300 Subject: [Moscow.pm] =?utf-8?b?0JHRi9GB0YLRgNCw0Y8g0LrQvtC90LrQsNGC0LU=?= =?utf-8?b?0L3QsNGG0LjRjyDRgdGC0YDQvtC6?= In-Reply-To: References: Message-ID: <1426001155.984723887@f352.i.mail.ru> Потому что substr не копирует строку, он только в SV указатель на строку меняет. Это фишка конкретно сабстера. По этому его скорость работы не зависит от размеров строки и смещения в ней. join и конкат создает новую строку (очевидно) Вторник, 10 марта 2015, 17:21 +03:00 от Andrey Kovbovich : >Отвечая на свой же вопрос - потому что join и concat предварительно делают что-то наподобие my$z=" "x((length$x)+(length$y)); Т.к. такое выражение выравнивает substr к показателям join и concat. Кстати, еще вопрос, где у Перла функция конкатенации (та, что символ-точка)? В CORE::* не нашел. Мне нужен кодереф от нее. > >2015-03-10 17:03 GMT+03:00 Andrey Kovbovich < akovbovich на gmail.com > : >>Кто-нибудь знает, за счет чего substr быстрее? >> >>$ perl -MBenchmark=cmpthese -wE'my$x="0"x1_000_000;my$b="1"x100_000;cmpthese(10000,{concat=>sub{my$z=$x.$b;},substr=>sub{my$z="";substr$z,(length$z),(length$x),$x;substr$z,(length$z),(length$b),$b;},join=>sub{my$z=join("",$x,$b)}});' >>         Rate   join concat substr >>join   3922/s     --    -0%   -58% >>concat 3937/s     0%     --   -57% >>substr 9259/s   136%   135%     -- >> > >-- >Moscow.pm mailing list >moscow-pm на pm.org | http://moscow.pm.org ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From akovbovich на gmail.com Tue Mar 10 08:42:00 2015 From: akovbovich на gmail.com (Andrey Kovbovich) Date: Tue, 10 Mar 2015 18:42:00 +0300 Subject: [Moscow.pm] =?utf-8?b?0JHRi9GB0YLRgNCw0Y8g0LrQvtC90LrQsNGC0LU=?= =?utf-8?b?0L3QsNGG0LjRjyDRgdGC0YDQvtC6?= In-Reply-To: <1426001155.984723887@f352.i.mail.ru> References: <1426001155.984723887@f352.i.mail.ru> Message-ID: Коля, это было бы слишком хорошо, если бы было правдой :) Потому что я прогнал тест и выяснилось 1) скорость зависит от длины строки 2) версия с перестановкой указателей - это ты про что? нужны как бы мутабельные строки, или ты хочешь сказать что сабстр делайт элиас для исходных строк? 10 марта 2015 г., 18:25 пользователь Warstone на list.ru написал: > Потому что substr не копирует строку, он только в SV указатель на строку > меняет. Это фишка конкретно сабстера. По этому его скорость работы не > зависит от размеров строки и смещения в ней. > join и конкат создает новую строку (очевидно) > > > Вторник, 10 марта 2015, 17:21 +03:00 от Andrey Kovbovich < > akovbovich на gmail.com>: > > Отвечая на свой же вопрос - потому что join и concat предварительно > делают что-то наподобие my$z=" "x((length$x)+(length$y)); Т.к. такое > выражение выравнивает substr к показателям join и concat. Кстати, еще > вопрос, где у Перла функция конкатенации (та, что символ-точка)? В CORE::* > не нашел. Мне нужен кодереф от нее. > > 2015-03-10 17:03 GMT+03:00 Andrey Kovbovich >: > > Кто-нибудь знает, за счет чего substr быстрее? > > $ perl -MBenchmark=cmpthese > -wE'my$x="0"x1_000_000;my$b="1"x100_000;cmpthese(10000,{concat=>sub{my$z=$x.$b;},substr=>sub{my$z="";substr$z,(length$z),(length$x),$x;substr$z,(length$z),(length$b),$b;},join=>sub{my$z=join("",$x,$b)}});' > Rate join concat substr > join 3922/s -- -0% -58% > concat 3937/s 0% -- -57% > substr 9259/s 136% 135% -- > > > -- > Moscow.pm mailing list > moscow-pm на pm.org | > http://moscow.pm.org > > > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > > ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From warstone на list.ru Tue Mar 10 09:33:19 2015 From: warstone на list.ru (=?UTF-8?B?V2Fyc3RvbmVAbGlzdC5ydQ==?=) Date: Tue, 10 Mar 2015 19:33:19 +0300 Subject: [Moscow.pm] =?utf-8?b?0JHRi9GB0YLRgNCw0Y8g0LrQvtC90LrQsNGC0LU=?= =?utf-8?b?0L3QsNGG0LjRjyDRgdGC0YDQvtC6?= In-Reply-To: References: <1426001155.984723887@f352.i.mail.ru> Message-ID: <1426005199.250960150@f239.i.mail.ru> 1) А теперь у получившейся переменной замени 1 символ и увидь как скорость просела еще сильнее. 2) warstone на dev:~$ perl -e 'my $a="qwe"; my $b = substr($a, 1, 1); print "$a\t$b\n"; $b = "t"; print "$a\t$b\n"; substr($a, 1, 1) = "t"; print "$a\t$b\n"' qwe     w qwe     t qte     t Я не знаю что ты там изобретаешь, но наверно 3й вариант для тебя. cабстр в SV кладет поинтер на оригинальную строку со смещением. Вторник, 10 марта 2015, 18:42 +03:00 от Andrey Kovbovich : >Коля, это было бы слишком хорошо, если бы было правдой :) Потому что я прогнал тест и выяснилось 1) скорость зависит от длины строки 2) версия с перестановкой указателей - это ты про что? нужны как бы мутабельные строки, или ты хочешь сказать что сабстр делайт элиас для исходных строк? > >10 марта 2015 г., 18:25 пользователь Warstone на list.ru < warstone на list.ru > написал: >>Потому что substr не копирует строку, он только в SV указатель на строку меняет. Это фишка конкретно сабстера. По этому его скорость работы не зависит от размеров строки и смещения в ней. >>join и конкат создает новую строку (очевидно) >> >> >>Вторник, 10 марта 2015, 17:21 +03:00 от Andrey Kovbovich < akovbovich на gmail.com >: >>>Отвечая на свой же вопрос - потому что join и concat предварительно делают что-то наподобие my$z=" "x((length$x)+(length$y)); Т.к. такое выражение выравнивает substr к показателям join и concat. Кстати, еще вопрос, где у Перла функция конкатенации (та, что символ-точка)? В CORE::* не нашел. Мне нужен кодереф от нее. >>> >>>2015-03-10 17:03 GMT+03:00 Andrey Kovbovich < akovbovich на gmail.com > : >>>>Кто-нибудь знает, за счет чего substr быстрее? >>>> >>>>$ perl -MBenchmark=cmpthese -wE'my$x="0"x1_000_000;my$b="1"x100_000;cmpthese(10000,{concat=>sub{my$z=$x.$b;},substr=>sub{my$z="";substr$z,(length$z),(length$x),$x;substr$z,(length$z),(length$b),$b;},join=>sub{my$z=join("",$x,$b)}});' >>>>         Rate   join concat substr >>>>join   3922/s     --    -0%   -58% >>>>concat 3937/s     0%     --   -57% >>>>substr 9259/s   136%   135%     -- >>>> >>> >>>-- >>>Moscow.pm mailing list >>>moscow-pm на pm.org | http://moscow.pm.org >> >> >>-- >>Moscow.pm mailing list >>moscow-pm на pm.org | http://moscow.pm.org >> > >-- >Moscow.pm mailing list >moscow-pm на pm.org | http://moscow.pm.org ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From pef-secure на yandex.ru Tue Mar 10 09:48:35 2015 From: pef-secure на yandex.ru (PEF Secure) Date: Tue, 10 Mar 2015 17:48:35 +0100 Subject: [Moscow.pm] =?utf-8?b?0JHRi9GB0YLRgNCw0Y8g0LrQvtC90LrQsNGC0LU=?= =?utf-8?b?0L3QsNGG0LjRjyDRgdGC0YDQvtC6?= In-Reply-To: References: Message-ID: <2017298.4T32Q9CbZz@rawen> On Tuesday, March 10, 2015 17:03:36 Andrey Kovbovich wrote: > Кто-нибудь знает, за счет чего substr быстрее? > > $ perl -MBenchmark=cmpthese > -wE'my$x="0"x1_000_000;my$b="1"x100_000;cmpthese(10000,{concat=>sub{my$z=$x. > $b;},substr=>sub{my$z="";substr$z,(length$z),(length$x),$x;substr$z,(length$ > z),(length$b),$b;},join=>sub{my$z=join("",$x,$b)}});' Rate join concat > substr > join 3922/s -- -0% -58% > concat 3937/s 0% -- -57% > substr 9259/s 136% 135% -- selfcat => sub {my$z=$x; $z.=$b;} вот примерный аналог твоего substr -- PEF Developer From akovbovich на gmail.com Tue Mar 10 09:59:01 2015 From: akovbovich на gmail.com (Andrey Kovbovich) Date: Tue, 10 Mar 2015 19:59:01 +0300 Subject: [Moscow.pm] =?utf-8?b?0JHRi9GB0YLRgNCw0Y8g0LrQvtC90LrQsNGC0LU=?= =?utf-8?b?0L3QsNGG0LjRjyDRgdGC0YDQvtC6?= In-Reply-To: <2017298.4T32Q9CbZz@rawen> References: <2017298.4T32Q9CbZz@rawen> Message-ID: Интересно, получается конкатенировать более чем в 2 раза быстрее последовательно (selfcat), а не разом ($z = $x . $y); Warstone, я писал про использование сабстр с параметром replace (4ый). А ты почему-то используешь в примерах 3х-арный вариант. 2015-03-10 19:48 GMT+03:00 PEF Secure : > On Tuesday, March 10, 2015 17:03:36 Andrey Kovbovich wrote: > > Кто-нибудь знает, за счет чего substr быстрее? > > > > $ perl -MBenchmark=cmpthese > > > -wE'my$x="0"x1_000_000;my$b="1"x100_000;cmpthese(10000,{concat=>sub{my$z=$x. > > > $b;},substr=>sub{my$z="";substr$z,(length$z),(length$x),$x;substr$z,(length$ > > z),(length$b),$b;},join=>sub{my$z=join("",$x,$b)}});' Rate join concat > > substr > > join 3922/s -- -0% -58% > > concat 3937/s 0% -- -57% > > substr 9259/s 136% 135% -- > > selfcat => sub {my$z=$x; $z.=$b;} > > вот примерный аналог твоего substr > > -- > PEF Developer > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From mialinx на gmail.com Tue Mar 10 10:20:02 2015 From: mialinx на gmail.com (Dmitry Smal) Date: Tue, 10 Mar 2015 20:20:02 +0300 Subject: [Moscow.pm] =?utf-8?b?0JHRi9GB0YLRgNCw0Y8g0LrQvtC90LrQsNGC0LU=?= =?utf-8?b?0L3QsNGG0LjRjyDRgdGC0YDQvtC6?= In-Reply-To: References: <2017298.4T32Q9CbZz@rawen> Message-ID: <54FF27C2.1030001@gmail.com> А что у вас за задача такая ? Есть ооочень много конкатенаций подряд идет (в цикле например) - то нужно оптимизировать сам алгоритм склейки. Если не нагружен - оставить более читаемый вариант =) On 03/10/2015 07:59 PM, Andrey Kovbovich wrote: > Интересно, получается конкатенировать более чем в 2 раза быстрее > последовательно (selfcat), а не разом ($z = $x . $y); > > Warstone, я писал про использование сабстр с параметром replace (4ый). > А ты почему-то используешь в примерах 3х-арный вариант. > > 2015-03-10 19:48 GMT+03:00 PEF Secure >: > > On Tuesday, March 10, 2015 17:03:36 Andrey Kovbovich wrote: > > Кто-нибудь знает, за счет чего substr быстрее? > > > > $ perl -MBenchmark=cmpthese > > > -wE'my$x="0"x1_000_000;my$b="1"x100_000;cmpthese(10000,{concat=>sub{my$z=$x. > > > $b;},substr=>sub{my$z="";substr$z,(length$z),(length$x),$x;substr$z,(length$ > > z),(length$b),$b;},join=>sub{my$z=join("",$x,$b)}});' Rate > join concat > > substr > > join 3922/s -- -0% -58% > > concat 3937/s 0% -- -57% > > substr 9259/s 136% 135% -- > > selfcat => sub {my$z=$x; $z.=$b;} > > вот примерный аналог твоего substr > > -- > PEF Developer > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > > > > ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From akovbovich на gmail.com Tue Mar 10 10:27:36 2015 From: akovbovich на gmail.com (Andrey Kovbovich) Date: Tue, 10 Mar 2015 20:27:36 +0300 Subject: [Moscow.pm] =?utf-8?b?0JHRi9GB0YLRgNCw0Y8g0LrQvtC90LrQsNGC0LU=?= =?utf-8?b?0L3QsNGG0LjRjyDRgdGC0YDQvtC6?= In-Reply-To: <54FF27C2.1030001@gmail.com> References: <2017298.4T32Q9CbZz@rawen> <54FF27C2.1030001@gmail.com> Message-ID: Задача - приходят от I/O куски данных, и нужно их буферизировать перед обработкой. Вопрос как это сделать эффективно (идеально - без копирования). 10 марта 2015 г., 20:20 пользователь Dmitry Smal написал: > А что у вас за задача такая ? > Есть ооочень много конкатенаций подряд идет (в цикле например) - то нужно > оптимизировать сам алгоритм склейки. > Если не нагружен - оставить более читаемый вариант =) > > > On 03/10/2015 07:59 PM, Andrey Kovbovich wrote: > > Интересно, получается конкатенировать более чем в 2 раза быстрее > последовательно (selfcat), а не разом ($z = $x . $y); > > Warstone, я писал про использование сабстр с параметром replace (4ый). А > ты почему-то используешь в примерах 3х-арный вариант. > > 2015-03-10 19:48 GMT+03:00 PEF Secure : > >> On Tuesday, March 10, 2015 17:03:36 Andrey Kovbovich wrote: >> > Кто-нибудь знает, за счет чего substr быстрее? >> > >> > $ perl -MBenchmark=cmpthese >> > >> -wE'my$x="0"x1_000_000;my$b="1"x100_000;cmpthese(10000,{concat=>sub{my$z=$x. >> > >> $b;},substr=>sub{my$z="";substr$z,(length$z),(length$x),$x;substr$z,(length$ >> > z),(length$b),$b;},join=>sub{my$z=join("",$x,$b)}});' Rate join concat >> > substr >> > join 3922/s -- -0% -58% >> > concat 3937/s 0% -- -57% >> > substr 9259/s 136% 135% -- >> >> selfcat => sub {my$z=$x; $z.=$b;} >> >> вот примерный аналог твоего substr >> >> -- >> PEF Developer >> -- >> Moscow.pm mailing list >> moscow-pm на pm.org | http://moscow.pm.org >> > > > > > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > > ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From mialinx на gmail.com Tue Mar 10 10:58:05 2015 From: mialinx на gmail.com (Dmitry Smal) Date: Tue, 10 Mar 2015 20:58:05 +0300 Subject: [Moscow.pm] =?utf-8?b?0JHRi9GB0YLRgNCw0Y8g0LrQvtC90LrQsNGC0LU=?= =?utf-8?b?0L3QsNGG0LjRjyDRgdGC0YDQvtC6?= In-Reply-To: References: <2017298.4T32Q9CbZz@rawen> <54FF27C2.1030001@gmail.com> Message-ID: <54FF30AD.10408@gmail.com> Без копирования - никак, если вам нужно собрать в один буфер, а приходят из разных мест. Если заранее известен размер (либо есть оценка) - то можно попробовать выделить заранее все необходимое место, но это XSкой. On 03/10/2015 08:27 PM, Andrey Kovbovich wrote: > Задача - приходят от I/O куски данных, и нужно их буферизировать перед > обработкой. Вопрос как это сделать эффективно (идеально - без > копирования). > > 10 марта 2015 г., 20:20 пользователь Dmitry Smal > написал: > > А что у вас за задача такая ? > Есть ооочень много конкатенаций подряд идет (в цикле например) - > то нужно оптимизировать сам алгоритм склейки. > Если не нагружен - оставить более читаемый вариант =) > > > On 03/10/2015 07:59 PM, Andrey Kovbovich wrote: >> Интересно, получается конкатенировать более чем в 2 раза быстрее >> последовательно (selfcat), а не разом ($z = $x . $y); >> >> Warstone, я писал про использование сабстр с параметром replace >> (4ый). А ты почему-то используешь в примерах 3х-арный вариант. >> >> 2015-03-10 19:48 GMT+03:00 PEF Secure > >: >> >> On Tuesday, March 10, 2015 17:03:36 Andrey Kovbovich wrote: >> > Кто-нибудь знает, за счет чего substr быстрее? >> > >> > $ perl -MBenchmark=cmpthese >> > >> -wE'my$x="0"x1_000_000;my$b="1"x100_000;cmpthese(10000,{concat=>sub{my$z=$x. >> > >> $b;},substr=>sub{my$z="";substr$z,(length$z),(length$x),$x;substr$z,(length$ >> > z),(length$b),$b;},join=>sub{my$z=join("",$x,$b)}});' Rate >> join concat >> > substr >> > join 3922/s -- -0% -58% >> > concat 3937/s 0% -- -57% >> > substr 9259/s 136% 135% -- >> >> selfcat => sub {my$z=$x; $z.=$b;} >> >> вот примерный аналог твоего substr >> >> -- >> PEF Developer >> -- >> Moscow.pm mailing list >> moscow-pm на pm.org | http://moscow.pm.org >> >> >> >> > > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > > > > ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From theathlet на yandex.ru Tue Mar 10 11:01:29 2015 From: theathlet на yandex.ru (TheAthlete) Date: Tue, 10 Mar 2015 21:01:29 +0300 Subject: [Moscow.pm] =?utf-8?b?0JHRi9GB0YLRgNCw0Y8g0LrQvtC90LrQsNGC0LU=?= =?utf-8?b?0L3QsNGG0LjRjyDRgdGC0YDQvtC6?= In-Reply-To: References: <2017298.4T32Q9CbZz@rawen> <54FF27C2.1030001@gmail.com> Message-ID: IO::Vectored Andrey Kovbovich писал(а) в своём письме Tue, 10 Mar 2015 20:27:36 +0300: > Задача - приходят от I/O куски данных, и нужно их буферизировать перед > обработкой. Вопрос как это сделать эффективно (идеально - без > копирования). > From pef-secure на yandex.ru Tue Mar 10 11:11:30 2015 From: pef-secure на yandex.ru (PEF Secure) Date: Tue, 10 Mar 2015 19:11:30 +0100 Subject: [Moscow.pm] =?utf-8?b?0JHRi9GB0YLRgNCw0Y8g0LrQvtC90LrQsNGC0LU=?= =?utf-8?b?0L3QsNGG0LjRjyDRgdGC0YDQvtC6?= In-Reply-To: References: <2017298.4T32Q9CbZz@rawen> Message-ID: <1601096.6CZqiA76Bd@rawen> On Tuesday, March 10, 2015 19:59:01 Andrey Kovbovich wrote: > Интересно, получается конкатенировать более чем в 2 раза быстрее > последовательно (selfcat), а не разом ($z = $x . $y); да, интересно. возможно, что в perl-5.20 стало лучше, там в ченджлоге было что-то про CoW для строк, возможно, это помогло бы случаю $z = $x . $y. -- PEF Developer From mail на knutov.com Wed Mar 11 02:05:47 2015 From: mail на knutov.com (Nick Knutov) Date: Wed, 11 Mar 2015 14:05:47 +0500 Subject: [Moscow.pm] json, Dancer1, utf8 Message-ID: <5500056B.3000306@knutov.com> Столкнулся с проблемой, туплю и не могу понять почему всё так. use Dancer ':syntax'; ... my $aa = { a=>'b', c=>'д' }; # тут русская буква my $jj = to_json($aa); utf8::is_utf8($jj); # returns 1 my $bb = from_json($jj); Получаю Wide character in subroutine entry. Почему?(1) Ок, грепаю рассылку, делаю my $jj = to_json($aa); utf8::encode($jj); my $bb = from_json($jj); Судя по Dumper($aa, $jj, utf8::is_utf8($jj), $bb); $bb теперь такое же, как $aa, а вот $jj в текстовом представлении $VAR2 = '{ "c" : "д", "a" : "b" }'; т.е. содержит совсем не 'д' Почему?(2) Почитав документацию на модули, я подумал, что from_json всегда ожидает отсутствие utf8 флага, но есть decode_json, которая для случая когда флаг есть. Ок. Делаем use Cpanel::JSON::XS 'decode_json'; $cc = Cpanel::JSON::XS::decode_json($jj); И если перед этим не было utf8::encode($jj);, то снова Wide character in subroutine entry. ПОЧЕМУ???(3) Ведь у строки есть флаг и decode_json, судя по документации, ожидает его наличия. и (4) - как правильно делать все это? -- Best Regards, Nick Knutov http://knutov.com ICQ: 272873706 Voice: +7-904-84-23-130 From zhuravlev.ua на gmail.com Wed Mar 11 03:03:21 2015 From: zhuravlev.ua на gmail.com (Artem Zhuravlev) Date: Wed, 11 Mar 2015 13:03:21 +0300 Subject: [Moscow.pm] json, Dancer1, utf8 In-Reply-To: <5500056B.3000306@knutov.com> References: <5500056B.3000306@knutov.com> Message-ID: В какой кодировке проект? И консоль куда вы все это выводите? 11 марта 2015 г., 12:05 пользователь Nick Knutov написал: > Столкнулся с проблемой, туплю и не могу понять почему всё так. > > use Dancer ':syntax'; > ... > my $aa = { a=>'b', c=>'д' }; # тут русская буква > my $jj = to_json($aa); > utf8::is_utf8($jj); # returns 1 > my $bb = from_json($jj); > > Получаю Wide character in subroutine entry. Почему?(1) > > Ок, грепаю рассылку, делаю > > my $jj = to_json($aa); > utf8::encode($jj); > my $bb = from_json($jj); > > Судя по Dumper($aa, $jj, utf8::is_utf8($jj), $bb); > $bb теперь такое же, как $aa, а вот $jj в текстовом представлении > $VAR2 = '{ > "c" : "д", > "a" : "b" > }'; > т.е. содержит совсем не 'д' Почему?(2) > > Почитав документацию на модули, я подумал, что from_json всегда ожидает > отсутствие utf8 флага, но есть decode_json, которая для случая когда > флаг есть. Ок. Делаем > use Cpanel::JSON::XS 'decode_json'; > $cc = Cpanel::JSON::XS::decode_json($jj); > > И если перед этим не было utf8::encode($jj);, то снова Wide character in > subroutine entry. ПОЧЕМУ???(3) Ведь у строки есть флаг и decode_json, > судя по документации, ожидает его наличия. > > и (4) - как правильно делать все это? > > > > -- > Best Regards, > Nick Knutov > http://knutov.com > ICQ: 272873706 > Voice: +7-904-84-23-130 > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > -- Best regards, Artem V. Zhuravlev ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From mail на knutov.com Wed Mar 11 03:06:00 2015 From: mail на knutov.com (Nick Knutov) Date: Wed, 11 Mar 2015 15:06:00 +0500 Subject: [Moscow.pm] json, Dancer1, utf8 In-Reply-To: References: <5500056B.3000306@knutov.com> Message-ID: <55001388.7090408@knutov.com> utf8 вообще везде. 11.03.2015 15:03, Artem Zhuravlev пишет: > В какой кодировке проект? И консоль куда вы все это выводите? > > 11 марта 2015 г., 12:05 пользователь Nick Knutov > написал: > > Столкнулся с проблемой, туплю и не могу понять почему всё так. > > use Dancer ':syntax'; > ... > my $aa = { a=>'b', c=>'д' }; # тут русская буква > my $jj = to_json($aa); > utf8::is_utf8($jj); # returns 1 > my $bb = from_json($jj); > > Получаю Wide character in subroutine entry. Почему?(1) > > Ок, грепаю рассылку, делаю > > my $jj = to_json($aa); > utf8::encode($jj); > my $bb = from_json($jj); > > Судя по Dumper($aa, $jj, utf8::is_utf8($jj), $bb); > $bb теперь такое же, как $aa, а вот $jj в текстовом представлении > $VAR2 = '{ > "c" : "д", > "a" : "b" > }'; > т.е. содержит совсем не 'д' Почему?(2) > > Почитав документацию на модули, я подумал, что from_json всегда ожидает > отсутствие utf8 флага, но есть decode_json, которая для случая когда > флаг есть. Ок. Делаем > use Cpanel::JSON::XS 'decode_json'; > $cc = Cpanel::JSON::XS::decode_json($jj); > > И если перед этим не было utf8::encode($jj);, то снова Wide character in > subroutine entry. ПОЧЕМУ???(3) Ведь у строки есть флаг и decode_json, > судя по документации, ожидает его наличия. > > и (4) - как правильно делать все это? > > > > -- > Best Regards, > Nick Knutov > http://knutov.com > ICQ: 272873706 > Voice: +7-904-84-23-130 > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > > > > > -- > Best regards, > Artem V. Zhuravlev > > -- Best Regards, Nick Knutov http://knutov.com ICQ: 272873706 Voice: +7-904-84-23-130 From pef-secure на yandex.ru Wed Mar 11 04:04:35 2015 From: pef-secure на yandex.ru (PEF Secure) Date: Wed, 11 Mar 2015 12:04:35 +0100 Subject: [Moscow.pm] json, Dancer1, utf8 In-Reply-To: <5500056B.3000306@knutov.com> References: <5500056B.3000306@knutov.com> Message-ID: <1730397.26SrAF3V0Y@rawen> On Wednesday, March 11, 2015 14:05:47 Nick Knutov wrote: > Столкнулся с проблемой, туплю и не могу понять почему всё так. > > use Dancer ':syntax'; > ... > my $aa = { a=>'b', c=>'д' }; # тут русская буква > my $jj = to_json($aa); А зачем вы так делаете? Понимаю, бывают случаи, но зачем? json -- внешнее представление, как правило, его лучше, по моему мнению, иметь заенкоденым уже. Т.е. encode_json(). > utf8::is_utf8($jj); # returns 1 > my $bb = from_json($jj); > > Получаю Wide character in subroutine entry. Почему?(1) > > Ок, грепаю рассылку, делаю > > my $jj = to_json($aa); > utf8::encode($jj); > my $bb = from_json($jj); > > Судя по Dumper($aa, $jj, utf8::is_utf8($jj), $bb); > $bb теперь такое же, как $aa, а вот $jj в текстовом представлении > $VAR2 = '{ > "c" : "д", > "a" : "b" > }'; > т.е. содержит совсем не 'д' Почему?(2) Результат сильно напоминает двойной ен(де?)кодинг. Нужно найти в какой момент теряется баланс енкодинга-декодинга. > Почитав документацию на модули, я подумал, что from_json всегда ожидает > отсутствие utf8 флага, но есть decode_json, которая для случая когда > флаг есть. Как раз decode_json перекодирует из внешнего (бинарного) во внутренний utf8, Т.е. флага не было => стал. perl -Mutf8 -MJSON -le '$a={a=>"b", c=>"д"}; print 0+utf8::is_utf8($a->{c}); print 0+utf8::is_utf8(encode_json($a))' 1 0 perl -Mutf8 -MJSON -le '$a={a=>"b", c=>"д"}; print 0+utf8::is_utf8($a->{c}); print 0+utf8::is_utf8(encode_json($a)); print 0+utf8::is_utf8(decode_json(encode_json($a))->{c}); ' 1 0 1 Если у Cpanel::JSON::XS есть особенности, то я не в курсе. Парой к to_json является from_json, насколько я знаю, они _не_меняют_ utf8. -- PEF Developer From mshogin на gmail.com Wed Mar 11 07:02:01 2015 From: mshogin на gmail.com (=?UTF-8?B?0JzQuNGF0LDQuNC7INCo0L7Qs9C40L0=?=) Date: Wed, 11 Mar 2015 17:02:01 +0300 Subject: [Moscow.pm] json, Dancer1, utf8 In-Reply-To: <1730397.26SrAF3V0Y@rawen> References: <5500056B.3000306@knutov.com> <1730397.26SrAF3V0Y@rawen> Message-ID: А Perl какой? mshogin на guinea:~/sandbox$ set | grep LANG LANG=en_US.UTF-8 LANGUAGE=en_US: mshogin на guinea:~/sandbox$ file -i t_dance.pl t_dance.pl: text/plain; charset=utf-8 mshogin на guinea:~/sandbox$ cat t_dance.pl use Dancer ':syntax'; use Data::Printer colored => 1; my $aa = { a=>'b', c=>'д' }; # тут русская буква p $aa; my $jj = to_json($aa); p $jj; my $test = utf8::is_utf8($jj); # returns 1 p $test; my $bb = from_json($jj); p $bb; mshogin на guinea:~/sandbox$ perl t_dance.pl \ { a "b", c "д" } "{ "c" : "д", "a" : "b" } " 1 \ { a "b", c "д" } mshogin на guinea:~/sandbox$ perl -v This is perl 5, version 14, subversion 2 (v5.14.2) built for x86_64-linux-gnu-thread-multi 11 марта 2015 г., 14:04 пользователь PEF Secure написал: > On Wednesday, March 11, 2015 14:05:47 Nick Knutov wrote: > > Столкнулся с проблемой, туплю и не могу понять почему всё так. > > > > use Dancer ':syntax'; > > ... > > my $aa = { a=>'b', c=>'д' }; # тут русская буква > > my $jj = to_json($aa); > > А зачем вы так делаете? Понимаю, бывают случаи, но зачем? json -- внешнее > представление, как правило, его лучше, по моему мнению, иметь заенкоденым > уже. > Т.е. encode_json(). > > > utf8::is_utf8($jj); # returns 1 > > my $bb = from_json($jj); > > > > Получаю Wide character in subroutine entry. Почему?(1) > > > > Ок, грепаю рассылку, делаю > > > > my $jj = to_json($aa); > > utf8::encode($jj); > > my $bb = from_json($jj); > > > > Судя по Dumper($aa, $jj, utf8::is_utf8($jj), $bb); > > $bb теперь такое же, как $aa, а вот $jj в текстовом представлении > > $VAR2 = '{ > > "c" : "д", > > "a" : "b" > > }'; > > т.е. содержит совсем не 'д' Почему?(2) > > Результат сильно напоминает двойной ен(де?)кодинг. Нужно найти в какой > момент > теряется баланс енкодинга-декодинга. > > > Почитав документацию на модули, я подумал, что from_json всегда ожидает > > отсутствие utf8 флага, но есть decode_json, которая для случая когда > > флаг есть. > > Как раз decode_json перекодирует из внешнего (бинарного) во внутренний > utf8, > Т.е. флага не было => стал. > > perl -Mutf8 -MJSON -le '$a={a=>"b", c=>"д"}; print > 0+utf8::is_utf8($a->{c}); > print 0+utf8::is_utf8(encode_json($a))' > > 1 > 0 > > perl -Mutf8 -MJSON -le '$a={a=>"b", c=>"д"}; print > 0+utf8::is_utf8($a->{c}); > print 0+utf8::is_utf8(encode_json($a)); print > 0+utf8::is_utf8(decode_json(encode_json($a))->{c}); ' > > 1 > 0 > 1 > > Если у Cpanel::JSON::XS есть особенности, то я не в курсе. Парой к to_json > является from_json, насколько я знаю, они _не_меняют_ utf8. > > -- > PEF Developer > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > -- С уважением Михаил Шогин. ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From theathlet на yandex.ru Wed Mar 11 07:03:44 2015 From: theathlet на yandex.ru (TheAthlete) Date: Wed, 11 Mar 2015 17:03:44 +0300 Subject: [Moscow.pm] json, Dancer1, utf8 In-Reply-To: <5500056B.3000306@knutov.com> References: <5500056B.3000306@knutov.com> Message-ID: Тут нужен use utf8; perl -Mutf8 -MJSON::XS -E '$h = {a=>"b", c=>"д"}; $s = encode_json($h); say $s' {"c":"д","a":"b"} perl -MJSON::XS -E '$h = {a=>"b", c=>"д"}; $s = encode_json($h); say $s' {"c":"д","a":"b"} Nick Knutov писал(а) в своём письме Wed, 11 Mar 2015 12:05:47 +0300: > Столкнулся с проблемой, туплю и не могу понять почему всё так. > > use Dancer ':syntax'; > ... > my $aa = { a=>'b', c=>'д' }; # тут русская буква > my $jj = to_json($aa); > utf8::is_utf8($jj); # returns 1 > my $bb = from_json($jj); > > Получаю Wide character in subroutine entry. Почему?(1) > > Ок, грепаю рассылку, делаю > > my $jj = to_json($aa); > utf8::encode($jj); > my $bb = from_json($jj); > > Судя по Dumper($aa, $jj, utf8::is_utf8($jj), $bb); > $bb теперь такое же, как $aa, а вот $jj в текстовом представлении > $VAR2 = '{ > "c" : "д", > "a" : "b" > }'; > т.е. содержит совсем не 'д' Почему?(2) > > Почитав документацию на модули, я подумал, что from_json всегда ожидает > отсутствие utf8 флага, но есть decode_json, которая для случая когда > флаг есть. Ок. Делаем > use Cpanel::JSON::XS 'decode_json'; > $cc = Cpanel::JSON::XS::decode_json($jj); > > И если перед этим не было utf8::encode($jj);, то снова Wide character in > subroutine entry. ПОЧЕМУ???(3) Ведь у строки есть флаг и decode_json, > судя по документации, ожидает его наличия. > > и (4) - как правильно делать все это? > > > -- Написано в почтовом клиенте браузера Opera: http://www.opera.com/mail/ From mail на knutov.com Wed Mar 11 11:19:16 2015 From: mail на knutov.com (Nick Knutov) Date: Wed, 11 Mar 2015 23:19:16 +0500 Subject: [Moscow.pm] json, Dancer1, utf8 In-Reply-To: References: <5500056B.3000306@knutov.com> <55001388.7090408@knutov.com> <550037B5.5070904@knutov.com> Message-ID: <55008724.7050409@knutov.com> Еще больше перестал понимать как это работает, но помогло $in = from_json( $src, { utf8 => 0 } ); (хотя я думал, что должно помочь utf8=>1 ) ps to all: мы немного увлеклись и часть писем прошла мимо рассылки, сохранил в отквотированном. 11.03.2015 17:59, Artem Zhuravlev пишет: > JSON нужно сказать что он работает с юникодом уже что б 2-й раз не > кодировал в случае Dancer это делается в config.yml > > В случае обычного сценария при создании объекта нужно указать так что > же что работаем с юникодом: > > ... > $json = $json->utf8(1) > > ну или в случае если не хотим работать с объектом: > > > > для функций to_json, from_json 2-й аргумент хеш с парой { utf8 => 1|0 } > $perl_scalar = from_json( $json_text, { utf8 => 1 } ); > > 11 марта 2015 г., 15:40 пользователь Nick Knutov > написал: > > Спасибо, это почти решило проблему. В этом случае > > my $aa = { a=>'b', c=>'д' }; > my $jj = to_json($aa); > # utf8::is_utf8($jj); - returns false > my $bb = from_json($jj); > die Dumper($aa, $jj, $bb); > > $VAR1 = { 'c' => "\x{434}", 'a' => 'b' }; > $VAR2 = '{ "c" : "д", "a" : "b" }'; > $VAR3 = { 'c' => "\x{434}", 'a' => 'b' }; > > Я не понимаю почему "д", но допустим. В реальной жизни между > to_json и > from_json результат сохранятся и берется из мускульной базы. Она > тоже в > utf8, (из приложения show variables like "%collat%" проверил - везде > utf8_general_ci). После to_json и сохранения в базе - там нормальный > текст с русскими буквами (проверил). > > Теперь берем строку из базы. Dumper говорит, что в ней > "\x{418}\x{432}\x{430}\x{43d}\x{43e}\x{432}". utf::us_utf8 - true. > > Сделать from_json получается только если предварительно сделать > utf8::encode. Правильно ли это, или лучше сделать как-то иначе, чтобы > строку с json развернуть обратно в hashref? > > > > 11.03.2015 15:56, Artem Zhuravlev пишет: > > engines: > > JSON: > > allow_blessed: '1' > > canonical: '1' > > convert_blessed: '1' > > utf8: '1' > > > > > > в config.yml > > > > 11 марта 2015 г., 13:45 пользователь Artem Zhuravlev > > > >> > написал: > > > > По сути нужно хеш проверить на наличие utf8, и если таковы > будут то > > сделать $a = encode("utf8",$a). Я писал рекурсию которая > проверяет > > вложенность ну и что там скаляр массив или хеш. > > По чему так уже не помню но давно, с таким сталкивался > полечил таким > > костылем. Скорее всего Проблема в JSON. И там написано > > http://search.cpan.org/~makamaka/JSON-2.90/lib/JSON.pm#utf8 > > > > > получается что-то типо 2 раза перекодирует в utf8; > > что б такого не было нужно джейсону это указать > > > > JSON->new->utf8(1) > > > > Но тут в Dancer врезан JSON как это сделать в Dancer нужно > искать. > > > > Но думаю вы поняли в чем проблема. > > > > 11 марта 2015 г., 13:36 пользователь Artem Zhuravlev > > > >> > написал: > > > > Если > > > > 11 марта 2015 г., 13:06 пользователь Nick Knutov > > > >> написал: > > > > utf8 вообще везде. > > > > > > > > 11.03.2015 15:03, Artem Zhuravlev пишет: > > > В какой кодировке проект? И консоль куда вы все > это выводите? > > > > > > 11 марта 2015 г., 12:05 пользователь Nick Knutov > > > > > > >>> написал: > > > > > > Столкнулся с проблемой, туплю и не могу понять > почему > > всё так. > > > > > > use Dancer ':syntax'; > > > ... > > > my $aa = { a=>'b', c=>'д' }; # тут русская буква > > > my $jj = to_json($aa); > > > utf8::is_utf8($jj); # returns 1 > > > my $bb = from_json($jj); > > > > > > Получаю Wide character in subroutine entry. > Почему?(1) > > > > > > Ок, грепаю рассылку, делаю > > > > > > my $jj = to_json($aa); > > > utf8::encode($jj); > > > my $bb = from_json($jj); > > > > > > Судя по Dumper($aa, $jj, utf8::is_utf8($jj), $bb); > > > $bb теперь такое же, как $aa, а вот $jj в > текстовом > > представлении > > > $VAR2 = '{ > > > "c" : "д", > > > "a" : "b" > > > }'; > > > т.е. содержит совсем не 'д' Почему?(2) > > > > > > Почитав документацию на модули, я подумал, что > > from_json всегда ожидает > > > отсутствие utf8 флага, но есть decode_json, > которая > > для случая когда > > > флаг есть. Ок. Делаем > > > use Cpanel::JSON::XS 'decode_json'; > > > $cc = Cpanel::JSON::XS::decode_json($jj); > > > > > > И если перед этим не было utf8::encode($jj);, > то снова > > Wide character in > > > subroutine entry. ПОЧЕМУ???(3) Ведь у строки > есть флаг > > и decode_json, > > > судя по документации, ожидает его наличия. > > > > > > и (4) - как правильно делать все это? > > >[...] > > > > package MyWeb::App; > > use Dancer ':syntax'; > > use Data::Dumper; > > use utf8; > > use Encode; > > > > our $VERSION = '0.1'; > > > > get '/' => sub { > > template 'index'; > > }; > > > > my $aa = { a=>'b', c=>'д' }; # тут русская буква > > print Dumper $aa; > > $aa->{c} = encode("utf8",$aa->{c}); > > my $jj = to_json($aa); > > my $flag = utf8::is_utf8($jj); # returns 1 > > print Dumper $aa; > > print Dumper $jj; > > print "check flag = ".$flag."\n"; > > my $bb = from_json($jj); > > print Dumper $bb; > > > > > > > > true; > > > > > > ========== Результат > > > > tohil на tohil-G45M:~/dancer/MyWeb-App$ plackup -r > bin/app.pl > > > > Watching bin/lib bin/app.pl > for file updates. > > $VAR1 = { > > 'a' => 'b', > > 'c' => "\x{434}" > > }; > > $VAR1 = { > > 'a' => 'b', > > 'c' => 'д' > > }; > > $VAR1 = "{ > > \"a\" : \"b\", > > \"c\" : \"\x{d0}\x{b4}\" > > } > > "; > > check flag = 1 > > $VAR1 = { > > 'a' => 'b', > > 'c' => "\x{434}" > > }; > > [22251] core @0.000012> PLACK_ENV is set (development) > forcing > > PSGI handler in > /usr/local/share/perl/5.18.2/Dancer/Handler.pm l. 35 > > [22251] core @0.001152> loading Dancer::Handler::PSGI > handler > > in /usr/local/share/perl/5.18.2/Dancer/Handler.pm l. 49 > > [22251] core @0.006177> loading handler > 'Dancer::Handler::PSGI' > > in /usr/local/share/perl/5.18.2/Dancer.pm l. 497 > > HTTP::Server::PSGI: Accepting connections at http://0:5000/ > -- Best Regards, Nick Knutov http://knutov.com ICQ: 272873706 Voice: +7-904-84-23-130 ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From mail на knutov.com Wed Mar 11 11:24:43 2015 From: mail на knutov.com (Nick Knutov) Date: Wed, 11 Mar 2015 23:24:43 +0500 Subject: [Moscow.pm] json, Dancer1, utf8 In-Reply-To: References: <5500056B.3000306@knutov.com> <1730397.26SrAF3V0Y@rawen> Message-ID: <5500886B.60706@knutov.com> use v5.14. Запустил ваш код для теста и (в некоторых почтовых клиентах картинка окажется в аттаче): 11.03.2015 19:02, Михаил Шогин пишет: > А Perl какой? > > mshogin на guinea:~/sandbox$ set | grep LANG > LANG=en_US.UTF-8 > LANGUAGE=en_US: > > mshogin на guinea:~/sandbox$ file -i t_dance.pl > t_dance.pl : text/plain; charset=utf-8 > > mshogin на guinea:~/sandbox$ cat t_dance.pl > use Dancer ':syntax'; > use Data::Printer colored => 1; > > my $aa = { a=>'b', c=>'д' }; # тут русская буква > p $aa; > my $jj = to_json($aa); > p $jj; > my $test = utf8::is_utf8($jj); # returns 1 > p $test; > my $bb = from_json($jj); > p $bb; > mshogin на guinea:~/sandbox$ perl t_dance.pl > \ { > a "b", > c "д" > } > "{ > "c" : "д", > "a" : "b" > } > " > 1 > \ { > a "b", > c "д" > } > > mshogin на guinea:~/sandbox$ perl -v > > This is perl 5, version 14, subversion 2 (v5.14.2) built for > x86_64-linux-gnu-thread-multi > > > > 11 марта 2015 г., 14:04 пользователь PEF Secure > написал: > > On Wednesday, March 11, 2015 14:05:47 Nick Knutov wrote: > > Столкнулся с проблемой, туплю и не могу понять почему всё так. > > > > use Dancer ':syntax'; > > ... > > my $aa = { a=>'b', c=>'д' }; # тут русская буква > > my $jj = to_json($aa); > > А зачем вы так делаете? Понимаю, бывают случаи, но зачем? json -- > внешнее > представление, как правило, его лучше, по моему мнению, иметь > заенкоденым уже. > Т.е. encode_json(). > > > utf8::is_utf8($jj); # returns 1 > > my $bb = from_json($jj); > > > > Получаю Wide character in subroutine entry. Почему?(1) > > > > Ок, грепаю рассылку, делаю > > > > my $jj = to_json($aa); > > utf8::encode($jj); > > my $bb = from_json($jj); > > > > Судя по Dumper($aa, $jj, utf8::is_utf8($jj), $bb); > > $bb теперь такое же, как $aa, а вот $jj в текстовом представлении > > $VAR2 = '{ > > "c" : "д", > > "a" : "b" > > }'; > > т.е. содержит совсем не 'д' Почему?(2) > > Результат сильно напоминает двойной ен(де?)кодинг. Нужно найти в > какой момент > теряется баланс енкодинга-декодинга. > > > Почитав документацию на модули, я подумал, что from_json всегда > ожидает > > отсутствие utf8 флага, но есть decode_json, которая для случая когда > > флаг есть. > > Как раз decode_json перекодирует из внешнего (бинарного) во > внутренний utf8, > Т.е. флага не было => стал. > > perl -Mutf8 -MJSON -le '$a={a=>"b", c=>"д"}; print > 0+utf8::is_utf8($a->{c}); > print 0+utf8::is_utf8(encode_json($a))' > > 1 > 0 > > perl -Mutf8 -MJSON -le '$a={a=>"b", c=>"д"}; print > 0+utf8::is_utf8($a->{c}); > print 0+utf8::is_utf8(encode_json($a)); print > 0+utf8::is_utf8(decode_json(encode_json($a))->{c}); ' > > 1 > 0 > 1 > > Если у Cpanel::JSON::XS есть особенности, то я не в курсе. Парой к > to_json > является from_json, насколько я знаю, они _не_меняют_ utf8. > > -- > PEF Developer > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > > > > > -- > С уважением > Михаил Шогин. > > -- Best Regards, Nick Knutov http://knutov.com ICQ: 272873706 Voice: +7-904-84-23-130 ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: ----------- следущая часть ----------- Вложение не в текстовом формате было извлечено… Имя: beicgfhg.png Тип: image/png Размер: 6854 байтов Описание: отсутствует URL: From mail на knutov.com Wed Mar 11 11:26:42 2015 From: mail на knutov.com (Nick Knutov) Date: Wed, 11 Mar 2015 23:26:42 +0500 Subject: [Moscow.pm] json, Dancer1, utf8 In-Reply-To: References: <5500056B.3000306@knutov.com> Message-ID: <550088E2.7010700@knutov.com> Он там есть. use utf8::all так же не помог. При этом from_yaml там же работает абсолютно нормально и прозрачно - исходный хеш в ютф, сериализуется в строку с ютф, в базу пишется, из базы берется, десериализуется нормально и на выходе везде ютф. 11.03.2015 19:03, TheAthlete пишет: > Тут нужен use utf8; > > perl -Mutf8 -MJSON::XS -E '$h = {a=>"b", c=>"д"}; $s = > encode_json($h); say $s' > {"c":"д","a":"b"} > > perl -MJSON::XS -E '$h = {a=>"b", c=>"д"}; $s = encode_json($h); say $s' > {"c":"д","a":"b"} > > Nick Knutov писал(а) в своём письме Wed, 11 Mar 2015 > 12:05:47 +0300: > >> Столкнулся с проблемой, туплю и не могу понять почему всё так. >> >> use Dancer ':syntax'; >> ... >> my $aa = { a=>'b', c=>'д' }; # тут русская буква >> my $jj = to_json($aa); >> utf8::is_utf8($jj); # returns 1 >> my $bb = from_json($jj); >> >> Получаю Wide character in subroutine entry. Почему?(1) >> >> Ок, грепаю рассылку, делаю >> >> my $jj = to_json($aa); >> utf8::encode($jj); >> my $bb = from_json($jj); >> >> Судя по Dumper($aa, $jj, utf8::is_utf8($jj), $bb); >> $bb теперь такое же, как $aa, а вот $jj в текстовом представлении >> $VAR2 = '{ >> "c" : "д", >> "a" : "b" >> }'; >> т.е. содержит совсем не 'д' Почему?(2) >> >> Почитав документацию на модули, я подумал, что from_json всегда ожидает >> отсутствие utf8 флага, но есть decode_json, которая для случая когда >> флаг есть. Ок. Делаем >> use Cpanel::JSON::XS 'decode_json'; >> $cc = Cpanel::JSON::XS::decode_json($jj); >> >> И если перед этим не было utf8::encode($jj);, то снова Wide character in >> subroutine entry. ПОЧЕМУ???(3) Ведь у строки есть флаг и decode_json, >> судя по документации, ожидает его наличия. >> >> и (4) - как правильно делать все это? -- Best Regards, Nick Knutov http://knutov.com ICQ: 272873706 Voice: +7-904-84-23-130 From mi на ya.ru Wed Mar 11 14:07:18 2015 From: mi на ya.ru (Nikolay Mishin) Date: Thu, 12 Mar 2015 00:07:18 +0300 Subject: [Moscow.pm] json, Dancer1, utf8 In-Reply-To: <550088E2.7010700@knutov.com> References: <5500056B.3000306@knutov.com> <550088E2.7010700@knutov.com> Message-ID: <8330871426108038@web29m.yandex.ru> Nick, привет, сделал так https://github.com/mishin/presentation/blob/master/t_dance.pl use utf8; use Encode::Locale; use IO::Interactive qw(is_interactive); use Dancer ':syntax'; use Data::Printer colored => 1; sub prepare_encoding_console { if ( is_interactive() ) { binmode( STDIN, ":encoding(console_in)" ); binmode( STDOUT, ":encoding(console_out)" ); binmode( STDERR, ":encoding(console_out)" ); } Encode::Locale::decode_argv(); } prepare_encoding_console(); my $aa = { a => 'b', c => 'д' }; # тут русская буква p $aa; my $jj = to_json($aa); p $jj; my $test = utf8::is_utf8($jj); # returns 1 p $test; my $bb = from_json($jj); p $bb; perl t_dance.pl \ { a "b", c "д" } "{ "a" : "b", "c" : "д" } " 1 Wide character in subroutine entry at (eval 88) line 161. на perl -d t_dance.pl Wide character in subroutine entry at (eval 90)[/usr/local/share/perl/5.18.2/JSON.pm:269] line 161. at /usr/local/share/perl/5.18.2/JSON.pm line 171. JSON::from_json('{ "a" : "b", "c" : "д" } ', 'HASH(0x2d725b0)') called at /usr/local/share/perl/5.18.2/Dancer/Serializer/JSON.pm line 62 Dancer::Serializer::JSON::deserialize('Dancer::Serializer::JSON=HASH(0x2d5ae58)', '{ "a" : "b", "c" : "д" } ') called at /usr/local/share/perl/5.18.2/Dancer/Serializer/JSON.pm line 17 Dancer::Serializer::JSON::from_json('{ "a" : "b", "c" : "д" } ') called at /usr/local/share/perl/5.18.2/Dancer.pm line 154 Dancer::from_json('{ "a" : "b", "c" : "д" } ') called at t_dance.pl line 24 У меня вопрос, а в чем стоит задача? 11.03.2015, 21:27, "Nick Knutov" : > Он там есть. use utf8::all так же не помог. При этом from_yaml там же > работает абсолютно нормально и прозрачно - исходный хеш в ютф, > сериализуется в строку с ютф, в базу пишется, из базы берется, > десериализуется нормально и на выходе везде ютф. > > 11.03.2015 19:03, TheAthlete пишет: >>  Тут нужен use utf8; >> >>  perl -Mutf8 -MJSON::XS -E '$h = {a=>"b", c=>"д"}; $s = >>  encode_json($h); say $s' >>  {"c":"д","a":"b"} >> >>  perl -MJSON::XS -E '$h = {a=>"b", c=>"д"}; $s = encode_json($h); say $s' >>  {"c":"д","a":"b"} >> >>  Nick Knutov писал(а) в своём письме Wed, 11 Mar 2015 >>  12:05:47 +0300: >>>  Столкнулся с проблемой, туплю и не могу понять почему всё так. >>> >>>  use Dancer ':syntax'; >>>  ... >>>  my $aa = { a=>'b', c=>'д' }; # тут русская буква >>>  my $jj = to_json($aa); >>>  utf8::is_utf8($jj); # returns 1 >>>  my $bb = from_json($jj); >>> >>>  Получаю Wide character in subroutine entry. Почему?(1) >>> >>>  Ок, грепаю рассылку, делаю >>> >>>  my $jj = to_json($aa); >>>  utf8::encode($jj); >>>  my $bb = from_json($jj); >>> >>>  Судя по Dumper($aa, $jj, utf8::is_utf8($jj), $bb); >>>  $bb теперь такое же, как $aa, а вот $jj в текстовом представлении >>>  $VAR2 = '{ >>>     "c" : "д", >>>     "a" : "b" >>>  }'; >>>  т.е. содержит совсем не 'д' Почему?(2) >>> >>>  Почитав документацию на модули, я подумал, что from_json всегда ожидает >>>  отсутствие utf8 флага, но есть decode_json, которая для случая когда >>>  флаг есть. Ок. Делаем >>>  use Cpanel::JSON::XS 'decode_json'; >>>  $cc = Cpanel::JSON::XS::decode_json($jj); >>> >>>  И если перед этим не было utf8::encode($jj);, то снова Wide character in >>>  subroutine entry. ПОЧЕМУ???(3) Ведь у строки есть флаг и decode_json, >>>  судя по документации, ожидает его наличия. >>> >>>  и (4) - как правильно делать все это? > > -- > Best Regards, > Nick Knutov > http://knutov.com > ICQ: 272873706 > Voice: +7-904-84-23-130 > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org -- С уважением Николай Мишин From mshogin на gmail.com Thu Mar 12 00:38:26 2015 From: mshogin на gmail.com (=?UTF-8?B?0JzQuNGF0LDQuNC7INCo0L7Qs9C40L0=?=) Date: Thu, 12 Mar 2015 10:38:26 +0300 Subject: [Moscow.pm] json, Dancer1, utf8 In-Reply-To: <550088E2.7010700@knutov.com> References: <5500056B.3000306@knutov.com> <550088E2.7010700@knutov.com> Message-ID: perldoc perldiag | grep -A 9 'Wide char' Wide character in %s (S utf8) Perl met a wide character (>255) when it wasn't expecting one. This warning is by default on for I/O (like print). The easiest way to quiet this warning is simply to add the ":utf8" layer to the output, e.g. "binmode STDOUT, ':utf8'". Another way to turn off the warning is to add "no warnings 'utf8';" but that is often closer to cheating. In general, you are supposed to explicitly mark the filehandle with an encoding, see open and "binmode" in perlfunc. 1. либо убрать use utf8; 2. либо binmode STDERR, ":utf8"; binmode STDOUT, ":utf8"; 3. ну или так :) no utf8; my $aa = { a=>'b', c=> 'д' }; # тут русская буква use utf8; 11 марта 2015 г., 21:26 пользователь Nick Knutov написал: > Он там есть. use utf8::all так же не помог. При этом from_yaml там же > работает абсолютно нормально и прозрачно - исходный хеш в ютф, > сериализуется в строку с ютф, в базу пишется, из базы берется, > десериализуется нормально и на выходе везде ютф. > > > 11.03.2015 19:03, TheAthlete пишет: > > Тут нужен use utf8; > > > > perl -Mutf8 -MJSON::XS -E '$h = {a=>"b", c=>"д"}; $s = > > encode_json($h); say $s' > > {"c":"д","a":"b"} > > > > perl -MJSON::XS -E '$h = {a=>"b", c=>"д"}; $s = encode_json($h); say $s' > > {"c":"д","a":"b"} > > > > Nick Knutov писал(а) в своём письме Wed, 11 Mar 2015 > > 12:05:47 +0300: > > > >> Столкнулся с проблемой, туплю и не могу понять почему всё так. > >> > >> use Dancer ':syntax'; > >> ... > >> my $aa = { a=>'b', c=>'д' }; # тут русская буква > >> my $jj = to_json($aa); > >> utf8::is_utf8($jj); # returns 1 > >> my $bb = from_json($jj); > >> > >> Получаю Wide character in subroutine entry. Почему?(1) > >> > >> Ок, грепаю рассылку, делаю > >> > >> my $jj = to_json($aa); > >> utf8::encode($jj); > >> my $bb = from_json($jj); > >> > >> Судя по Dumper($aa, $jj, utf8::is_utf8($jj), $bb); > >> $bb теперь такое же, как $aa, а вот $jj в текстовом представлении > >> $VAR2 = '{ > >> "c" : "д", > >> "a" : "b" > >> }'; > >> т.е. содержит совсем не 'д' Почему?(2) > >> > >> Почитав документацию на модули, я подумал, что from_json всегда ожидает > >> отсутствие utf8 флага, но есть decode_json, которая для случая когда > >> флаг есть. Ок. Делаем > >> use Cpanel::JSON::XS 'decode_json'; > >> $cc = Cpanel::JSON::XS::decode_json($jj); > >> > >> И если перед этим не было utf8::encode($jj);, то снова Wide character in > >> subroutine entry. ПОЧЕМУ???(3) Ведь у строки есть флаг и decode_json, > >> судя по документации, ожидает его наличия. > >> > >> и (4) - как правильно делать все это? > > -- > Best Regards, > Nick Knutov > http://knutov.com > ICQ: 272873706 > Voice: +7-904-84-23-130 > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > -- С уважением Михаил Шогин. ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From mail на knutov.com Mon Mar 16 21:07:38 2015 From: mail на knutov.com (Nick Knutov) Date: Tue, 17 Mar 2015 09:07:38 +0500 Subject: [Moscow.pm] Math::Int128, GeoIP2 Message-ID: <5507A88A.9070806@knutov.com> Кто-нибудь знает, как поставить Math::Int128 ? Он нужен для GeoIP2, но говорит It looks like your compiler doesn't support a 128-bit integer type (one of "int __attribute__ ((__mode__ (TI)))" or "__int128"). One of these types is necessary to compile the Math::Int128 module. Убунта 14.04 x64, всяческие компиляторы стоят. -- Best Regards, Nick Knutov http://knutov.com ICQ: 272873706 Voice: +7-904-84-23-130 From artur+moscow.pm.org на niif.spb.su Mon Mar 16 21:43:31 2015 From: artur+moscow.pm.org на niif.spb.su (arto) Date: Tue, 17 Mar 2015 07:43:31 +0300 Subject: [Moscow.pm] Math::Int128, GeoIP2 In-Reply-To: <5507A88A.9070806@knutov.com> References: <5507A88A.9070806@knutov.com> Message-ID: <1677311426567411@web28h.yandex.ru> 17.03.2015, 07:08, "Nick Knutov" : > Кто-нибудь знает, как поставить Math::Int128 ? Он нужен для GeoIP2, но > говорит > >   It looks like your compiler doesn't support a 128-bit integer type (one of >   "int __attribute__ ((__mode__ (TI)))" or "__int128"). One of these > types is >   necessary to compile the Math::Int128 module. > > Убунта 14.04 x64, всяческие компиляторы стоят. Точно 64? У меня на Fedora20 64bit всё скомпилировалось без ошибок, а на Fedora20 32bit выдала такую же ошибку. -- wbw, artur From mail на knutov.com Mon Mar 16 23:18:31 2015 From: mail на knutov.com (Nick Knutov) Date: Tue, 17 Mar 2015 11:18:31 +0500 Subject: [Moscow.pm] Math::Int128, GeoIP2 In-Reply-To: <1677311426567411@web28h.yandex.ru> References: <5507A88A.9070806@knutov.com> <1677311426567411@web28h.yandex.ru> Message-ID: <5507C737.5010506@knutov.com> А ведь и правда 32. Но как тогда это ставить на 32 бита? 17.03.2015 9:43, arto пишет: > 17.03.2015, 07:08, "Nick Knutov" : >> Кто-нибудь знает, как поставить Math::Int128 ? Он нужен для GeoIP2, но >> говорит >> >> It looks like your compiler doesn't support a 128-bit integer type (one of >> "int __attribute__ ((__mode__ (TI)))" or "__int128"). One of these >> types is >> necessary to compile the Math::Int128 module. >> >> Убунта 14.04 x64, всяческие компиляторы стоят. > Точно 64? > У меня на Fedora20 64bit всё скомпилировалось без ошибок, > а на Fedora20 32bit выдала такую же ошибку. > -- Best Regards, Nick Knutov http://knutov.com ICQ: 272873706 Voice: +7-904-84-23-130 From artur+moscow.pm.org на niif.spb.su Tue Mar 17 00:06:50 2015 From: artur+moscow.pm.org на niif.spb.su (arto) Date: Tue, 17 Mar 2015 10:06:50 +0300 Subject: [Moscow.pm] Math::Int128, GeoIP2 In-Reply-To: <5507C737.5010506@knutov.com> References: <5507A88A.9070806@knutov.com> <1677311426567411@web28h.yandex.ru> <5507C737.5010506@knutov.com> Message-ID: <2436601426576010@web10g.yandex.ru> 17.03.2015, 09:19, "Nick Knutov" : > А ведь и правда 32. > Но как тогда это ставить на 32 бита? А для чего? Я посмотрел на GeoIP2, Math::Int128 используется только в maxmind-db/test-data/write-test-data.pl, для генерации IPv6 для MaxMind::DB::Writer::Tree. Вам нужен IPv6? От этого ни надо начинать. > 17.03.2015 9:43, arto пишет: >>  17.03.2015, 07:08, "Nick Knutov" : >>>  Кто-нибудь знает, как поставить Math::Int128 ? Он нужен для GeoIP2, но >>>  говорит >>> >>>    It looks like your compiler doesn't support a 128-bit integer type (one of >>>    "int __attribute__ ((__mode__ (TI)))" or "__int128"). One of these >>>  types is >>>    necessary to compile the Math::Int128 module. >>> >>>  Убунта 14.04 x64, всяческие компиляторы стоят. >>    Точно 64? >>    У меня на Fedora20 64bit всё скомпилировалось без ошибок, >>    а на Fedora20 32bit выдала такую же ошибку. > > -- > Best Regards, > Nick Knutov > http://knutov.com > ICQ: 272873706 > Voice: +7-904-84-23-130 > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org -- wbw, artur From artur+moscow.pm.org на niif.spb.su Tue Mar 17 00:23:30 2015 From: artur+moscow.pm.org на niif.spb.su (arto) Date: Tue, 17 Mar 2015 10:23:30 +0300 Subject: [Moscow.pm] Math::Int128, GeoIP2 In-Reply-To: <2436601426576010@web10g.yandex.ru> References: <5507A88A.9070806@knutov.com> <1677311426567411@web28h.yandex.ru> <5507C737.5010506@knutov.com> <2436601426576010@web10g.yandex.ru> Message-ID: <2298981426577010@web18o.yandex.ru> 17.03.2015, 10:09, "arto" : > 17.03.2015, 09:19, "Nick Knutov" : >>  А ведь и правда 32. >>  Но как тогда это ставить на 32 бита? > >   А для чего? >   Я посмотрел на GeoIP2, Math::Int128 используется только в >   maxmind-db/test-data/write-test-data.pl, для генерации IPv6 для >   MaxMind::DB::Writer::Tree. > >   Вам нужен IPv6? От этого ни надо начинать. Хотя, посмотрев пристальнее, увидел, что Math::Int128 используется почти во всех модулях MaxMind::*. Либо форкнуть и переписать модуль для использования на 32-битных системах, либо портировать Math::Int128 на 32-битные системы, либо плюнуть и переходить на 64 бита. >>  17.03.2015 9:43, arto пишет: >>>   17.03.2015, 07:08, "Nick Knutov" : >>>>   Кто-нибудь знает, как поставить Math::Int128 ? Он нужен для GeoIP2, но >>>>   говорит >>>> >>>>     It looks like your compiler doesn't support a 128-bit integer type (one of >>>>     "int __attribute__ ((__mode__ (TI)))" or "__int128"). One of these >>>>   types is >>>>     necessary to compile the Math::Int128 module. >>>> >>>>   Убунта 14.04 x64, всяческие компиляторы стоят. >>>     Точно 64? >>>     У меня на Fedora20 64bit всё скомпилировалось без ошибок, >>>     а на Fedora20 32bit выдала такую же ошибку. >>  -- >>  Best Regards, >>  Nick Knutov >>  http://knutov.com >>  ICQ: 272873706 >>  Voice: +7-904-84-23-130 >> >>  -- >>  Moscow.pm mailing list >>  moscow-pm на pm.org | http://moscow.pm.org > > -- > wbw, artur > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org -- wbw, artur From citrin на citrin.ru Tue Mar 17 04:39:40 2015 From: citrin на citrin.ru (Anton Yuzhaninov) Date: Tue, 17 Mar 2015 14:39:40 +0300 Subject: [Moscow.pm] unexpected bit width In-Reply-To: <5356C00A.8010104@gmail.com> References: <5356C00A.8010104@gmail.com> Message-ID: <5508127C.8080603@citrin.ru> On 04/22/14 23:16, Alan Rafagudinov wrote: > Мозг себе сломал, не могу понять природу ошибки: > > > #!/usr/bin/env perl > > use strict; > use utf8; > > my $str = " № 00"; > > $str =~ /\bXXX\s?0/i; > > > При запуске этого кода получаю: > > "panic: swash_fetch got swatch of unexpected bit width, slen=32, > needents=64 at ./1.pl line 8." Столкнулся с очень похоже проблемой. use utf8; use open qw/:std :encoding(utf8)/; use Devel::Peek; my $x = "0005 RU Москва"; $x =~ /^(.*?)\s(.*)$/; warn $2; Dump($2); warn lc($2); При запуске на 5.20.2 RU Москва at ./ttt2.pl line 10. SV = PVMG(0x801dd8c60) at 0x801ce2f78 REFCNT = 1 FLAGS = (GMG,SMG,POK,IsCOW,pPOK,UTF8) IV = 0 NV = 0 PV = 0x801c8b340 "RU \320\234\320\276\321\201\320\272\320\262\320\260"\0 [UTF8 "RU \x{41c}\x{43e}\x{441}\x{43a}\x{432}\x{430}"] CUR = 15 LEN = 17 COW_REFCNT = 0 MAGIC = 0x801d257c0 MG_VIRTUAL = &PL_vtbl_sv MG_TYPE = PERL_MAGIC_sv(\0) MG_OBJ = 0x801ce2fc0 MG_LEN = 2 panic: swash_fetch got swatch of unexpected bit width, slen=1024, needents=64 at ./ttt2.pl line 12. UTF насколько могу видеть впролне валидный. В 12-й строке - lc На 5.20.1 скрипт работает без ошибок. From mmm3 на bk.ru Tue Mar 17 09:16:18 2015 From: mmm3 на bk.ru (=?UTF-8?B?0JzQsNC60YHQuNC8INCS0LvQsNC00LjQvNC40YDQvtCy0LjRhw==?=) Date: Tue, 17 Mar 2015 19:16:18 +0300 Subject: [Moscow.pm] =?utf-8?b?0J/QvtC00YHQutCw0LbQuNGC0LUsINC10YHRgtGM?= =?utf-8?b?INC70Lgg0LrQsNC60L7QuSDQvNC+0LTRg9C70Ywg0LTQu9GPINC+0L/RgNC1?= =?utf-8?b?0LTQtdC70LXQvdC40Y8g0L3QsCDQutCw0LrQvtC8INGP0LfRi9C60LUg0L0=?= =?utf-8?b?0LDQv9C40YHQsNC9INGC0LXQutGB0YI/?= Message-ID: <1426608978.277760536@f86.i.mail.ru> Подскажите, есть ли какой модуль для определения на каком языке написан текст? С уважением, Максим ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From mail на knutov.com Tue Mar 17 10:01:14 2015 From: mail на knutov.com (Nick Knutov) Date: Tue, 17 Mar 2015 22:01:14 +0500 Subject: [Moscow.pm] =?utf-8?b?0J/QvtC00YHQutCw0LbQuNGC0LUsINC10YHRgtGM?= =?utf-8?b?INC70Lgg0LrQsNC60L7QuSDQvNC+0LTRg9C70Ywg0LTQu9GPINC+0L/RgNC1?= =?utf-8?b?0LTQtdC70LXQvdC40Y8g0L3QsCDQutCw0LrQvtC8INGP0LfRi9C60LUg0L0=?= =?utf-8?b?0LDQv9C40YHQsNC9INGC0LXQutGB0YI/?= In-Reply-To: <1426608978.277760536@f86.i.mail.ru> References: <1426608978.277760536@f86.i.mail.ru> Message-ID: <55085DDA.8060603@knutov.com> Lingua::LanguageGuesser, Text::Language::Guess 17.03.2015 21:16, Максим Владимирович пишет: > Подскажите, есть ли какой модуль для определения на каком языке > написан текст? -- Best Regards, Nick Knutov http://knutov.com ICQ: 272873706 Voice: +7-904-84-23-130 ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From creaktive на gmail.com Tue Mar 17 10:01:58 2015 From: creaktive на gmail.com (Stanislaw Pusep) Date: Tue, 17 Mar 2015 18:01:58 +0100 Subject: [Moscow.pm] =?utf-8?b?0J/QvtC00YHQutCw0LbQuNGC0LUsINC10YHRgtGM?= =?utf-8?b?INC70Lgg0LrQsNC60L7QuSDQvNC+0LTRg9C70Ywg0LTQu9GPINC+0L8=?= =?utf-8?b?0YDQtdC00LXQu9C10L3QuNGPINC90LAg0LrQsNC60L7QvCDRj9C30Ys=?= =?utf-8?b?0LrQtSDQvdCw0L/QuNGB0LDQvSDRgtC10LrRgdGCPw==?= In-Reply-To: <1426608978.277760536@f86.i.mail.ru> References: <1426608978.277760536@f86.i.mail.ru> Message-ID: Lingua::Identifier, Lingua::Identify, Lingua::Identify::CLD 2015-03-17 17:16 GMT+01:00 Максим Владимирович : > Подскажите, есть ли какой модуль для определения на каком языке написан > текст? > > > С уважением, > > Максим > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > > ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From akzhan.abdulin на gmail.com Wed Mar 18 15:39:11 2015 From: akzhan.abdulin на gmail.com (Akzhan Abdulin) Date: Thu, 19 Mar 2015 01:39:11 +0300 Subject: [Moscow.pm] =?utf-8?b?0J/QvtC00YHQutCw0LbQuNGC0LUsINC10YHRgtGM?= =?utf-8?b?INC70Lgg0LrQsNC60L7QuSDQvNC+0LTRg9C70Ywg0LTQu9GPINC+0L8=?= =?utf-8?b?0YDQtdC00LXQu9C10L3QuNGPINC90LAg0LrQsNC60L7QvCDRj9C30Ys=?= =?utf-8?b?0LrQtSDQvdCw0L/QuNGB0LDQvSDRgtC10LrRgdGCPw==?= In-Reply-To: References: <1426608978.277760536@f86.i.mail.ru> Message-ID: charlock holmes. 17 марта 2015 г., 20:01 пользователь Stanislaw Pusep написал: > Lingua::Identifier, Lingua::Identify, Lingua::Identify::CLD > > 2015-03-17 17:16 GMT+01:00 Максим Владимирович : > >> Подскажите, есть ли какой модуль для определения на каком языке написан >> текст? >> >> >> С уважением, >> >> Максим >> >> -- >> Moscow.pm mailing list >> moscow-pm на pm.org | http://moscow.pm.org >> >> > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > > ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From mi на ya.ru Sat Mar 21 07:52:15 2015 From: mi на ya.ru (Nikolay Mishin) Date: Sat, 21 Mar 2015 17:52:15 +0300 Subject: [Moscow.pm] =?koi8-r?b?Y3BhbnRzIEt3YWxpdGVlIMkg19PFINfTxSDX08U=?= Message-ID: <5236651426949535@web22g.yandex.ru> Дорогой MoscowPM, пишут тебе шахтеры из Новокузнецка ;)) разобрался с Dist::Milla, теперь решил повышать Kwalitee бал я попытался получить высший балл на сайте http://cpants.cpanauthors.org/author/MISHIN пока 128.57 и 2 ошибки package_version_matches_dist_version и is_prereq как бы понять, как вычисляются эти параметры и что нужно сделать, чтобы эти тесты проходили Вижу, что люди решали эту ошибку(первую) https://github.com/cpants/www-cpants/issues/60 но, как они это сделали я так и не понял, что нужно исправить в дистрибутиве? спасибо, надеюсь уже кто-нибудь сталкивался с такой проблемой, спасибо!! -- С уважением Николай Мишин From mi на ya.ru Sat Mar 21 13:46:35 2015 From: mi на ya.ru (Nikolay Mishin) Date: Sat, 21 Mar 2015 23:46:35 +0300 Subject: [Moscow.pm] =?koi8-r?b?Y3BhbnRzIEt3YWxpdGVlIMkg19PFINfTxSDX08U=?= In-Reply-To: <5236651426949535@web22g.yandex.ru> References: <5236651426949535@web22g.yandex.ru> Message-ID: <6245551426970795@web3j.yandex.ru> Изучаю Module::CPANTS::Kwalitee; (https://github.com/cpants/Module-CPANTS-Analyse/blob/master/lib/Module/CPANTS/Kwalitee.pm) очень трудный для понимания код, perl best practice здесь не очень валялся даже уже на 4 критике └─ → milla-tutorial$ perlcritic -4 lib/Module/CPANTS/Kwalitee.pm Subroutine "available_kwalitee" does not end with "return" at line 72, column 1. See page 197 of PBP. (Severity: 4) Subroutine "total_kwalitee" does not end with "return" at line 85, column 1. See page 197 of PBP. (Severity: 4) Module does not end with "1;" at line 123, column 1. Must end with a recognizable true value. (Severity: 4) https://github.com/mishin/Module-CPANTS-Analyse/blob/master/lib/Module/CPANTS/Kwalitee.pm#L43 щас исправим 21.03.2015, 17:54, "Nikolay Mishin" : > Дорогой MoscowPM, > пишут тебе шахтеры из Новокузнецка ;)) > разобрался с Dist::Milla, теперь решил повышать Kwalitee бал > я попытался получить высший балл на сайте > http://cpants.cpanauthors.org/author/MISHIN > > пока 128.57 > и > 2 ошибки > package_version_matches_dist_version > и > is_prereq > > как бы понять, как вычисляются эти параметры > и что нужно сделать, чтобы эти тесты проходили > > Вижу, что люди решали эту ошибку(первую) > https://github.com/cpants/www-cpants/issues/60 > но, как они это сделали я так и не понял, > что нужно исправить в дистрибутиве? > > спасибо, надеюсь уже кто-нибудь сталкивался с такой проблемой, > спасибо!! > > -- > С уважением > Николай Мишин > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org -- С уважением Николай Мишин From mi на ya.ru Sun Mar 22 00:11:21 2015 From: mi на ya.ru (Nikolay Mishin) Date: Sun, 22 Mar 2015 10:11:21 +0300 Subject: [Moscow.pm] =?koi8-r?b?Y3BhbnRzIEt3YWxpdGVlIMkg19PFINfTxSDX08U=?= In-Reply-To: <6245551426970795@web3j.yandex.ru> References: <5236651426949535@web22g.yandex.ru> <6245551426970795@web3j.yandex.ru> Message-ID: <6491761427008281@web25j.yandex.ru> Кстати, послал им pull request https://github.com/cpants/Module-CPANTS-Analyse/pull/22#issuecomment-84464163 но не приняли These all seem like silly and unnecessary changes. A module only needs to return a true value; it doesn't need to be 1. ;)) у них в конце модуля стоит константа: https://github.com/cpants/Module-CPANTS-Analyse/blob/master/lib/Module/CPANTS/Kwalitee.pm#L144 q{Favourite record of the moment: Jahcoozi: Pure Breed Mongrel}; перевожу q{Любимые записи на данный момент: Jahcoozi: Чистая порода дворняжка}; Jahcoozi Музыкальная группа Альбомы: Barefoot Wanderer, Blitz 'n' Ass, Pure Breed Mongrel, Barbed Wire шутники, впрочем, как и весь Perl 21.03.2015, 23:49, "Nikolay Mishin" : > Изучаю > Module::CPANTS::Kwalitee; > (https://github.com/cpants/Module-CPANTS-Analyse/blob/master/lib/Module/CPANTS/Kwalitee.pm) > > очень трудный для понимания код, > perl best practice здесь не очень валялся > > даже уже на 4 критике > > └─ →  milla-tutorial$ perlcritic -4 lib/Module/CPANTS/Kwalitee.pm > Subroutine "available_kwalitee" does not end with "return" at line 72, column 1.  See page 197 of PBP.  (Severity: 4) > Subroutine "total_kwalitee" does not end with "return" at line 85, column 1.  See page 197 of PBP.  (Severity: 4) > Module does not end with "1;" at line 123, column 1.  Must end with a recognizable true value.  (Severity: 4) > > https://github.com/mishin/Module-CPANTS-Analyse/blob/master/lib/Module/CPANTS/Kwalitee.pm#L43 > > щас исправим > > 21.03.2015, 17:54, "Nikolay Mishin" : >>  Дорогой MoscowPM, >>  пишут тебе шахтеры из Новокузнецка ;)) >>  разобрался с Dist::Milla, теперь решил повышать Kwalitee бал >>  я попытался получить высший балл на сайте >>  http://cpants.cpanauthors.org/author/MISHIN >> >>  пока 128.57 >>  и >>  2 ошибки >>  package_version_matches_dist_version >>  и >>  is_prereq >> >>  как бы понять, как вычисляются эти параметры >>  и что нужно сделать, чтобы эти тесты проходили >> >>  Вижу, что люди решали эту ошибку(первую) >>  https://github.com/cpants/www-cpants/issues/60 >>  но, как они это сделали я так и не понял, >>  что нужно исправить в дистрибутиве? >> >>  спасибо, надеюсь уже кто-нибудь сталкивался с такой проблемой, >>  спасибо!! >> >>  -- >>  С уважением >>  Николай Мишин >> >>  -- >>  Moscow.pm mailing list >>  moscow-pm на pm.org | http://moscow.pm.org > > -- > С уважением > Николай Мишин > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org -- С уважением Николай Мишин From chesnokov.ilya на gmail.com Sun Mar 22 02:25:41 2015 From: chesnokov.ilya на gmail.com (Ilya Chesnokov) Date: Sun, 22 Mar 2015 12:25:41 +0300 Subject: [Moscow.pm] =?utf-8?b?Y3BhbnRzIEt3YWxpdGVlINC4INCy0YHQtSDQstGB?= =?utf-8?b?0LUg0LLRgdC1?= In-Reply-To: <6245551426970795@web3j.yandex.ru> References: <5236651426949535@web22g.yandex.ru> <6245551426970795@web3j.yandex.ru> Message-ID: 21 марта 2015 г., 23:46 пользователь Nikolay Mishin написал: > Изучаю > Module::CPANTS::Kwalitee; > (https://github.com/cpants/Module-CPANTS-Analyse/blob/master/lib/Module/CPANTS/Kwalitee.pm) > > очень трудный для понимания код, Нормальный код, имхо. > perl best practice здесь не очень валялся PBP - это набор рекомендаций, а не требований. Каждый разработчик волен следовать им или нет. Навязывать свое мнение другим - это уже некрасиво (по крайней мере если ты не руководитель этой команды). На уровень сложности / легкости понимания кода PBP влияет тоже лишь постольку поскольку. Вообще насколько я вижу, основные требования PBP там соблюдаются. > даже уже на 4 критике > > └─ → milla-tutorial$ perlcritic -4 lib/Module/CPANTS/Kwalitee.pm > Subroutine "available_kwalitee" does not end with "return" at line 72, column 1. See page 197 of PBP. (Severity: 4) > Subroutine "total_kwalitee" does not end with "return" at line 85, column 1. See page 197 of PBP. (Severity: 4) > Module does not end with "1;" at line 123, column 1. Must end with a recognizable true value. (Severity: 4) -4 - это довольно слабый уровень. Более-менее серьезные предупреждения начинаются вроде бы с 3-го уровня. > https://github.com/mishin/Module-CPANTS-Analyse/blob/master/lib/Module/CPANTS/Kwalitee.pm#L43 > > щас исправим Ты прям весь фан хотел им испортить. Не удивлен, что твой патч не приняли :) Вот если б ты проблему в функциональности нашел (и исправил или добавил фишку, такой патч был бы намного интереснее. > 21.03.2015, 17:54, "Nikolay Mishin" : >> Дорогой MoscowPM, >> пишут тебе шахтеры из Новокузнецка ;)) >> разобрался с Dist::Milla, теперь решил повышать Kwalitee бал >> я попытался получить высший балл на сайте >> http://cpants.cpanauthors.org/author/MISHIN >> >> пока 128.57 >> и >> 2 ошибки >> package_version_matches_dist_version >> и >> is_prereq >> >> как бы понять, как вычисляются эти параметры >> и что нужно сделать, чтобы эти тесты проходили >> >> Вижу, что люди решали эту ошибку(первую) >> https://github.com/cpants/www-cpants/issues/60 >> но, как они это сделали я так и не понял, >> что нужно исправить в дистрибутиве? >> >> спасибо, надеюсь уже кто-нибудь сталкивался с такой проблемой, >> спасибо!! >> >> -- >> С уважением >> Николай Мишин >> >> -- >> Moscow.pm mailing list >> moscow-pm на pm.org | http://moscow.pm.org > > -- > С уважением > Николай Мишин > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org -- Best regards, Ilya Chesnokov From maxim.vuets на gmail.com Sun Mar 22 04:38:37 2015 From: maxim.vuets на gmail.com (Maxim Vuets) Date: Sun, 22 Mar 2015 12:38:37 +0100 Subject: [Moscow.pm] =?utf-8?b?Y3BhbnRzIEt3YWxpdGVlINC4INCy0YHQtSDQstGB?= =?utf-8?b?0LUg0LLRgdC1?= In-Reply-To: References: <5236651426949535@web22g.yandex.ru> <6245551426970795@web3j.yandex.ru> Message-ID: 2015-03-22 10:25 GMT+01:00 Ilya Chesnokov : >> perl best practice здесь не очень валялся > > PBP - это набор рекомендаций, а не требований. Каждый разработчик > волен следовать им или нет. Навязывать свое мнение другим - это уже > некрасиво (по крайней мере если ты не руководитель этой команды). На > уровень сложности / легкости понимания кода PBP влияет тоже лишь > постольку поскольку. Ага. К тому же PBP в некоторых места достаточно спорный, а в других просто устарел. From mi на ya.ru Sun Mar 22 14:27:45 2015 From: mi на ya.ru (Nikolay Mishin) Date: Mon, 23 Mar 2015 00:27:45 +0300 Subject: [Moscow.pm] =?koi8-r?b?Y3BhbnRzIEt3YWxpdGVlIMkg19PFINfTxSDX08U=?= In-Reply-To: References: <5236651426949535@web22g.yandex.ru> <6245551426970795@web3j.yandex.ru> Message-ID: <8298761427059665@web20g.yandex.ru> Макс, Илья, спасибо, что разбавили дискуссию, да, perlcritic (ака PBP) порою устарел (и ему на смену пришел Kwalitee !!) и порой советует то, что является TIMTOWTDI, хотя я его люблю за то, что он запрещает unless и постфиксный if и все-таки улучшает читаемость 22.03.2015, 14:39, "Maxim Vuets" : > 2015-03-22 10:25 GMT+01:00 Ilya Chesnokov : >>>  perl best practice здесь не очень валялся >>  PBP - это набор рекомендаций, а не требований. Каждый разработчик >>  волен следовать им или нет. Навязывать свое мнение другим - это уже >>  некрасиво (по крайней мере если ты не руководитель этой команды). На >>  уровень сложности / легкости понимания кода PBP  влияет тоже лишь >>  постольку поскольку. > > Ага. К тому же PBP в некоторых места достаточно спорный, а в других > просто устарел. > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org -- С уважением Николай Мишин From mi на ya.ru Sun Mar 22 15:27:56 2015 From: mi на ya.ru (Nikolay Mishin) Date: Mon, 23 Mar 2015 01:27:56 +0300 Subject: [Moscow.pm] =?koi8-r?b?Y3BhbnRzIEt3YWxpdGVlIMkg19PFINfTxSDX08U=?= In-Reply-To: <8298761427059665@web20g.yandex.ru> References: <5236651426949535@web22g.yandex.ru> <6245551426970795@web3j.yandex.ru> <8298761427059665@web20g.yandex.ru> Message-ID: <7764371427063276@web27j.yandex.ru> Я, кстати, почитал код Module::CPANTS::SiteKwalitee::Prereq; name=>'is_prereq', error=>q{This distribution is not required by another distribution by another author.}, remedy=>q{Convince / force / bribe another CPAN author to use this distribution получается, чтобы получить плюс по этому параметру, нужно, чтобы был ще модуль, который использует твой модуль, прикольно 23.03.2015, 00:27, "Nikolay Mishin" : > Макс, Илья, спасибо, что разбавили дискуссию, > да, perlcritic (ака PBP) порою устарел (и ему на смену пришел Kwalitee !!) и порой советует то, что является TIMTOWTDI, > хотя я его люблю за то, что он запрещает > unless > и постфиксный if > и все-таки улучшает читаемость > > 22.03.2015, 14:39, "Maxim Vuets" : >>  2015-03-22 10:25 GMT+01:00 Ilya Chesnokov : >>>>   perl best practice здесь не очень валялся >>>   PBP - это набор рекомендаций, а не требований. Каждый разработчик >>>   волен следовать им или нет. Навязывать свое мнение другим - это уже >>>   некрасиво (по крайней мере если ты не руководитель этой команды). На >>>   уровень сложности / легкости понимания кода PBP  влияет тоже лишь >>>   постольку поскольку. >>  Ага. К тому же PBP в некоторых места достаточно спорный, а в других >>  просто устарел. >>  -- >>  Moscow.pm mailing list >>  moscow-pm на pm.org | http://moscow.pm.org > > -- > С уважением > Николай Мишин > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org -- С уважением Николай Мишин From ikkv на yandex.ru Sun Mar 22 15:29:43 2015 From: ikkv на yandex.ru (=?koi8-r?B?69Xa2M3FzsvPIOvPztPUwc7Uyc4=?=) Date: Mon, 23 Mar 2015 01:29:43 +0300 Subject: [Moscow.pm] Fwd: perl -MCPAN -e 'install POD2::RU' In-Reply-To: <7438621427063289@web12o.yandex.ru> Message-ID: <7439441427063383@web12o.yandex.ru> Вложение в формате HTML было извлечено… URL: From ivan на bessarabov.ru Mon Mar 23 01:36:47 2015 From: ivan на bessarabov.ru (=?UTF-8?B?0JjQstCw0L0g0JHQtdGB0YHQsNGA0LDQsdC+0LI=?=) Date: Mon, 23 Mar 2015 11:36:47 +0300 Subject: [Moscow.pm] Fwd: perl -MCPAN -e 'install POD2::RU' In-Reply-To: <7439441427063383@web12o.yandex.ru> References: <7438621427063289@web12o.yandex.ru> <7439441427063383@web12o.yandex.ru> Message-ID: Это проблема perldoc. Я для просмотра POD с unicode использую вот такой скрипт perldoc1, который лежит у меня в $PATH — https://gist.github.com/bessarabov/af46b4174b241a4f20ae On Mon, Mar 23, 2015 at 1:29 AM, Кузьменко Константин wrote: > Добрый день, > Везде Иксы вместо кирилических символов > > Установил так > perl -MCPAN -e 'install POD2::RU' > > проверил так > perldoc POD2::RU::perlretut > > Получил вот такой результат > PERLRETUT(1) User Contributed Perl Documentation > PERLRETUT(1) > > > > XXXXXXXXXXXX > perlretut - XXXXXXX XXXXXXXXXX XXXXXXXXX Perl > ... > # XXXXXXXXX XXXX, XXXXXX, XXXXXXX > if ($time =~ /(\d\d):(\d\d):(\d\d)/) { # XXXXX hh:mm:ss XXXXXX > $hours = $1; > $minutes = $2; > $seconds = $3; > } > ... > > XXXXXXXXXXXXX > XXXXXXXXXXXXX XXXXXXXX stop codon DNA XXXXXXXXX XX ZIP XXXXXXXX XXXX > X > XXXXX 7 XXXXX Mastering Regular Expressions. > > XXXXX XXXXX XX XXXXXXXXXXXXX Jeff Pinyan, Andrew Johnson, Peter > Haworth, Ronald J Kimball, X Joe Smith XX XXX XX XXXXXXXX > XXXXXXXXXXX. > > XXXXXXXXXXX > · XXXXXXX XXXXX "" > > > > perl v5.18.2 2015-03-22 > PERLRETUT(1) > > -- > С уважением, > Кузьменко Константин Викторович > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > From ikkv на yandex.ru Mon Mar 23 05:03:52 2015 From: ikkv на yandex.ru (=?koi8-r?B?69Xa2M3FzsvPIOvPztPUwc7Uyc4=?=) Date: Mon, 23 Mar 2015 15:03:52 +0300 Subject: [Moscow.pm] Fwd: perl -MCPAN -e 'install POD2::RU' In-Reply-To: References: <7438621427063289@web12o.yandex.ru> <7439441427063383@web12o.yandex.ru> Message-ID: <1997021427112232@web7m.yandex.ru> Добрый день, Только так? ./gistfile1.sh /usr/local/share/perl/5.18.2/POD2/RU/perlretut.pod ??? -- Специалист IT, GNU, FLOSS, Open Source Моб: +7 (951) 131 33 90 С уважением, Кузьменко Константин Викторович 23.03.2015, 11:37, "Иван Бессарабов" : > Это проблема perldoc. Я для просмотра POD с unicode использую вот > такой скрипт perldoc1, который лежит у меня в $PATH — > https://gist.github.com/bessarabov/af46b4174b241a4f20ae > > On Mon, Mar 23, 2015 at 1:29 AM, Кузьменко Константин wrote: >>  Добрый день, >>  Везде Иксы вместо кирилических символов >> >>  Установил так >>  perl -MCPAN -e 'install POD2::RU' >> >>  проверил так >>  perldoc POD2::RU::perlretut >> >>  Получил вот такой результат >>  PERLRETUT(1)          User Contributed Perl Documentation >>  PERLRETUT(1) >> >>  XXXXXXXXXXXX >>         perlretut - XXXXXXX XXXXXXXXXX XXXXXXXXX Perl >>  ... >>  # XXXXXXXXX XXXX, XXXXXX, XXXXXXX >>             if ($time =~ /(\d\d):(\d\d):(\d\d)/) {    # XXXXX hh:mm:ss XXXXXX >>                 $hours = $1; >>                 $minutes = $2; >>                 $seconds = $3; >>             } >>  ... >> >>  XXXXXXXXXXXXX >>         XXXXXXXXXXXXX XXXXXXXX stop codon DNA  XXXXXXXXX XX ZIP XXXXXXXX XXXX >>  X >>         XXXXX 7 XXXXX Mastering Regular Expressions. >> >>         XXXXX XXXXX XX XXXXXXXXXXXXX Jeff Pinyan, Andrew Johnson, Peter >>         Haworth, Ronald J Kimball, X Joe Smith XX XXX XX XXXXXXXX >>  XXXXXXXXXXX. >> >>  XXXXXXXXXXX >>         ·   XXXXXXX XXXXX "" >> >>  perl v5.18.2                      2015-03-22 >>  PERLRETUT(1) >> >>  -- >>  С уважением, >>  Кузьменко Константин Викторович >> >>  -- >>  Moscow.pm mailing list >>  moscow-pm на pm.org | http://moscow.pm.org > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org From chesnokov.ilya на gmail.com Mon Mar 23 05:24:19 2015 From: chesnokov.ilya на gmail.com (Ilya Chesnokov) Date: Mon, 23 Mar 2015 15:24:19 +0300 Subject: [Moscow.pm] Fwd: perl -MCPAN -e 'install POD2::RU' In-Reply-To: <1997021427112232@web7m.yandex.ru> References: <7438621427063289@web12o.yandex.ru> <7439441427063383@web12o.yandex.ru> <1997021427112232@web7m.yandex.ru> Message-ID: 23 марта 2015 г., 15:03 пользователь Кузьменко Константин написал: > Добрый день, > > Только так? > ./gistfile1.sh /usr/local/share/perl/5.18.2/POD2/RU/perlretut.pod > > ??? Файл можно искать при помощи perldoc -l Попробуй: pod2man --utf8 $(perldoc -l $1) | iconv -t iso8859-5 | nroff -Tlatin1 -c -man - | iconv -f iso8859-5 | less > -- > Специалист IT, GNU, FLOSS, Open Source > Моб: +7 (951) 131 33 90 > С уважением, > Кузьменко Константин Викторович > > > 23.03.2015, 11:37, "Иван Бессарабов" : >> Это проблема perldoc. Я для просмотра POD с unicode использую вот >> такой скрипт perldoc1, который лежит у меня в $PATH — >> https://gist.github.com/bessarabov/af46b4174b241a4f20ae >> >> On Mon, Mar 23, 2015 at 1:29 AM, Кузьменко Константин wrote: >>> Добрый день, >>> Везде Иксы вместо кирилических символов >>> >>> Установил так >>> perl -MCPAN -e 'install POD2::RU' >>> >>> проверил так >>> perldoc POD2::RU::perlretut >>> >>> Получил вот такой результат >>> PERLRETUT(1) User Contributed Perl Documentation >>> PERLRETUT(1) >>> >>> XXXXXXXXXXXX >>> perlretut - XXXXXXX XXXXXXXXXX XXXXXXXXX Perl >>> ... >>> # XXXXXXXXX XXXX, XXXXXX, XXXXXXX >>> if ($time =~ /(\d\d):(\d\d):(\d\d)/) { # XXXXX hh:mm:ss XXXXXX >>> $hours = $1; >>> $minutes = $2; >>> $seconds = $3; >>> } >>> ... >>> >>> XXXXXXXXXXXXX >>> XXXXXXXXXXXXX XXXXXXXX stop codon DNA XXXXXXXXX XX ZIP XXXXXXXX XXXX >>> X >>> XXXXX 7 XXXXX Mastering Regular Expressions. >>> >>> XXXXX XXXXX XX XXXXXXXXXXXXX Jeff Pinyan, Andrew Johnson, Peter >>> Haworth, Ronald J Kimball, X Joe Smith XX XXX XX XXXXXXXX >>> XXXXXXXXXXX. >>> >>> XXXXXXXXXXX >>> · XXXXXXX XXXXX "" >>> >>> perl v5.18.2 2015-03-22 >>> PERLRETUT(1) >>> >>> -- >>> С уважением, >>> Кузьменко Константин Викторович >>> >>> -- >>> Moscow.pm mailing list >>> moscow-pm на pm.org | http://moscow.pm.org >> >> -- >> Moscow.pm mailing list >> moscow-pm на pm.org | http://moscow.pm.org > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org -- Best regards, Ilya Chesnokov From chesnokov.ilya на gmail.com Mon Mar 23 05:25:31 2015 From: chesnokov.ilya на gmail.com (Ilya Chesnokov) Date: Mon, 23 Mar 2015 15:25:31 +0300 Subject: [Moscow.pm] Fwd: perl -MCPAN -e 'install POD2::RU' In-Reply-To: References: <7438621427063289@web12o.yandex.ru> <7439441427063383@web12o.yandex.ru> <1997021427112232@web7m.yandex.ru> Message-ID: 23 марта 2015 г., 15:24 пользователь Ilya Chesnokov написал: > 23 марта 2015 г., 15:03 пользователь Кузьменко Константин > написал: >> Добрый день, >> >> Только так? >> ./gistfile1.sh /usr/local/share/perl/5.18.2/POD2/RU/perlretut.pod >> >> ??? > > Файл можно искать при помощи perldoc -l > > Попробуй: > pod2man --utf8 $(perldoc -l $1) | iconv -t iso8859-5 | nroff -Tlatin1 > -c -man - | iconv -f iso8859-5 | less P.S. Но вообще, может как-то можно исправить perldoc? :) >> -- >> Специалист IT, GNU, FLOSS, Open Source >> Моб: +7 (951) 131 33 90 >> С уважением, >> Кузьменко Константин Викторович >> >> >> 23.03.2015, 11:37, "Иван Бессарабов" : >>> Это проблема perldoc. Я для просмотра POD с unicode использую вот >>> такой скрипт perldoc1, который лежит у меня в $PATH — >>> https://gist.github.com/bessarabov/af46b4174b241a4f20ae >>> >>> On Mon, Mar 23, 2015 at 1:29 AM, Кузьменко Константин wrote: >>>> Добрый день, >>>> Везде Иксы вместо кирилических символов >>>> >>>> Установил так >>>> perl -MCPAN -e 'install POD2::RU' >>>> >>>> проверил так >>>> perldoc POD2::RU::perlretut >>>> >>>> Получил вот такой результат >>>> PERLRETUT(1) User Contributed Perl Documentation >>>> PERLRETUT(1) >>>> >>>> XXXXXXXXXXXX >>>> perlretut - XXXXXXX XXXXXXXXXX XXXXXXXXX Perl >>>> ... >>>> # XXXXXXXXX XXXX, XXXXXX, XXXXXXX >>>> if ($time =~ /(\d\d):(\d\d):(\d\d)/) { # XXXXX hh:mm:ss XXXXXX >>>> $hours = $1; >>>> $minutes = $2; >>>> $seconds = $3; >>>> } >>>> ... >>>> >>>> XXXXXXXXXXXXX >>>> XXXXXXXXXXXXX XXXXXXXX stop codon DNA XXXXXXXXX XX ZIP XXXXXXXX XXXX >>>> X >>>> XXXXX 7 XXXXX Mastering Regular Expressions. >>>> >>>> XXXXX XXXXX XX XXXXXXXXXXXXX Jeff Pinyan, Andrew Johnson, Peter >>>> Haworth, Ronald J Kimball, X Joe Smith XX XXX XX XXXXXXXX >>>> XXXXXXXXXXX. >>>> >>>> XXXXXXXXXXX >>>> · XXXXXXX XXXXX "" >>>> >>>> perl v5.18.2 2015-03-22 >>>> PERLRETUT(1) >>>> >>>> -- >>>> С уважением, >>>> Кузьменко Константин Викторович >>>> >>>> -- >>>> Moscow.pm mailing list >>>> moscow-pm на pm.org | http://moscow.pm.org >>> >>> -- >>> Moscow.pm mailing list >>> moscow-pm на pm.org | http://moscow.pm.org >> -- >> Moscow.pm mailing list >> moscow-pm на pm.org | http://moscow.pm.org > > > > -- > Best regards, > Ilya Chesnokov -- Best regards, Ilya Chesnokov From theathlet на yandex.ru Mon Mar 23 06:16:52 2015 From: theathlet на yandex.ru (TheAthlete) Date: Mon, 23 Mar 2015 16:16:52 +0300 Subject: [Moscow.pm] Fwd: perl -MCPAN -e 'install POD2::RU' In-Reply-To: <7439441427063383@web12o.yandex.ru> References: <7439441427063383@web12o.yandex.ru> Message-ID: У меня нормально отображается $ perldoc -V Perldoc v3.24, under perl v5.018004 for linux $ locale LANG=ru_UA.UTF-8 LC_CTYPE="ru_UA.UTF-8" LC_NUMERIC="ru_UA.UTF-8" LC_TIME="ru_UA.UTF-8" LC_COLLATE="ru_UA.UTF-8" LC_MONETARY="ru_UA.UTF-8" LC_MESSAGES="ru_UA.UTF-8" LC_PAPER="ru_UA.UTF-8" LC_NAME="ru_UA.UTF-8" LC_ADDRESS="ru_UA.UTF-8" LC_TELEPHONE="ru_UA.UTF-8" LC_MEASUREMENT="ru_UA.UTF-8" LC_IDENTIFICATION="ru_UA.UTF-8" LC_ALL= Может проблема в локали? Кузьменко Константин писал(а) в своём письме Mon, 23 Mar 2015 01:29:43 +0300: > Добрый день, > > Везде Иксы вместо кирилических символов > > Установил так > > perl -MCPAN -e 'install POD2::RU' > > проверил так > > perldoc POD2::RU::perlretut > > Получил вот такой результат > > PERLRETUT(1) User Contributed Perl Documentation PERLRETUT(1) > > > > XXXXXXXXXXXX > perlretut - XXXXXXX XXXXXXXXXX XXXXXXXXX Perl > > ... > > # XXXXXXXXX XXXX, XXXXXX, XXXXXXX > if ($time =~ /(\d\d):(\d\d):(\d\d)/) { # XXXXX hh:mm:ss XXXXXX > $hours = $1; > $minutes = $2; > $seconds = $3; > } > ... > > XXXXXXXXXXXXX > XXXXXXXXXXXXX XXXXXXXX stop codon DNA XXXXXXXXX XX ZIP XXXXXXXX XXXX X > XXXXX 7 XXXXX Mastering Regular Expressions. > > XXXXX XXXXX XX XXXXXXXXXXXXX Jeff Pinyan, Andrew Johnson, Peter > Haworth, Ronald J Kimball, X Joe Smith XX XXX XX XXXXXXXX XXXXXXXXXXX. > > XXXXXXXXXXX > · XXXXXXX XXXXX "" > > > > perl v5.18.2 2015-03-22 PERLRETUT(1) > > -- > > С уважением, > > Кузьменко Константин Викторович -- Написано в почтовом клиенте браузера Opera: http://www.opera.com/mail/ From secrethost на gmail.com Mon Mar 23 06:28:23 2015 From: secrethost на gmail.com (=?UTF-8?B?0JDQvdC00YDQtdC5INCk0ZHQtNC+0YDQvtCy?=) Date: Mon, 23 Mar 2015 16:28:23 +0300 Subject: [Moscow.pm] Fwd: perl -MCPAN -e 'install POD2::RU' In-Reply-To: References: <7439441427063383@web12o.yandex.ru> Message-ID: Видимо, в версии. 3.19 - иксами, последняя 3.25 - нормально 23 марта 2015 г., 16:16 пользователь TheAthlete написал: > У меня нормально отображается > $ perldoc -V > Perldoc v3.24, under perl v5.018004 for linux > > $ locale > LANG=ru_UA.UTF-8 > LC_CTYPE="ru_UA.UTF-8" > LC_NUMERIC="ru_UA.UTF-8" > LC_TIME="ru_UA.UTF-8" > LC_COLLATE="ru_UA.UTF-8" > LC_MONETARY="ru_UA.UTF-8" > LC_MESSAGES="ru_UA.UTF-8" > LC_PAPER="ru_UA.UTF-8" > LC_NAME="ru_UA.UTF-8" > LC_ADDRESS="ru_UA.UTF-8" > LC_TELEPHONE="ru_UA.UTF-8" > LC_MEASUREMENT="ru_UA.UTF-8" > LC_IDENTIFICATION="ru_UA.UTF-8" > LC_ALL= > > Может проблема в локали? > > Кузьменко Константин писал(а) в своём письме Mon, 23 Mar > 2015 01:29:43 +0300: > > > Добрый день, >> >> Везде Иксы вместо кирилических символов >> >> Установил так >> >> perl -MCPAN -e 'install POD2::RU' >> >> проверил так >> >> perldoc POD2::RU::perlretut >> >> Получил вот такой результат >> >> PERLRETUT(1) User Contributed Perl Documentation PERLRETUT(1) >> >> >> >> XXXXXXXXXXXX >> perlretut - XXXXXXX XXXXXXXXXX XXXXXXXXX Perl >> >> ... >> >> # XXXXXXXXX XXXX, XXXXXX, XXXXXXX >> if ($time =~ /(\d\d):(\d\d):(\d\d)/) { # XXXXX hh:mm:ss XXXXXX >> $hours = $1; >> $minutes = $2; >> $seconds = $3; >> } >> ... >> >> XXXXXXXXXXXXX >> XXXXXXXXXXXXX XXXXXXXX stop codon DNA XXXXXXXXX XX ZIP XXXXXXXX XXXX X >> XXXXX 7 XXXXX Mastering Regular Expressions. >> >> XXXXX XXXXX XX XXXXXXXXXXXXX Jeff Pinyan, Andrew Johnson, Peter >> Haworth, Ronald J Kimball, X Joe Smith XX XXX XX XXXXXXXX XXXXXXXXXXX. >> >> XXXXXXXXXXX >> · XXXXXXX XXXXX "" >> >> >> >> perl v5.18.2 2015-03-22 PERLRETUT(1) >> >> -- >> >> С уважением, >> >> Кузьменко Константин Викторович >> > > > -- > Написано в почтовом клиенте браузера Opera: http://www.opera.com/mail/ > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From grisxa на gmail.com Mon Mar 23 06:42:31 2015 From: grisxa на gmail.com (Grigory Batalov) Date: Mon, 23 Mar 2015 16:42:31 +0300 Subject: [Moscow.pm] Fwd: perl -MCPAN -e 'install POD2::RU' In-Reply-To: References: <7439441427063383@web12o.yandex.ru> Message-ID: <20150323164231.764ae416@gbatalov> В Mon, 23 Mar 2015 16:16:52 +0300 TheAthlete пишет: > У меня нормально отображается > $ perldoc -V > Perldoc v3.24, under perl v5.018004 for linux Аналогично: $ perldoc -V Perldoc v3.17, under perl v5.016003 for linux Локаль ru_RU.UTF-8 > $ locale > LANG=ru_UA.UTF-8 > LC_CTYPE="ru_UA.UTF-8" > LC_NUMERIC="ru_UA.UTF-8" > LC_TIME="ru_UA.UTF-8" > LC_COLLATE="ru_UA.UTF-8" > LC_MONETARY="ru_UA.UTF-8" > LC_MESSAGES="ru_UA.UTF-8" > LC_PAPER="ru_UA.UTF-8" > LC_NAME="ru_UA.UTF-8" > LC_ADDRESS="ru_UA.UTF-8" > LC_TELEPHONE="ru_UA.UTF-8" > LC_MEASUREMENT="ru_UA.UTF-8" > LC_IDENTIFICATION="ru_UA.UTF-8" > LC_ALL= > > Может проблема в локали? From secrethost на gmail.com Mon Mar 23 06:59:42 2015 From: secrethost на gmail.com (=?UTF-8?B?0JDQvdC00YDQtdC5INCk0ZHQtNC+0YDQvtCy?=) Date: Mon, 23 Mar 2015 16:59:42 +0300 Subject: [Moscow.pm] Fwd: perl -MCPAN -e 'install POD2::RU' In-Reply-To: <20150323164231.764ae416@gbatalov> References: <7439441427063383@web12o.yandex.ru> <20150323164231.764ae416@gbatalov> Message-ID: Значит, сломали в 3.18 и в 3.20 починили обратно 23 марта 2015 г., 16:42 пользователь Grigory Batalov написал: > В Mon, 23 Mar 2015 16:16:52 +0300 > TheAthlete пишет: > > > У меня нормально отображается > > $ perldoc -V > > Perldoc v3.24, under perl v5.018004 for linux > > Аналогично: > $ perldoc -V > Perldoc v3.17, under perl v5.016003 for linux > > Локаль ru_RU.UTF-8 > > > $ locale > > LANG=ru_UA.UTF-8 > > LC_CTYPE="ru_UA.UTF-8" > > LC_NUMERIC="ru_UA.UTF-8" > > LC_TIME="ru_UA.UTF-8" > > LC_COLLATE="ru_UA.UTF-8" > > LC_MONETARY="ru_UA.UTF-8" > > LC_MESSAGES="ru_UA.UTF-8" > > LC_PAPER="ru_UA.UTF-8" > > LC_NAME="ru_UA.UTF-8" > > LC_ADDRESS="ru_UA.UTF-8" > > LC_TELEPHONE="ru_UA.UTF-8" > > LC_MEASUREMENT="ru_UA.UTF-8" > > LC_IDENTIFICATION="ru_UA.UTF-8" > > LC_ALL= > > > > Может проблема в локали? > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From ikkv на yandex.ru Mon Mar 23 07:50:40 2015 From: ikkv на yandex.ru (=?koi8-r?B?69Xa2M3FzsvPIOvPztPUwc7Uyc4=?=) Date: Mon, 23 Mar 2015 17:50:40 +0300 Subject: [Moscow.pm] Fwd: perl -MCPAN -e 'install POD2::RU' In-Reply-To: References: <7438621427063289@web12o.yandex.ru> <7439441427063383@web12o.yandex.ru> <1997021427112232@web7m.yandex.ru> Message-ID: <2784001427122240@web22o.yandex.ru> Спасибо, замысел понятен, Плюс к этому http://habrahabr.ru/post/71525/ буду доделывать, результат отпишу! -- Специалист IT, GNU, FLOSS, Open Source Моб: +7 (951) 131 33 90 С уважением, Кузьменко Константин Викторович 23.03.2015, 15:24, "Ilya Chesnokov" : > 23 марта 2015 г., 15:03 пользователь Кузьменко Константин > написал: >>  Добрый день, >> >>  Только так? >>  ./gistfile1.sh /usr/local/share/perl/5.18.2/POD2/RU/perlretut.pod >> >>  ??? > > Файл можно искать при помощи perldoc -l > > Попробуй: > pod2man --utf8 $(perldoc -l $1) | iconv -t iso8859-5 | nroff -Tlatin1 > -c -man - | iconv -f iso8859-5 | less >>  -- >>  Специалист IT, GNU, FLOSS, Open Source >>  Моб: +7 (951) 131 33 90 >>  С уважением, >>  Кузьменко Константин Викторович >> >>  23.03.2015, 11:37, "Иван Бессарабов" : >>>  Это проблема perldoc. Я для просмотра POD с unicode использую вот >>>  такой скрипт perldoc1, который лежит у меня в $PATH — >>>  https://gist.github.com/bessarabov/af46b4174b241a4f20ae >>> >>>  On Mon, Mar 23, 2015 at 1:29 AM, Кузьменко Константин wrote: >>>>   Добрый день, >>>>   Везде Иксы вместо кирилических символов >>>> >>>>   Установил так >>>>   perl -MCPAN -e 'install POD2::RU' >>>> >>>>   проверил так >>>>   perldoc POD2::RU::perlretut >>>> >>>>   Получил вот такой результат >>>>   PERLRETUT(1)          User Contributed Perl Documentation >>>>   PERLRETUT(1) >>>> >>>>   XXXXXXXXXXXX >>>>          perlretut - XXXXXXX XXXXXXXXXX XXXXXXXXX Perl >>>>   ... >>>>   # XXXXXXXXX XXXX, XXXXXX, XXXXXXX >>>>              if ($time =~ /(\d\d):(\d\d):(\d\d)/) {    # XXXXX hh:mm:ss XXXXXX >>>>                  $hours = $1; >>>>                  $minutes = $2; >>>>                  $seconds = $3; >>>>              } >>>>   ... >>>> >>>>   XXXXXXXXXXXXX >>>>          XXXXXXXXXXXXX XXXXXXXX stop codon DNA  XXXXXXXXX XX ZIP XXXXXXXX XXXX >>>>   X >>>>          XXXXX 7 XXXXX Mastering Regular Expressions. >>>> >>>>          XXXXX XXXXX XX XXXXXXXXXXXXX Jeff Pinyan, Andrew Johnson, Peter >>>>          Haworth, Ronald J Kimball, X Joe Smith XX XXX XX XXXXXXXX >>>>   XXXXXXXXXXX. >>>> >>>>   XXXXXXXXXXX >>>>          ·   XXXXXXX XXXXX "" >>>> >>>>   perl v5.18.2                      2015-03-22 >>>>   PERLRETUT(1) >>>> >>>>   -- >>>>   С уважением, >>>>   Кузьменко Константин Викторович >>>> >>>>   -- >>>>   Moscow.pm mailing list >>>>   moscow-pm на pm.org | http://moscow.pm.org >>>  -- >>>  Moscow.pm mailing list >>>  moscow-pm на pm.org | http://moscow.pm.org >>  -- >>  Moscow.pm mailing list >>  moscow-pm на pm.org | http://moscow.pm.org > > -- > Best regards, > Ilya Chesnokov > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org From dzirtik на gmail.com Mon Mar 23 09:27:25 2015 From: dzirtik на gmail.com (=?UTF-8?B?0J/QsNCy0LXQuyDQqdC10YDQsdC40L3QuNC9?=) Date: Mon, 23 Mar 2015 19:27:25 +0300 Subject: [Moscow.pm] =?utf-8?b?TWF5IFBlcmwgMTYtMTcg0LzQsNGPIDIwMTU=?= Message-ID: *May Perl 16-17 мая* 16 и 17 мая в московском офисе Mail.Ru Group пройдет конференция May Perl. На нее слетаются Perl-профессионалы из разных уголков земного шара, чтобы обменяться опытом, завести новые знакомства в своей сфере и пообщаться с единомышленниками в неформальной и приятной обстановке. На предстоящем мероприятии ожидается около 30 докладов от спикеров, среди которых выступят специальные иностранные гости: *·* *Sawyer X* *Программист из Израиля, один из разработчиков **Dancer**, организатор встреч сообщества telaviv.pm . Спикер давно увлечен * *Perl **и активно следит за новостями в сообществе, а его харизматичные выступления отличаются простой и доступной подачей.* *·* *Peter Rabbitson** (**ribasushi**)* *Perl-программист, разработчик DBIx::Class – одной из самых популярных * *ORM **в мире **Perl **– и постоянный гость *конференции*. Он занимает почетное место в сообществе и всегда готов помогать коллегам.* *Мы приглашаем на **May Perl* *докладчиков и участников**.** Чтобы выступить спикером, подайте заявку .* *Для участия в качестве **слушателя регистрируйтесь здесь . Участие бесплатное!* *Официальные языки конференции – русский и английский. Будет организована онлайн-трансляция.* *Мероприятие состоится по адресу:** Москва, Ленинградский пр-т, 39, стр. 79 (м. «Аэропорт»).* *Дорогие друзья, у меня к вам особая просьба, сделайте рассылочку внутри своей компании об этом мероприятие, очень хочется чтобы не осталось ни одного perl-программиста, который не знает об этоv мероприятие :-)* -- С Уважением, Щербинин Павел ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From theathlet на yandex.ru Mon Mar 23 10:41:28 2015 From: theathlet на yandex.ru (TheAthlete) Date: Mon, 23 Mar 2015 20:41:28 +0300 Subject: [Moscow.pm] Fwd: perl -MCPAN -e 'install POD2::RU' In-Reply-To: References: <7439441427063383@web12o.yandex.ru> Message-ID: Кстати да, https://metacpan.org/changes/distribution/Pod-Perldoc#L99 3.20 - Sat Apr 27 05:25:30 UTC 2013 * Make default formatter "ToTerm" instead of "ToMan" for better UTF-8 support * When dynamically building POD from perlfunc (perlvar) make sure we open filehandles with utf8 and add an =encoding (RT #80527) (RT #80640) > Видимо, в версии. 3.19 - иксами, последняя 3.25 - нормально From ikkv на yandex.ru Mon Mar 23 12:17:39 2015 From: ikkv на yandex.ru (=?koi8-r?B?69Xa2M3FzsvPIOvPztPUwc7Uyc4=?=) Date: Mon, 23 Mar 2015 22:17:39 +0300 Subject: [Moscow.pm] Fwd: perl -MCPAN -e 'install POD2::RU' In-Reply-To: <2784001427122240@web22o.yandex.ru> References: <7438621427063289@web12o.yandex.ru> <7439441427063383@web12o.yandex.ru> <1997021427112232@web7m.yandex.ru> <2784001427122240@web22o.yandex.ru> Message-ID: <3451451427138259@web8o.yandex.ru> Вложение в формате HTML было извлечено… URL: From mi на ya.ru Mon Mar 23 13:41:16 2015 From: mi на ya.ru (Nikolay Mishin) Date: Mon, 23 Mar 2015 23:41:16 +0300 Subject: [Moscow.pm] two Russian sign-ups already today! ;) Message-ID: <4073491427143276@web17g.yandex.ru> Привет MoscowPM! Читая irc лог pr-challenge порой натыкаешься на смешные диалоги, например о русских: http://irclog.perlgeek.de/pr-challenge/2015-02-04#i_10058766 13:22 neilb vti: two Russian sign-ups already today! \o/ 13:23 vti neilb: how do you know? did you write in you in russian? :D 13:23 *they 13:23 god.. so many typos 13:23 neilb yeah, what are you, typing in a foreign language or something?! 13:25 vti neilb: i make lots of typos in russian too :) 13:27 neilb mee to 13:27 Well, they said “let me into the challenge, or I break your fingers”, so I assumed they were Russian ;-) 13:27 vti neilb: i see 13:28 neilb also, the .ru domains and russian names were a hint 13:33 vti neilb: :) не знаю нужно ли переводить;) -- С уважением Николай Мишин From foxcool333 на gmail.com Mon Mar 23 13:47:25 2015 From: foxcool333 на gmail.com (=?UTF-8?B?0JDQu9C10LrRgdCw0L3QtNGAINCk0L7QutGB0LrRg9C7?=) Date: Mon, 23 Mar 2015 23:47:25 +0300 Subject: [Moscow.pm] two Russian sign-ups already today! ;) In-Reply-To: <4073491427143276@web17g.yandex.ru> References: <4073491427143276@web17g.yandex.ru> Message-ID: Национальности не нужны. 23.03.2015 23:41 пользователь "Nikolay Mishin" написал: > Привет MoscowPM! > > Читая irc лог pr-challenge > порой натыкаешься на смешные диалоги, например о русских: > > http://irclog.perlgeek.de/pr-challenge/2015-02-04#i_10058766 > > 13:22 neilb vti: two Russian sign-ups already today! \o/ > 13:23 vti neilb: how do you know? did you write in you in russian? :D > 13:23 *they > 13:23 god.. so many typos > 13:23 neilb yeah, what are you, typing in a foreign language or > something?! > 13:25 vti neilb: i make lots of typos in russian too :) > 13:27 neilb mee to > 13:27 Well, they said “let me into the challenge, or I break > your fingers”, so I assumed they were Russian ;-) > 13:27 vti neilb: i see > 13:28 neilb also, the .ru domains and russian names were a hint > 13:33 vti neilb: :) > > > не знаю нужно ли переводить;) > -- > С уважением > Николай Мишин > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From mi на ya.ru Mon Mar 23 13:50:14 2015 From: mi на ya.ru (Nikolay Mishin) Date: Mon, 23 Mar 2015 23:50:14 +0300 Subject: [Moscow.pm] two Russian sign-ups already today! ;) In-Reply-To: References: <4073491427143276@web17g.yandex.ru> Message-ID: <3748481427143814@web29o.yandex.ru> да я про ошибки в английском.. и их реакцию от habitat'ов то есть от носителей языка 23.03.2015, 23:47, "Александр Фокскул" : > Национальности не нужны. > > 23.03.2015 23:41 пользователь "Nikolay Mishin" написал: >> Привет MoscowPM! >> >> Читая irc лог pr-challenge >> порой натыкаешься на смешные диалоги, например о русских: >> >> http://irclog.perlgeek.de/pr-challenge/2015-02-04#i_10058766 >> >> 13:22   neilb   vti: two Russian sign-ups already today! \o/ >> 13:23   vti     neilb: how do you know? did you write in you in russian? :D >> 13:23           *they >> 13:23           god.. so many typos >> 13:23   neilb   yeah, what are you, typing in a foreign language or something?! >> 13:25   vti     neilb: i make lots of typos in russian too :) >> 13:27   neilb   mee to >> 13:27           Well, they said “let me into the challenge, or I break your fingers”, so I assumed they were Russian ;-) >> 13:27   vti     neilb: i see >> 13:28   neilb   also, the .ru domains and russian names were a hint >> 13:33   vti     neilb: :) >> >> не знаю нужно ли переводить;) >> -- >> С уважением >> Николай Мишин >> >> -- >> Moscow.pm mailing list >> moscow-pm на pm.org | http://moscow.pm.org > , > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org -- С уважением Николай Мишин From mi на ya.ru Mon Mar 23 13:54:41 2015 From: mi на ya.ru (Nikolay Mishin) Date: Mon, 23 Mar 2015 23:54:41 +0300 Subject: [Moscow.pm] two Russian sign-ups already today! ;) In-Reply-To: <3748481427143814@web29o.yandex.ru> References: <4073491427143276@web17g.yandex.ru> <3748481427143814@web29o.yandex.ru> Message-ID: <4078491427144081@web23g.yandex.ru> я подозревал, что заголовок получится не очень корректным, учту это в следующий раз, надо было : юмор на perl.irc.org 23.03.2015, 23:50, "Nikolay Mishin" : > да я про ошибки в английском.. > и их реакцию от habitat'ов > то есть от носителей языка > > 23.03.2015, 23:47, "Александр Фокскул" : >>  Национальности не нужны. >> >>  23.03.2015 23:41 пользователь "Nikolay Mishin" написал: >>>  Привет MoscowPM! >>> >>>  Читая irc лог pr-challenge >>>  порой натыкаешься на смешные диалоги, например о русских: >>> >>>  http://irclog.perlgeek.de/pr-challenge/2015-02-04#i_10058766 >>> >>>  13:22   neilb   vti: two Russian sign-ups already today! \o/ >>>  13:23   vti     neilb: how do you know? did you write in you in russian? :D >>>  13:23           *they >>>  13:23           god.. so many typos >>>  13:23   neilb   yeah, what are you, typing in a foreign language or something?! >>>  13:25   vti     neilb: i make lots of typos in russian too :) >>>  13:27   neilb   mee to >>>  13:27           Well, they said “let me into the challenge, or I break your fingers”, so I assumed they were Russian ;-) >>>  13:27   vti     neilb: i see >>>  13:28   neilb   also, the .ru domains and russian names were a hint >>>  13:33   vti     neilb: :) >>> >>>  не знаю нужно ли переводить;) >>>  -- >>>  С уважением >>>  Николай Мишин >>> >>>  -- >>>  Moscow.pm mailing list >>>  moscow-pm на pm.org | http://moscow.pm.org >>  , >> >>  -- >>  Moscow.pm mailing list >>  moscow-pm на pm.org | http://moscow.pm.org > > -- > С уважением > Николай Мишин > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org -- С уважением Николай Мишин From foxcool333 на gmail.com Mon Mar 23 21:40:50 2015 From: foxcool333 на gmail.com (=?UTF-8?B?0JDQu9C10LrRgdCw0L3QtNGAINCk0L7QutGB0LrRg9C7?=) Date: Tue, 24 Mar 2015 07:40:50 +0300 Subject: [Moscow.pm] two Russian sign-ups already today! ;) In-Reply-To: <4078491427144081@web23g.yandex.ru> References: <4073491427143276@web17g.yandex.ru> <3748481427143814@web29o.yandex.ru> <4078491427144081@web23g.yandex.ru> Message-ID: Эффективная прокачка английского - как раз одна из причин, почему хочу себе парттайм в забугорном проекте. Любые нааыки лучше всего оттачиваются, когда в этом есть реальная практическая нужда. Если, конечно, не команда индусов, которые пишут еще хуже, если верить рассказам. 23.03.2015 23:55 пользователь "Nikolay Mishin" написал: > я подозревал, что заголовок получится не очень корректным, учту это в > следующий раз, > надо было : юмор на perl.irc.org > > 23.03.2015, 23:50, "Nikolay Mishin" : > > да я про ошибки в английском.. > > и их реакцию от habitat'ов > > то есть от носителей языка > > > > 23.03.2015, 23:47, "Александр Фокскул" : > >> Национальности не нужны. > >> > >> 23.03.2015 23:41 пользователь "Nikolay Mishin" написал: > >>> Привет MoscowPM! > >>> > >>> Читая irc лог pr-challenge > >>> порой натыкаешься на смешные диалоги, например о русских: > >>> > >>> http://irclog.perlgeek.de/pr-challenge/2015-02-04#i_10058766 > >>> > >>> 13:22 neilb vti: two Russian sign-ups already today! \o/ > >>> 13:23 vti neilb: how do you know? did you write in you in > russian? :D > >>> 13:23 *they > >>> 13:23 god.. so many typos > >>> 13:23 neilb yeah, what are you, typing in a foreign language or > something?! > >>> 13:25 vti neilb: i make lots of typos in russian too :) > >>> 13:27 neilb mee to > >>> 13:27 Well, they said “let me into the challenge, or I > break your fingers”, so I assumed they were Russian ;-) > >>> 13:27 vti neilb: i see > >>> 13:28 neilb also, the .ru domains and russian names were a hint > >>> 13:33 vti neilb: :) > >>> > >>> не знаю нужно ли переводить;) > >>> -- > >>> С уважением > >>> Николай Мишин > >>> > >>> -- > >>> Moscow.pm mailing list > >>> moscow-pm на pm.org | http://moscow.pm.org > >> , > >> > >> -- > >> Moscow.pm mailing list > >> moscow-pm на pm.org | http://moscow.pm.org > > > > -- > > С уважением > > Николай Мишин > > > > -- > > Moscow.pm mailing list > > moscow-pm на pm.org | http://moscow.pm.org > > -- > С уважением > Николай Мишин > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From chesnokov.ilya на gmail.com Tue Mar 24 02:12:44 2015 From: chesnokov.ilya на gmail.com (Ilya Chesnokov) Date: Tue, 24 Mar 2015 12:12:44 +0300 Subject: [Moscow.pm] two Russian sign-ups already today! ;) In-Reply-To: <4078491427144081@web23g.yandex.ru> References: <4073491427143276@web17g.yandex.ru> <3748481427143814@web29o.yandex.ru> <4078491427144081@web23g.yandex.ru> Message-ID: 23 марта 2015 г., 23:54 пользователь Nikolay Mishin написал: > я подозревал, что заголовок получится не очень корректным, учту это в следующий раз, > надо было : юмор на perl.irc.org Нормально все. Пойти что ли тоже подписаться. Да, и насчет ...or I break your fingers... надо запомнить. > 23.03.2015, 23:50, "Nikolay Mishin" : >> да я про ошибки в английском.. >> и их реакцию от habitat'ов >> то есть от носителей языка >> >> 23.03.2015, 23:47, "Александр Фокскул" : >>> Национальности не нужны. >>> >>> 23.03.2015 23:41 пользователь "Nikolay Mishin" написал: >>>> Привет MoscowPM! >>>> >>>> Читая irc лог pr-challenge >>>> порой натыкаешься на смешные диалоги, например о русских: >>>> >>>> http://irclog.perlgeek.de/pr-challenge/2015-02-04#i_10058766 >>>> >>>> 13:22 neilb vti: two Russian sign-ups already today! \o/ >>>> 13:23 vti neilb: how do you know? did you write in you in russian? :D >>>> 13:23 *they >>>> 13:23 god.. so many typos >>>> 13:23 neilb yeah, what are you, typing in a foreign language or something?! >>>> 13:25 vti neilb: i make lots of typos in russian too :) >>>> 13:27 neilb mee to >>>> 13:27 Well, they said “let me into the challenge, or I break your fingers”, so I assumed they were Russian ;-) >>>> 13:27 vti neilb: i see >>>> 13:28 neilb also, the .ru domains and russian names were a hint >>>> 13:33 vti neilb: :) >>>> >>>> не знаю нужно ли переводить;) >>>> -- >>>> С уважением >>>> Николай Мишин >>>> >>>> -- >>>> Moscow.pm mailing list >>>> moscow-pm на pm.org | http://moscow.pm.org >>> , >>> >>> -- >>> Moscow.pm mailing list >>> moscow-pm на pm.org | http://moscow.pm.org >> >> -- >> С уважением >> Николай Мишин >> >> -- >> Moscow.pm mailing list >> moscow-pm на pm.org | http://moscow.pm.org > > -- > С уважением > Николай Мишин > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org -- Best regards, Ilya Chesnokov From yu.pats на gmail.com Tue Mar 24 05:35:17 2015 From: yu.pats на gmail.com (Yury Pats) Date: Tue, 24 Mar 2015 15:35:17 +0300 Subject: [Moscow.pm] two Russian sign-ups already today! ;) In-Reply-To: <4073491427143276@web17g.yandex.ru> References: <4073491427143276@web17g.yandex.ru> Message-ID: Привет, у меня лично прикол в том, что получаю второй модуль, с которым ума не приложу что делать. Возможно, потому что не использую его. Может посоветует кто. https://github.com/tokuhirom/cpan-outdated который сам по себе выглядит outdated :) Копирайт в лицензии обновить чтоли? :) On Mon, Mar 23, 2015 at 11:41 PM, Nikolay Mishin wrote: > Привет MoscowPM! > > Читая irc лог pr-challenge > порой натыкаешься на смешные диалоги, например о русских: > > http://irclog.perlgeek.de/pr-challenge/2015-02-04#i_10058766 > > 13:22 neilb vti: two Russian sign-ups already today! \o/ > 13:23 vti neilb: how do you know? did you write in you in russian? :D > 13:23 *they > 13:23 god.. so many typos > 13:23 neilb yeah, what are you, typing in a foreign language or > something?! > 13:25 vti neilb: i make lots of typos in russian too :) > 13:27 neilb mee to > 13:27 Well, they said “let me into the challenge, or I break > your fingers”, so I assumed they were Russian ;-) > 13:27 vti neilb: i see > 13:28 neilb also, the .ru domains and russian names were a hint > 13:33 vti neilb: :) > > > не знаю нужно ли переводить;) > -- > С уважением > Николай Мишин > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > -- WBR, Yury Pats cellular: +375 (29) 5870723 ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From chesnokov.ilya на gmail.com Tue Mar 24 06:20:04 2015 From: chesnokov.ilya на gmail.com (Ilya Chesnokov) Date: Tue, 24 Mar 2015 16:20:04 +0300 Subject: [Moscow.pm] two Russian sign-ups already today! ;) In-Reply-To: References: <4073491427143276@web17g.yandex.ru> Message-ID: Пофикси что-нибудь из этого: https://github.com/tokuhirom/cpan-outdated/issues 24 марта 2015 г., 15:35 пользователь Yury Pats написал: > Привет, у меня лично прикол в том, что получаю второй модуль, с которым ума > не приложу что делать. Возможно, потому что не использую его. > > Может посоветует кто. https://github.com/tokuhirom/cpan-outdated который сам > по себе выглядит outdated :) > > Копирайт в лицензии обновить чтоли? :) > > > On Mon, Mar 23, 2015 at 11:41 PM, Nikolay Mishin wrote: >> >> Привет MoscowPM! >> >> Читая irc лог pr-challenge >> порой натыкаешься на смешные диалоги, например о русских: >> >> http://irclog.perlgeek.de/pr-challenge/2015-02-04#i_10058766 >> >> 13:22 neilb vti: two Russian sign-ups already today! \o/ >> 13:23 vti neilb: how do you know? did you write in you in russian? >> :D >> 13:23 *they >> 13:23 god.. so many typos >> 13:23 neilb yeah, what are you, typing in a foreign language or >> something?! >> 13:25 vti neilb: i make lots of typos in russian too :) >> 13:27 neilb mee to >> 13:27 Well, they said “let me into the challenge, or I break >> your fingers”, so I assumed they were Russian ;-) >> 13:27 vti neilb: i see >> 13:28 neilb also, the .ru domains and russian names were a hint >> 13:33 vti neilb: :) >> >> >> не знаю нужно ли переводить;) >> -- >> С уважением >> Николай Мишин >> >> -- >> Moscow.pm mailing list >> moscow-pm на pm.org | http://moscow.pm.org > > > > > -- > WBR, Yury Pats > cellular: +375 (29) 5870723 > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > -- Best regards, Ilya Chesnokov From yu.pats на gmail.com Tue Mar 24 07:29:02 2015 From: yu.pats на gmail.com (Yury Pats) Date: Tue, 24 Mar 2015 17:29:02 +0300 Subject: [Moscow.pm] two Russian sign-ups already today! ;) In-Reply-To: References: <4073491427143276@web17g.yandex.ru> Message-ID: Первое не фикс, а тотально все переписать. Второе да, надо проверить, попробовать воспроизвести. Удивительно то (или наоборот, не удивительно), что есть еще как минимум два модуля, делающие тоже самое. https://metacpan.org/pod/distribution/App-cpanoutdated-fresh/bin/cpan-outdated-fresh https://metacpan.org/pod/distribution/App-cpanoutdated-coro/script/cpan-outdated-coro Второй делает как бы все быстрее, но у него в зависимостях Coro (WAT?). Который так и не встал. Ну а первый умеет опцию --dev, которая запрашивается в одном из фича реквестов. Короче, смысл терзать этот труп? Работает и работает. И у меня такое чувство, что модулей таких в челендже дофига. 2015-03-24 16:20 GMT+03:00 Ilya Chesnokov : > Пофикси что-нибудь из этого: > https://github.com/tokuhirom/cpan-outdated/issues > > 24 марта 2015 г., 15:35 пользователь Yury Pats > написал: > > Привет, у меня лично прикол в том, что получаю второй модуль, с которым > ума > > не приложу что делать. Возможно, потому что не использую его. > > > > Может посоветует кто. https://github.com/tokuhirom/cpan-outdated > который сам > > по себе выглядит outdated :) > > > > Копирайт в лицензии обновить чтоли? :) > > > > > > On Mon, Mar 23, 2015 at 11:41 PM, Nikolay Mishin wrote: > >> > >> Привет MoscowPM! > >> > >> Читая irc лог pr-challenge > >> порой натыкаешься на смешные диалоги, например о русских: > >> > >> http://irclog.perlgeek.de/pr-challenge/2015-02-04#i_10058766 > >> > >> 13:22 neilb vti: two Russian sign-ups already today! \o/ > >> 13:23 vti neilb: how do you know? did you write in you in russian? > >> :D > >> 13:23 *they > >> 13:23 god.. so many typos > >> 13:23 neilb yeah, what are you, typing in a foreign language or > >> something?! > >> 13:25 vti neilb: i make lots of typos in russian too :) > >> 13:27 neilb mee to > >> 13:27 Well, they said “let me into the challenge, or I break > >> your fingers”, so I assumed they were Russian ;-) > >> 13:27 vti neilb: i see > >> 13:28 neilb also, the .ru domains and russian names were a hint > >> 13:33 vti neilb: :) > >> > >> > >> не знаю нужно ли переводить;) > >> -- > >> С уважением > >> Николай Мишин > >> > >> -- > >> Moscow.pm mailing list > >> moscow-pm на pm.org | http://moscow.pm.org > > > > > > > > > > -- > > WBR, Yury Pats > > cellular: +375 (29) 5870723 > > > > -- > > Moscow.pm mailing list > > moscow-pm на pm.org | http://moscow.pm.org > > > > > > -- > Best regards, > Ilya Chesnokov > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > -- WBR, Yury Pats cellular: +375 (29) 5870723 ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From mi на ya.ru Tue Mar 24 07:35:43 2015 From: mi на ya.ru (Nikolay Mishin) Date: Tue, 24 Mar 2015 17:35:43 +0300 Subject: [Moscow.pm] two Russian sign-ups already today! ;) In-Reply-To: References: <4073491427143276@web17g.yandex.ru> Message-ID: <1315641427207743@web9h.yandex.ru> класс, у этого хотя бы issue есть, есть задачи попроще у него http://cpants.cpanauthors.org/dist/cpan-outdated/errors 2 ошибки manifest_matches_dist ["MANIFEST (13) does not match dist (15):","Missing in MANIFEST: MANIFEST, META.yml","Missing in Dist: "] meta_json_conforms_to_known_spec Expected a list structure (license) [Validation: 2] добавь ему abstract https://github.com/mishin/cpan-outdated/commit/81e7244be36bfcc69f25b086956d6cfa10f2b985#diff-1fb3d9f4e1aa16148fe866f996b12c5e это повысит ему Kwalitee http://cpants.cpanauthors.org/author/TOKUHIROM 24.03.2015, 16:20, "Ilya Chesnokov" : > Пофикси что-нибудь из этого: https://github.com/tokuhirom/cpan-outdated/issues > > 24 марта 2015 г., 15:35 пользователь Yury Pats написал: >>  Привет, у меня лично прикол в том, что получаю второй модуль, с которым ума >>  не приложу что делать. Возможно, потому что не использую его. >> >>  Может посоветует кто. https://github.com/tokuhirom/cpan-outdated который сам >>  по себе выглядит outdated :) >> >>  Копирайт в лицензии обновить чтоли? :) >> >>  On Mon, Mar 23, 2015 at 11:41 PM, Nikolay Mishin wrote: >>>  Привет MoscowPM! >>> >>>  Читая irc лог pr-challenge >>>  порой натыкаешься на смешные диалоги, например о русских: >>> >>>  http://irclog.perlgeek.de/pr-challenge/2015-02-04#i_10058766 >>> >>>  13:22   neilb   vti: two Russian sign-ups already today! \o/ >>>  13:23   vti     neilb: how do you know? did you write in you in russian? >>>  :D >>>  13:23           *they >>>  13:23           god.. so many typos >>>  13:23   neilb   yeah, what are you, typing in a foreign language or >>>  something?! >>>  13:25   vti     neilb: i make lots of typos in russian too :) >>>  13:27   neilb   mee to >>>  13:27           Well, they said “let me into the challenge, or I break >>>  your fingers”, so I assumed they were Russian ;-) >>>  13:27   vti     neilb: i see >>>  13:28   neilb   also, the .ru domains and russian names were a hint >>>  13:33   vti     neilb: :) >>> >>>  не знаю нужно ли переводить;) >>>  -- >>>  С уважением >>>  Николай Мишин >>> >>>  -- >>>  Moscow.pm mailing list >>>  moscow-pm на pm.org | http://moscow.pm.org >>  -- >>  WBR, Yury Pats >>  cellular: +375 (29) 5870723 >> >>  -- >>  Moscow.pm mailing list >>  moscow-pm на pm.org | http://moscow.pm.org > > -- > Best regards, > Ilya Chesnokov > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org -- С уважением Николай Мишин From ruslan.zakirov на gmail.com Tue Mar 24 07:59:08 2015 From: ruslan.zakirov на gmail.com (Ruslan Zakirov) Date: Tue, 24 Mar 2015 17:59:08 +0300 Subject: [Moscow.pm] =?utf-8?b?Y3BhbnRzIEt3YWxpdGVlINC4INCy0YHQtSDQstGB?= =?utf-8?b?0LUg0LLRgdC1?= In-Reply-To: <8298761427059665@web20g.yandex.ru> References: <5236651426949535@web22g.yandex.ru> <6245551426970795@web3j.yandex.ru> <8298761427059665@web20g.yandex.ru> Message-ID: 2015-03-23 0:27 GMT+03:00 Nikolay Mishin : > perlcritic (ака PBP) порою устарел (и ему на смену пришел Kwalitee !!) ничего подобного. Kwalitee - это субъективная оценка качества дистрибутива, а не кода в нем. -- Best regards, Ruslan. ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From yu.pats на gmail.com Tue Mar 24 11:41:30 2015 From: yu.pats на gmail.com (Yury Pats) Date: Tue, 24 Mar 2015 21:41:30 +0300 Subject: [Moscow.pm] two Russian sign-ups already today! ;) In-Reply-To: <1315641427207743@web9h.yandex.ru> References: <4073491427143276@web17g.yandex.ru> <1315641427207743@web9h.yandex.ru> Message-ID: Спасибо! Это реально win! Ситуация из тех, которые называются: придумай себе работу :) 2015-03-24 17:35 GMT+03:00 Nikolay Mishin : > класс, у этого хотя бы issue есть, > есть задачи попроще > у него > http://cpants.cpanauthors.org/dist/cpan-outdated/errors > > 2 ошибки > > manifest_matches_dist ["MANIFEST (13) does not match dist > (15):","Missing in MANIFEST: MANIFEST, META.yml","Missing in Dist: "] > meta_json_conforms_to_known_spec Expected a list structure > (license) [Validation: 2] > > добавь ему abstract > > > https://github.com/mishin/cpan-outdated/commit/81e7244be36bfcc69f25b086956d6cfa10f2b985#diff-1fb3d9f4e1aa16148fe866f996b12c5e > > это повысит ему Kwalitee > http://cpants.cpanauthors.org/author/TOKUHIROM > > 24.03.2015, 16:20, "Ilya Chesnokov" : > > Пофикси что-нибудь из этого: > https://github.com/tokuhirom/cpan-outdated/issues > > > > 24 марта 2015 г., 15:35 пользователь Yury Pats > написал: > >> Привет, у меня лично прикол в том, что получаю второй модуль, с > которым ума > >> не приложу что делать. Возможно, потому что не использую его. > >> > >> Может посоветует кто. https://github.com/tokuhirom/cpan-outdated > который сам > >> по себе выглядит outdated :) > >> > >> Копирайт в лицензии обновить чтоли? :) > >> > >> On Mon, Mar 23, 2015 at 11:41 PM, Nikolay Mishin wrote: > >>> Привет MoscowPM! > >>> > >>> Читая irc лог pr-challenge > >>> порой натыкаешься на смешные диалоги, например о русских: > >>> > >>> http://irclog.perlgeek.de/pr-challenge/2015-02-04#i_10058766 > >>> > >>> 13:22 neilb vti: two Russian sign-ups already today! \o/ > >>> 13:23 vti neilb: how do you know? did you write in you in > russian? > >>> :D > >>> 13:23 *they > >>> 13:23 god.. so many typos > >>> 13:23 neilb yeah, what are you, typing in a foreign language or > >>> something?! > >>> 13:25 vti neilb: i make lots of typos in russian too :) > >>> 13:27 neilb mee to > >>> 13:27 Well, they said “let me into the challenge, or I break > >>> your fingers”, so I assumed they were Russian ;-) > >>> 13:27 vti neilb: i see > >>> 13:28 neilb also, the .ru domains and russian names were a hint > >>> 13:33 vti neilb: :) > >>> > >>> не знаю нужно ли переводить;) > >>> -- > >>> С уважением > >>> Николай Мишин > >>> > >>> -- > >>> Moscow.pm mailing list > >>> moscow-pm на pm.org | http://moscow.pm.org > >> -- > >> WBR, Yury Pats > >> cellular: +375 (29) 5870723 > >> > >> -- > >> Moscow.pm mailing list > >> moscow-pm на pm.org | http://moscow.pm.org > > > > -- > > Best regards, > > Ilya Chesnokov > > -- > > Moscow.pm mailing list > > moscow-pm на pm.org | http://moscow.pm.org > > -- > С уважением > Николай Мишин > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > -- WBR, Yury Pats cellular: +375 (29) 5870723 ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From mi на ya.ru Tue Mar 24 15:59:08 2015 From: mi на ya.ru (Nikolay Mishin) Date: Wed, 25 Mar 2015 01:59:08 +0300 Subject: [Moscow.pm] =?koi8-r?b?Y3BhbnRzIEt3YWxpdGVlIMkg19PFINfTxSDX08U=?= In-Reply-To: References: <5236651426949535@web22g.yandex.ru> <6245551426970795@web3j.yandex.ru> <8298761427059665@web20g.yandex.ru> Message-ID: <2183591427237948@web26j.yandex.ru> да, Руслан, ты прав, кстати мой perlcritic cat .perlcriticrc [-Documentation::RequirePodSections] [-Documentation::PodSpelling] [-InputOutput::RequireCheckedSyscalls] [-Documentation::RequirePodLinksIncludeText] 24.03.2015, 17:59, "Ruslan Zakirov" : > 2015-03-23 0:27 GMT+03:00 Nikolay Mishin : >> perlcritic (ака PBP) порою устарел (и ему на смену пришел Kwalitee !!) > > ничего подобного. Kwalitee - это субъективная оценка качества дистрибутива, а не кода в нем. > > -- > Best regards, Ruslan. > > , > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org -- С уважением Николай Мишин From mi на ya.ru Thu Mar 26 02:50:24 2015 From: mi на ya.ru (Nikolay Mishin) Date: Thu, 26 Mar 2015 12:50:24 +0300 Subject: [Moscow.pm] just /join #moscowpm irc Message-ID: <6024941427363424@web30h.yandex.ru> Дорогой MoscowPM я тут выяснил, что для создания нового канала irc нужно просто сказать на irc.perl.org /join #moscowpm и тогда я себе добавил в дистрибутив ссылку на этот канал https://metacpan.org/release/MISHIN/POD2-RU-5.18.0.1.43 прикольно, вот, можно там на русском пообщаться или на #perlru в общем название канала произвольное, главное, чтобы об этом знали другие;) -- С уважением Николай Мишин From chesnokov.ilya на gmail.com Thu Mar 26 03:05:59 2015 From: chesnokov.ilya на gmail.com (Ilya Chesnokov) Date: Thu, 26 Mar 2015 13:05:59 +0300 Subject: [Moscow.pm] just /join #moscowpm irc In-Reply-To: <6024941427363424@web30h.yandex.ru> References: <6024941427363424@web30h.yandex.ru> Message-ID: Привет. Ну вообще-то уже давно существует канал #ru.pm :) 26 марта 2015 г., 12:50 пользователь Nikolay Mishin написал: > Дорогой MoscowPM > > я тут выяснил, что для создания нового канала irc > нужно просто сказать на irc.perl.org > /join #moscowpm > > и тогда я себе добавил в дистрибутив ссылку на этот канал > https://metacpan.org/release/MISHIN/POD2-RU-5.18.0.1.43 > > прикольно, вот, > можно там на русском пообщаться > или на #perlru в общем название канала произвольное, > главное, чтобы об этом знали другие;) > > -- > С уважением > Николай Мишин > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org -- Best regards, Ilya Chesnokov From mi на ya.ru Thu Mar 26 03:13:38 2015 From: mi на ya.ru (Nikolay Mishin) Date: Thu, 26 Mar 2015 13:13:38 +0300 Subject: [Moscow.pm] just /join #moscowpm irc In-Reply-To: References: <6024941427363424@web30h.yandex.ru> Message-ID: <5564851427364818@web5o.yandex.ru> Илья, спасибо, а я и не знал, зато на #moscowpm уже 4 человека;)) а на #ru.pm - я один 26.03.2015, 13:06, "Ilya Chesnokov" : > Привет. > > Ну вообще-то уже давно существует канал #ru.pm :) > > 26 марта 2015 г., 12:50 пользователь Nikolay Mishin написал: >>  Дорогой MoscowPM >> >>  я тут выяснил, что для создания нового канала irc >>  нужно просто сказать на irc.perl.org >>  /join #moscowpm >> >>  и тогда я себе добавил в дистрибутив ссылку на этот канал >>  https://metacpan.org/release/MISHIN/POD2-RU-5.18.0.1.43 >> >>  прикольно, вот, >>  можно там на русском пообщаться >>  или на #perlru в общем название канала произвольное, >>  главное, чтобы об этом знали другие;) >> >>  -- >>  С уважением >>  Николай Мишин >> >>  -- >>  Moscow.pm mailing list >>  moscow-pm на pm.org | http://moscow.pm.org > > -- > Best regards, > Ilya Chesnokov > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org -- С уважением Николай Мишин From pef-secure на yandex.ru Thu Mar 26 04:00:49 2015 From: pef-secure на yandex.ru (PEF Secure) Date: Thu, 26 Mar 2015 12:00:49 +0100 Subject: [Moscow.pm] just /join #moscowpm irc In-Reply-To: <5564851427364818@web5o.yandex.ru> References: <6024941427363424@web30h.yandex.ru> <5564851427364818@web5o.yandex.ru> Message-ID: <2916350.q17X9pqVlM@rawen> On Thursday, March 26, 2015 13:13:38 Nikolay Mishin wrote: > Илья, спасибо, а я и не знал, > зато на #moscowpm уже 4 человека;)) > а на #ru.pm - я один Определитесь с каналом, тогда может народ и потянется. -- PEF Developer From maxim.vuets на gmail.com Thu Mar 26 04:06:20 2015 From: maxim.vuets на gmail.com (Maxim Vuets) Date: Thu, 26 Mar 2015 12:06:20 +0100 Subject: [Moscow.pm] just /join #moscowpm irc In-Reply-To: <5564851427364818@web5o.yandex.ru> References: <6024941427363424@web30h.yandex.ru> <5564851427364818@web5o.yandex.ru> Message-ID: 2015-03-26 11:13 GMT+01:00 Nikolay Mishin : > а на #ru.pm - я один Ты уверен, что ты подключился по нужному адресу и серверу? Я зашёл через веб-интерфейс только что и насчитал 28 человек: http://irc.pragmaticperl.com/ From mi на ya.ru Thu Mar 26 06:10:35 2015 From: mi на ya.ru (Nikolay Mishin) Date: Thu, 26 Mar 2015 16:10:35 +0300 Subject: [Moscow.pm] just /join #moscowpm irc In-Reply-To: References: <6024941427363424@web30h.yandex.ru> <5564851427364818@web5o.yandex.ru> Message-ID: <301281427375435@web14o.yandex.ru> о, классный интерфейс у http://irc.pragmaticperl.com/ да, я ошибся каналом, там действительно много народу 26.03.2015, 14:06, "Maxim Vuets" : > 2015-03-26 11:13 GMT+01:00 Nikolay Mishin : >>  а на #ru.pm - я один > > Ты уверен, что ты подключился по нужному адресу и серверу? Я зашёл > через веб-интерфейс только что и насчитал 28 человек: > http://irc.pragmaticperl.com/ > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org -- С уважением Николай Мишин From pef-secure на yandex.ru Sat Mar 28 09:07:13 2015 From: pef-secure на yandex.ru (PEF Secure) Date: Sat, 28 Mar 2015 17:07:13 +0100 Subject: [Moscow.pm] get own source code Message-ID: <2694412.EXZz7WL7pf@rawen> Hi, прошу направить меня на путь. Хочется получить собственный исполняемый код, который виден интерпретатору. Нужен буквальный код, на который ссылается интерпретатор, когда говорит "такая то ошибка в такой то строке". Дело не решается чтением исходного кода соответствующего файла с диска, поскольку речь идёт о "фильтрованном" коде. Вот надуманный пример: package TestFilter; use Filter::Simple; FILTER_ONLY code => sub { s/\bIF\b(.*?) THEN/if($1){/g; s/\bELSE\b/} else {/g; s/\bEND IF\b/}/g; s/\bEND\b/}/g; }; 1; use TestFilter; use v5.018; eval { IF 1 == 2 THEN say "impossible" ELSE say "yes" END IF }; Если внутри eval-а будет ошибка, то хочется увидеть тот самый код, что там исполнялся интерпретатором перла. -- PEF Developer From i.petro.77.00 на gmail.com Sat Mar 28 11:11:44 2015 From: i.petro.77.00 на gmail.com (Ivan Petrov) Date: Sat, 28 Mar 2015 21:11:44 +0300 Subject: [Moscow.pm] get own source code In-Reply-To: <2694412.EXZz7WL7pf@rawen> References: <2694412.EXZz7WL7pf@rawen> Message-ID: <20150328181144.GB31680@vdsl.uvw.ru> > Hi, > прошу направить меня на путь. > Хочется получить собственный исполняемый код, который виден интерпретатору. > Нужен буквальный код, на который ссылается интерпретатор, когда говорит "такая > то ошибка в такой то строке". Дело не решается чтением исходного кода > соответствующего файла с диска, поскольку речь идёт о "фильтрованном" коде. > Вот надуманный пример: > package TestFilter; > use Filter::Simple; > FILTER_ONLY code => sub { > s/\bIF\b(.*?) THEN/if($1){/g; > s/\bELSE\b/} else {/g; > s/\bEND IF\b/}/g; > s/\bEND\b/}/g; > }; > 1; > use TestFilter; > use v5.018; > eval { IF 1 == 2 THEN say "impossible" ELSE say "yes" END IF }; > Если внутри eval-а будет ошибка, то хочется увидеть тот самый код, что там > исполнялся интерпретатором перла. Лучше всего копать в направлении PerlEmbedded. можно например взять за основу Mojo::Template From pef-secure на yandex.ru Sat Mar 28 13:39:59 2015 From: pef-secure на yandex.ru (PEF Secure) Date: Sat, 28 Mar 2015 21:39:59 +0100 Subject: [Moscow.pm] get own source code In-Reply-To: <20150328181144.GB31680@vdsl.uvw.ru> References: <2694412.EXZz7WL7pf@rawen> <20150328181144.GB31680@vdsl.uvw.ru> Message-ID: <1595033.PiB3axxO37@rawen> On Saturday, March 28, 2015 21:11:44 Ivan Petrov wrote: > > eval { IF 1 == 2 THEN say "impossible" ELSE say "yes" END IF }; > > > > Если внутри eval-а будет ошибка, то хочется увидеть тот самый код, что там > > исполнялся интерпретатором перла. > > Лучше всего копать в направлении PerlEmbedded. > можно например взять за основу Mojo::Template Если выглядит так, что я пытаюсь изобрести таким образом язык шаблонов, то это неверно. Пример был надуманным. PerlEmbedded -- не могу понять каким образом он имеет отношение к моему вопросу. -- PEF Developer From i.petro.77.00 на gmail.com Sat Mar 28 13:46:09 2015 From: i.petro.77.00 на gmail.com (Ivan Petrov) Date: Sat, 28 Mar 2015 23:46:09 +0300 Subject: [Moscow.pm] get own source code In-Reply-To: <1595033.PiB3axxO37@rawen> References: <2694412.EXZz7WL7pf@rawen> <20150328181144.GB31680@vdsl.uvw.ru> <1595033.PiB3axxO37@rawen> Message-ID: <20150328204609.GC31680@vdsl.uvw.ru> >>> eval { IF 1 == 2 THEN say "impossible" ELSE say "yes" END IF }; >>> >>> Если внутри eval-а будет ошибка, то хочется увидеть тот самый код, что там >>> исполнялся интерпретатором перла. >> >> Лучше всего копать в направлении PerlEmbedded. >> можно например взять за основу Mojo::Template > Если выглядит так, что я пытаюсь изобрести таким образом язык шаблонов, то это > неверно. Я понял это именно так > Пример был надуманным. PerlEmbedded -- не могу понять каким образом > он имеет отношение к моему вопросу. уточните вопрос тогда, я нифига не понял в примере не перловый код а какого-то другого языка From pavelfk3 на mail.ru Sat Mar 28 20:55:30 2015 From: pavelfk3 на mail.ru (=?UTF-8?B?0KTRgNC+0LvQvtCyINCf0LDQstC10Ls=?=) Date: Sun, 29 Mar 2015 07:55:30 +0400 Subject: [Moscow.pm] get own source code In-Reply-To: <2694412.EXZz7WL7pf@rawen> References: <2694412.EXZz7WL7pf@rawen> Message-ID: <551777B2.9030308@mail.ru> 28.03.2015 20:07, PEF Secure пишет: > Hi, > > прошу направить меня на путь. > > Хочется получить собственный исполняемый код, который виден интерпретатору. > Нужен буквальный код, на который ссылается интерпретатор, когда говорит "такая > то ошибка в такой то строке". Дело не решается чтением исходного кода > соответствующего файла с диска, поскольку речь идёт о "фильтрованном" коде. > Вот надуманный пример: > > package TestFilter; > use Filter::Simple; > FILTER_ONLY code => sub { > s/\bIF\b(.*?) THEN/if($1){/g; > s/\bELSE\b/} else {/g; > s/\bEND IF\b/}/g; > s/\bEND\b/}/g; > }; > 1; > > use TestFilter; > use v5.018; > > eval { IF 1 == 2 THEN say "impossible" ELSE say "yes" END IF }; > > Если внутри eval-а будет ошибка, то хочется увидеть тот самый код, что там > исполнялся интерпретатором перла. sub _get_file_line { my ( $filename, $line_number ) = @_; # http://docstore.mik.ua/orelly/perl/cookbook/ch08_09.htm open( my $source_fh, "<", $filename ) or die "cannot open < $filename: $!"; $line_string = undef; $. = 0; do { $line_string = <$source_fh> } until $. == $line_number || eof; close( $source_fh ) || warn "close failed: $!"; return $line_string; } my $source_file = (caller(0))[1]; my $source_line = (caller(0))[2]; _get_file_line( $source_file, $source_line ) From shafiev на gmail.com Sun Mar 29 03:00:17 2015 From: shafiev на gmail.com (Naim Sh) Date: Sun, 29 Mar 2015 15:00:17 +0500 Subject: [Moscow.pm] =?utf-8?b?0L/QvtC00YHQutCw0LbQuNGC0LUg0L/RgNC+0YE=?= =?utf-8?b?0YLQtdC50YjRg9GOINGA0LXQsNC70LjQt9Cw0YbQuNGPINGE0LDQudC70L4=?= =?utf-8?b?0LLQvtC5INCR0JQ=?= Message-ID: <5517CD31.90008@gmail.com> Добрый день/вечер любимый .pm . Подскажите пример,а лучше готовый модуль(не хочется городить еще один велосипед) для решения след задачи,хранения в текстовом виде 3 пар данных - 128 байт , 128 байт, 64 байт : 1. Простейший текстовой файл, который в случае чего можно будет руками подправить. 2. Скорость,чтобы на 10к записях не сильно тормозило. Времени ответа хватит и районе 1 секунды.Думаю на таких обьемах ,ничего не будет тормозить) 3. Простота использования 4. Поддержка уникальности значений первых двух пар . ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From snelius на tsu.ru Sun Mar 29 03:23:18 2015 From: snelius на tsu.ru (snelius на tsu.ru) Date: Sun, 29 Mar 2015 16:23:18 +0600 Subject: [Moscow.pm] =?utf-8?b?0L/QvtC00YHQutCw0LbQuNGC0LUg0L/RgNC+0YE=?= =?utf-8?b?0YLQtdC50YjRg9GOINGA0LXQsNC70LjQt9Cw0YbQuNGPINGE0LDQudC7?= =?utf-8?b?0L7QstC+0Lkg0JHQlA==?= In-Reply-To: <5517CD31.90008@gmail.com> References: <5517CD31.90008@gmail.com> Message-ID: <025701d06a0a$60df2b80$229d8280$@tsu.ru> Sqite ? J From: Moscow-pm [mailto:moscow-pm-bounces+snelius=tsu.ru на pm.org] On Behalf Of Naim Sh Sent: Sunday, March 29, 2015 4:00 PM To: Moscow.pm group Subject: [Moscow.pm] подскажите простейшую реализация файловой БД Добрый день/вечер любимый .pm . Подскажите пример,а лучше готовый модуль(не хочется городить еще один велосипед) для решения след задачи,хранения в текстовом виде 3 пар данных - 128 байт , 128 байт, 64 байт : 1. Простейший текстовой файл, который в случае чего можно будет руками подправить. 2. Скорость,чтобы на 10к записях не сильно тормозило. Времени ответа хватит и районе 1 секунды.Думаю на таких обьемах ,ничего не будет тормозить) 3. Простота использования 4. Поддержка уникальности значений первых двух пар . ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From shafiev на gmail.com Sun Mar 29 03:55:27 2015 From: shafiev на gmail.com (Naim Shafiev) Date: Sun, 29 Mar 2015 15:55:27 +0500 Subject: [Moscow.pm] =?utf-8?b?0L/QvtC00YHQutCw0LbQuNGC0LUg0L/RgNC+0YE=?= =?utf-8?b?0YLQtdC50YjRg9GOINGA0LXQsNC70LjQt9Cw0YbQuNGPINGE0LDQudC7?= =?utf-8?b?0L7QstC+0Lkg0JHQlA==?= In-Reply-To: <025701d06a0a$60df2b80$229d8280$@tsu.ru> References: <5517CD31.90008@gmail.com> <025701d06a0a$60df2b80$229d8280$@tsu.ru> Message-ID: да я сразу смотрел в сторону sqlite подобных решений .но как мне кажется для этой микрозадачи это черезчур. On Mar 29, 2015 3:24 PM, wrote: > Sqite ? J > > > > *From:* Moscow-pm [mailto:moscow-pm-bounces+snelius=tsu.ru на pm.org] *On > Behalf Of *Naim Sh > *Sent:* Sunday, March 29, 2015 4:00 PM > *To:* Moscow.pm group > *Subject:* [Moscow.pm] подскажите простейшую реализация файловой БД > > > > Добрый день/вечер любимый .pm . Подскажите пример,а лучше готовый > модуль(не хочется городить еще один велосипед) для решения след > задачи,хранения в текстовом виде 3 пар данных - 128 байт , 128 байт, 64 > байт : > > 1. Простейший текстовой файл, который в случае чего можно будет руками > подправить. > 2. Скорость,чтобы на 10к записях не сильно тормозило. Времени ответа > хватит и районе 1 секунды.Думаю на таких обьемах ,ничего не будет тормозить) > 3. Простота использования > 4. Поддержка уникальности значений первых двух пар . > > > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > > ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From pef-secure на yandex.ru Sun Mar 29 08:30:17 2015 From: pef-secure на yandex.ru (PEF Secure) Date: Sun, 29 Mar 2015 17:30:17 +0200 Subject: [Moscow.pm] get own source code In-Reply-To: <20150328204609.GC31680@vdsl.uvw.ru> References: <2694412.EXZz7WL7pf@rawen> <1595033.PiB3axxO37@rawen> <20150328204609.GC31680@vdsl.uvw.ru> Message-ID: <1634236.cRxiR0Irvg@rawen> On Saturday, March 28, 2015 23:46:09 Ivan Petrov wrote: > >>> eval { IF 1 == 2 THEN say "impossible" ELSE say "yes" END IF }; > >>> > >>> Если внутри eval-а будет ошибка, то хочется увидеть тот самый код, что > >>> там > >>> исполнялся интерпретатором перла. > >> > >> Лучше всего копать в направлении PerlEmbedded. > >> можно например взять за основу Mojo::Template > > > > Если выглядит так, что я пытаюсь изобрести таким образом язык шаблонов, то > > это неверно. > > Я понял это именно так > > > Пример был надуманным. PerlEmbedded -- не могу понять каким образом > > он имеет отношение к моему вопросу. > > уточните вопрос тогда, я нифига не понял > в примере не перловый код а какого-то другого языка Вы не поверите. Но этот код исполняется программой /usr/bin/perl. Попробуйте. Если внимательно посмотреть на изначальное сообщение, там приведён рабочий пример. -- PEF Developer From pef-secure на yandex.ru Sun Mar 29 08:33:06 2015 From: pef-secure на yandex.ru (PEF Secure) Date: Sun, 29 Mar 2015 17:33:06 +0200 Subject: [Moscow.pm] get own source code In-Reply-To: <551777B2.9030308@mail.ru> References: <2694412.EXZz7WL7pf@rawen> <551777B2.9030308@mail.ru> Message-ID: <3117920.d2ZG5i0ltT@rawen> On Sunday, March 29, 2015 07:55:30 Фролов Павел wrote: > sub _get_file_line > { > my ( $filename, $line_number ) = @_; > # http://docstore.mik.ua/orelly/perl/cookbook/ch08_09.htm > open( my $source_fh, "<", $filename ) or die "cannot open < > $filename: $!"; > $line_string = undef; > $. = 0; > do { $line_string = <$source_fh> } until $. == $line_number || eof; > close( $source_fh ) || warn "close failed: $!"; > return $line_string; > } > > my $source_file = (caller(0))[1]; > my $source_line = (caller(0))[2]; > > _get_file_line( $source_file, $source_line ) Прочитать файл построчно не является для меня проблемой. Вопрос в том, чтобы видеть не тот код, что был прочитан с диска, а тот, что исполнялся интерпретатором. Посмотрите внимательно моё начальное сообщение темы. -- PEF Developer From maxim.vuets на gmail.com Sun Mar 29 11:05:37 2015 From: maxim.vuets на gmail.com (Maxim Vuets) Date: Sun, 29 Mar 2015 20:05:37 +0200 Subject: [Moscow.pm] get own source code In-Reply-To: <2694412.EXZz7WL7pf@rawen> References: <2694412.EXZz7WL7pf@rawen> Message-ID: 2015-03-28 17:07 GMT+01:00 PEF Secure : > Хочется получить собственный исполняемый код, который виден интерпретатору. > Нужен буквальный код, на который ссылается интерпретатор, когда говорит "такая > то ошибка в такой то строке". Дело не решается чтением исходного кода > соответствующего файла с диска, поскольку речь идёт о "фильтрованном" коде. Это невозможно в чистом виде. Интерпретатор не выполняет текст программы. Он прежде компилирует её в специальное внутренне представление. Если вы компилируете код на лету, или модифицируете программу во время исполнения, то и "буквального кода" у вас нет. Можно попробовать декомпилировать внутренне представление братно в текст программы. Но он будет достаточно приблеженным и не обязательно удобно-читаемым. Вот вам привет для вдохновления: $ perl -MB::Deparse -E 'my $f = eval "sub {shift() + shift()}"; # компилируем строку во время исполнения \ say $f->(2, 3); # проверяем \ my $d = B::Deparse->new; say $d->coderef2text($f); # декомпилируем' 5 { use feature 'current_sub', 'evalbytes', 'fc', 'say', 'state', 'switch', 'unicode_strings', 'unicode_eval'; (shift()) + (shift()); } Вы какую задачу решить пытаетесь-то? From maxim.vuets на gmail.com Sun Mar 29 11:10:54 2015 From: maxim.vuets на gmail.com (Maxim Vuets) Date: Sun, 29 Mar 2015 20:10:54 +0200 Subject: [Moscow.pm] =?utf-8?b?0L/QvtC00YHQutCw0LbQuNGC0LUg0L/RgNC+0YE=?= =?utf-8?b?0YLQtdC50YjRg9GOINGA0LXQsNC70LjQt9Cw0YbQuNGPINGE0LDQudC7?= =?utf-8?b?0L7QstC+0Lkg0JHQlA==?= In-Reply-To: References: <5517CD31.90008@gmail.com> <025701d06a0a$60df2b80$229d8280$@tsu.ru> Message-ID: 2015-03-29 12:55 GMT+02:00 Naim Shafiev : > да я сразу смотрел в сторону sqlite подобных решений .но как мне кажется для > этой микрозадачи это черезчур. Если укладывается в требования, то берите. Сэкономите силы и нервы на поддержке и отладке. "можно будет руками подправить" и "поддержка уникальности значений первых двух пар" --- это уже не тривиально и сильно зависит от вашего конкретного случая. Берите простое готовое и меняйте/улучшайте/ищите альтернативы, *если* потом возникнет потребность. From i.petro.77.00 на gmail.com Sun Mar 29 11:54:13 2015 From: i.petro.77.00 на gmail.com (Ivan Petrov) Date: Sun, 29 Mar 2015 21:54:13 +0300 Subject: [Moscow.pm] get own source code In-Reply-To: <1634236.cRxiR0Irvg@rawen> References: <2694412.EXZz7WL7pf@rawen> <1595033.PiB3axxO37@rawen> <20150328204609.GC31680@vdsl.uvw.ru> <1634236.cRxiR0Irvg@rawen> Message-ID: <20150329185413.GB28832@vdsl.uvw.ru> > Вы не поверите. Но этот код исполняется программой /usr/bin/perl. Попробуйте. > Если внимательно посмотреть на изначальное сообщение, там приведён рабочий > пример. а ну да, я эти извращения с фильтрами кода когда-то видел уже. вычищали из одного проекта, а теперь позабыл совсем что это бывает From zhecka на gmail.com Sun Mar 29 12:15:47 2015 From: zhecka на gmail.com (zhecka) Date: Sun, 29 Mar 2015 22:15:47 +0300 Subject: [Moscow.pm] =?utf-8?b?0L/QvtC00YHQutCw0LbQuNGC0LUg0L/RgNC+0YE=?= =?utf-8?b?0YLQtdC50YjRg9GOINGA0LXQsNC70LjQt9Cw0YbQuNGPINGE0LDQudC70L4=?= =?utf-8?b?0LLQvtC5INCR0JQ=?= In-Reply-To: <5517CD31.90008@gmail.com> References: <5517CD31.90008@gmail.com> Message-ID: <55184F63.3080106@gmail.com> On 29.03.2015 13:00, Naim Sh wrote: > Добрый день/вечер любимый .pm . Подскажите пример,а лучше готовый > модуль(не хочется городить еще один велосипед) для решения след > задачи,хранения в текстовом виде 3 пар данных - 128 байт , 128 байт, > 64 байт : > > 1. Простейший текстовой файл, который в случае чего можно будет > руками подправить. > 2. Скорость,чтобы на 10к записях не сильно тормозило. Времени ответа > хватит и районе 1 секунды.Думаю на таких обьемах ,ничего не будет > тормозить) > 3. Простота использования > 4. Поддержка уникальности значений первых двух пар . > селекты будут ? или тупо пара ключ-значение ? p5-Cache-FastMmap не поможет ? ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From mail на knutov.com Sun Mar 29 19:51:46 2015 From: mail на knutov.com (Nick Knutov) Date: Mon, 30 Mar 2015 07:51:46 +0500 Subject: [Moscow.pm] =?utf-8?b?0L/QvtC00YHQutCw0LbQuNGC0LUg0L/RgNC+0YE=?= =?utf-8?b?0YLQtdC50YjRg9GOINGA0LXQsNC70LjQt9Cw0YbQuNGPINGE0LDQudC70L4=?= =?utf-8?b?0LLQvtC5INCR0JQ=?= In-Reply-To: <5517CD31.90008@gmail.com> References: <5517CD31.90008@gmail.com> Message-ID: <5518BA42.9040005@knutov.com> https://metacpan.org/pod/Sprite Про уникальность только не уверен. 29.03.2015 15:00, Naim Sh пишет: > Добрый день/вечер любимый .pm . Подскажите пример,а лучше готовый > модуль(не хочется городить еще один велосипед) для решения след > задачи,хранения в текстовом виде 3 пар данных - 128 байт , 128 байт, > 64 байт : > > 1. Простейший текстовой файл, который в случае чего можно будет > руками подправить. > 2. Скорость,чтобы на 10к записях не сильно тормозило. Времени ответа > хватит и районе 1 секунды.Думаю на таких обьемах ,ничего не будет > тормозить) > 3. Простота использования > 4. Поддержка уникальности значений первых двух пар . > -- Best Regards, Nick Knutov http://knutov.com ICQ: 272873706 Voice: +7-904-84-23-130 ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From shafiev на gmail.com Sun Mar 29 21:07:11 2015 From: shafiev на gmail.com (Naim Shafiev) Date: Mon, 30 Mar 2015 09:07:11 +0500 Subject: [Moscow.pm] =?utf-8?b?0L/QvtC00YHQutCw0LbQuNGC0LUg0L/RgNC+0YE=?= =?utf-8?b?0YLQtdC50YjRg9GOINGA0LXQsNC70LjQt9Cw0YbQuNGPINGE0LDQudC7?= =?utf-8?b?0L7QstC+0Lkg0JHQlA==?= In-Reply-To: <55184F63.3080106@gmail.com> References: <5517CD31.90008@gmail.com> <55184F63.3080106@gmail.com> Message-ID: Да там, будет смотреться первое значение( в данном случае MAC адрес) и время ( третий параметр) и выдаваться ип. 30 марта 2015 г., 0:15 пользователь zhecka написал: > On 29.03.2015 13:00, Naim Sh wrote: > > Добрый день/вечер любимый .pm . Подскажите пример,а лучше готовый > модуль(не хочется городить еще один велосипед) для решения след > задачи,хранения в текстовом виде 3 пар данных - 128 байт , 128 байт, 64 > байт : > > 1. Простейший текстовой файл, который в случае чего можно будет руками > подправить. > 2. Скорость,чтобы на 10к записях не сильно тормозило. Времени ответа > хватит и районе 1 секунды.Думаю на таких обьемах ,ничего не будет тормозить) > 3. Простота использования > 4. Поддержка уникальности значений первых двух пар . > > селекты будут ? или тупо пара ключ-значение ? > p5-Cache-FastMmap не поможет ? > > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > > ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From shafiev на gmail.com Sun Mar 29 21:07:51 2015 From: shafiev на gmail.com (Naim Shafiev) Date: Mon, 30 Mar 2015 09:07:51 +0500 Subject: [Moscow.pm] =?utf-8?b?0L/QvtC00YHQutCw0LbQuNGC0LUg0L/RgNC+0YE=?= =?utf-8?b?0YLQtdC50YjRg9GOINGA0LXQsNC70LjQt9Cw0YbQuNGPINGE0LDQudC7?= =?utf-8?b?0L7QstC+0Lkg0JHQlA==?= In-Reply-To: <5518BA42.9040005@knutov.com> References: <5517CD31.90008@gmail.com> <5518BA42.9040005@knutov.com> Message-ID: Древненький , видно замена на тот момент sqlite ;) Посмотрю и его тоже 30 марта 2015 г., 7:51 пользователь Nick Knutov написал: > https://metacpan.org/pod/Sprite > > Про уникальность только не уверен. > > 29.03.2015 15:00, Naim Sh пишет: > > Добрый день/вечер любимый .pm . Подскажите пример,а лучше готовый > модуль(не хочется городить еще один велосипед) для решения след > задачи,хранения в текстовом виде 3 пар данных - 128 байт , 128 байт, 64 > байт : > > 1. Простейший текстовой файл, который в случае чего можно будет руками > подправить. > 2. Скорость,чтобы на 10к записях не сильно тормозило. Времени ответа > хватит и районе 1 секунды.Думаю на таких обьемах ,ничего не будет тормозить) > 3. Простота использования > 4. Поддержка уникальности значений первых двух пар . > > > -- > Best Regards, > Nick Knutovhttp://knutov.com > ICQ: 272873706 > Voice: +7-904-84-23-130 > > > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > > ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From shafiev на gmail.com Sun Mar 29 21:10:27 2015 From: shafiev на gmail.com (Naim Shafiev) Date: Mon, 30 Mar 2015 09:10:27 +0500 Subject: [Moscow.pm] =?utf-8?b?0L/QvtC00YHQutCw0LbQuNGC0LUg0L/RgNC+0YE=?= =?utf-8?b?0YLQtdC50YjRg9GOINGA0LXQsNC70LjQt9Cw0YbQuNGPINGE0LDQudC7?= =?utf-8?b?0L7QstC+0Lkg0JHQlA==?= In-Reply-To: References: <5517CD31.90008@gmail.com> <025701d06a0a$60df2b80$229d8280$@tsu.ru> Message-ID: Это решение честно говоря,временное, и не хочеться особо все накручивать . 29 марта 2015 г., 23:10 пользователь Maxim Vuets написал: > 2015-03-29 12:55 GMT+02:00 Naim Shafiev : > > да я сразу смотрел в сторону sqlite подобных решений .но как мне кажется > для > > этой микрозадачи это черезчур. > > Если укладывается в требования, то берите. Сэкономите силы и нервы на > поддержке и отладке. > > "можно будет руками подправить" и "поддержка уникальности значений > первых двух пар" --- это уже не тривиально и сильно зависит от вашего > конкретного случая. Берите простое готовое и меняйте/улучшайте/ищите > альтернативы, *если* потом возникнет потребность. > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From pef-secure на yandex.ru Sun Mar 29 13:22:03 2015 From: pef-secure на yandex.ru (PEF Secure) Date: Sun, 29 Mar 2015 22:22:03 +0200 Subject: [Moscow.pm] get own source code In-Reply-To: References: <2694412.EXZz7WL7pf@rawen> Message-ID: <2231081.qWIJAFWJnl@rawen> On Sunday, March 29, 2015 20:05:37 Maxim Vuets wrote: > 2015-03-28 17:07 GMT+01:00 PEF Secure : > > > Хочется получить собственный исполняемый код, который виден > > интерпретатору. Нужен буквальный код, на который ссылается > > интерпретатор, когда говорит "такая то ошибка в такой то строке". Дело не > > решается чтением исходного кода соответствующего файла с диска, поскольку > > речь идёт о "фильтрованном" коде. > > Это невозможно в чистом виде. Интерпретатор не выполняет текст > программы. Он прежде компилирует её в специальное внутренне > представление. Если вы компилируете код на лету, или модифицируете > программу во время исполнения, то и "буквального кода" у вас нет. Я знаю. Но в скомпилированном коде есть ссылки на номера строк, откуда он взялся. > Можно попробовать декомпилировать внутренне представление братно в > текст программы. Но он будет достаточно приблеженным и не обязательно > удобно-читаемым. Вот вам привет для вдохновления: > > $ perl -MB::Deparse -E 'my $f = eval "sub {shift() + shift()}"; # > компилируем строку во время исполнения \ > say $f->(2, 3); # проверяем \ > my $d = B::Deparse->new; say $d->coderef2text($f); # декомпилируем' > 5 > { > use feature 'current_sub', 'evalbytes', 'fc', 'say', > 'state', 'switch', 'unicode_strings', 'unicode_eval'; > (shift()) + (shift()); > } Да, про B::Deparse я уже думал. Возможно его можно применить, если всё-таки получить доступн к внутреннему представлению конкретной строки. Надо будет посмотреть снова. > Вы какую задачу решить пытаетесь-то? Восстановить текст после Filter::Simple. -- PEF Developer From maxim.vuets на gmail.com Mon Mar 30 01:28:23 2015 From: maxim.vuets на gmail.com (Maxim Vuets) Date: Mon, 30 Mar 2015 10:28:23 +0200 Subject: [Moscow.pm] get own source code In-Reply-To: <2231081.qWIJAFWJnl@rawen> References: <2694412.EXZz7WL7pf@rawen> <2231081.qWIJAFWJnl@rawen> Message-ID: 2015-03-29 22:22 GMT+02:00 PEF Secure : > Я знаю. Но в скомпилированном коде есть ссылки на номера строк, откуда он > взялся. Боюсь, что это весьма хрупкое утверждение. $ perl -e 'eval `cat code-reuse.txt`'; lolwat? >> Вы какую задачу решить пытаетесь-то? > > Восстановить текст после Filter::Simple. А какую зачаду пытаетесь решить при помощи Filter::Simple? (Намекаю на http://xyproblem.info/) From pef-secure на yandex.ru Mon Mar 30 01:38:40 2015 From: pef-secure на yandex.ru (PEF Secure) Date: Mon, 30 Mar 2015 10:38:40 +0200 Subject: [Moscow.pm] get own source code In-Reply-To: References: <2694412.EXZz7WL7pf@rawen> <2231081.qWIJAFWJnl@rawen> Message-ID: <1942621.gRSW2hNeau@rawen> On Monday, March 30, 2015 10:28:23 Maxim Vuets wrote: > А какую зачаду пытаетесь решить при помощи Filter::Simple? > (Намекаю на http://xyproblem.info/) А что, в perl5 уже появились макросы? -- PEF Developer From pef-secure на yandex.ru Mon Mar 30 01:43:20 2015 From: pef-secure на yandex.ru (PEF Secure) Date: Mon, 30 Mar 2015 10:43:20 +0200 Subject: [Moscow.pm] get own source code In-Reply-To: References: <2694412.EXZz7WL7pf@rawen> <2231081.qWIJAFWJnl@rawen> Message-ID: <52899043.9ftYQxxHqY@rawen> On Monday, March 30, 2015 10:28:23 Maxim Vuets wrote: > > Я знаю. Но в скомпилированном коде есть ссылки на номера строк, откуда он > > взялся. > Боюсь, что это весьма хрупкое утверждение. > > $ perl -e 'eval `cat code-reuse.txt`'; > lolwat? perl -le 'eval "blabla++"; print $@' Can't modify constant item in postincrement (++) at (eval 1) line 1, near "blabla++" *line 1* -- моё утверждение опирается на то, что эта информация всегда присутствует в тексте ошибки. -- PEF Developer From maxim.vuets на gmail.com Mon Mar 30 03:46:39 2015 From: maxim.vuets на gmail.com (Maxim Vuets) Date: Mon, 30 Mar 2015 12:46:39 +0200 Subject: [Moscow.pm] get own source code In-Reply-To: <52899043.9ftYQxxHqY@rawen> References: <2694412.EXZz7WL7pf@rawen> <2231081.qWIJAFWJnl@rawen> <52899043.9ftYQxxHqY@rawen> Message-ID: 2015-03-30 10:43 GMT+02:00 PEF Secure : >> Боюсь, что это весьма хрупкое утверждение. >> >> $ perl -e 'eval `cat code-reuse.txt`'; >> lolwat? > > perl -le 'eval "blabla++"; print $@' > Can't modify constant item in postincrement (++) at (eval 1) line 1, near > "blabla++" > > *line 1* -- моё утверждение опирается на то, что эта информация всегда > присутствует в тексте ошибки. Да, вы правы. Я ошибочно полагал, что доступен только номер строки с eval-ом. Но мы отошли от первоначального вопроса. При помощи этого примера я хотел показать, что иметь номер строки помогает не сильно, поскольку код может генериться на лету как угодно. И так мы снова вернулись к оригинальной проблеме: узнать какой именно код был скомпилирован. Короче, пока я отвечал, мне пришла в голову ещё одна мысль: отладчик. Судя по всему, ему доступна вся информация, что вас интересует. Значит и вы как-то можете сохранить её или получить к ней доступ. Дано: код, который в рантайме компилирует динамически-созданный код. $ cat debugme.pl use v5.20; use warnings; sub mk_env_accessor { my $field = quotemeta $_[0]; my $code = eval <<"CODE_END"; sub { my \$field = '$field'; my \$value = \$ENV{\$field}; return \$value; }; CODE_END die if $@; return $code; } my $get_user = mk_env_accessor('USER'); say $get_user->(); Запускаю из отладчика: $ perl -d debugme.pl Loading DB routines from perl5db.pl version 1.44 Editor support available. Enter h or 'h h' for help, or 'man perldebug' for more help. main::(debugme.pl:17): my $get_user = mk_env_accessor('USER'); DB<1> n main::(debugme.pl:18): say $get_user->(); DB<1> p $get_user CODE(0xec2cc0) DB<2> s main::CODE(0xec2cc0)((eval 8)[debugme.pl:6]:2): 2: my $field = 'USER'; DB<2> s main::CODE(0xec2cc0)((eval 8)[debugme.pl:6]:3): 3: my $value = $ENV{$field}; DB<2> s main::CODE(0xec2cc0)((eval 8)[debugme.pl:6]:4): 4: return $value; DB<2> s mvuets Видите? Он прошёл по функции, которая была за-eval-ена из строки как по родной. Возможно, это вдохновит вас на нахождение решение. From maxim.vuets на gmail.com Mon Mar 30 03:52:52 2015 From: maxim.vuets на gmail.com (Maxim Vuets) Date: Mon, 30 Mar 2015 12:52:52 +0200 Subject: [Moscow.pm] get own source code In-Reply-To: <1942621.gRSW2hNeau@rawen> References: <2694412.EXZz7WL7pf@rawen> <2231081.qWIJAFWJnl@rawen> <1942621.gRSW2hNeau@rawen> Message-ID: 2015-03-30 10:38 GMT+02:00 PEF Secure : >> А какую зачаду пытаетесь решить при помощи Filter::Simple? >> (Намекаю на http://xyproblem.info/) > > А что, в perl5 уже появились макросы? Я не знаю, что у вас на уме. Я не знаю какая проблема представлена перед вами. Я хотел выяснить больше, что бы попробовать вам помочь. Но ваш ответ мне кажется грубым и безтактным. Простите. From pef-secure на yandex.ru Mon Mar 30 04:45:37 2015 From: pef-secure на yandex.ru (PEF Secure) Date: Mon, 30 Mar 2015 13:45:37 +0200 Subject: [Moscow.pm] get own source code In-Reply-To: References: <2694412.EXZz7WL7pf@rawen> <1942621.gRSW2hNeau@rawen> Message-ID: <2408565.S91i6LNMmV@rawen> On Monday, March 30, 2015 12:52:52 Maxim Vuets wrote: > >> А какую зачаду пытаетесь решить при помощи Filter::Simple? > >> (Намекаю на http://xyproblem.info/) > > А что, в perl5 уже появились макросы? > > Я не знаю, что у вас на уме. Я не знаю какая проблема представлена > перед вами. Я хотел выяснить больше, что бы попробовать вам помочь. Но > ваш ответ мне кажется грубым и безтактным. Простите. Ни в коей мере не пытался обидеть. Вы единственный, кто прочитал моё начальное сообщение внимательно, я это ценю и ни в коем случае не хотел обидеть. Простите, если Вам так показалось. В моём случае, мне нравится использовать макросы, я пытаюсь их приспособить к перлу. У меня есть положительный опыт их использования, но есть и некоторая неприспособленность инструментария, которую я пытаюсь как-то решить. Если я начну подробнее писать об этом, то могу спровоцировать флейм с местными ортодоксами, а мне это не интересно, поэтому я стараюсь задавать вопросы точечно и только те, на которые сам не могу найти ответ. -- PEF Developer From mi на ya.ru Mon Mar 30 08:42:05 2015 From: mi на ya.ru (Nikolay Mishin) Date: Mon, 30 Mar 2015 18:42:05 +0300 Subject: [Moscow.pm] get own source code In-Reply-To: <2408565.S91i6LNMmV@rawen> References: <2694412.EXZz7WL7pf@rawen> <1942621.gRSW2hNeau@rawen> <2408565.S91i6LNMmV@rawen> Message-ID: <11483961427730125@web18o.yandex.ru> здесь мне стало уже интересно, что это за ортодоксы, которые не любят макросы? и какой флейм они могут раздуть? ;)) хотелось бы тоже более детального описания проблемы 30.03.2015, 14:48, "PEF Secure" : > On Monday, March 30, 2015 12:52:52 Maxim Vuets wrote: >>>>  А какую зачаду пытаетесь решить при помощи Filter::Simple? >>>>  (Намекаю на http://xyproblem.info/) >>>  А что, в perl5 уже появились макросы? >>  Я не знаю, что у вас на уме. Я не знаю какая проблема представлена >>  перед вами. Я хотел выяснить больше, что бы попробовать вам помочь. Но >>  ваш ответ мне кажется грубым и безтактным. Простите. > > Ни в коей мере не пытался обидеть. Вы единственный, кто прочитал моё начальное > сообщение внимательно, я это ценю и ни в коем случае не хотел обидеть. > Простите, если Вам так показалось. > > В моём случае, мне нравится использовать макросы, я пытаюсь их приспособить к > перлу. У меня есть положительный опыт их использования, но есть и некоторая > неприспособленность инструментария, которую я пытаюсь как-то решить. Если я > начну подробнее писать об этом, то могу спровоцировать флейм с местными > ортодоксами, а мне это не интересно, поэтому я стараюсь задавать вопросы > точечно и только те, на которые сам не могу найти ответ. > -- > PEF Developer > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org -- С уважением Николай Мишин From pef-secure на yandex.ru Mon Mar 30 09:12:04 2015 From: pef-secure на yandex.ru (PEF Secure) Date: Mon, 30 Mar 2015 18:12:04 +0200 Subject: [Moscow.pm] get own source code In-Reply-To: <11483961427730125@web18o.yandex.ru> References: <2694412.EXZz7WL7pf@rawen> <2408565.S91i6LNMmV@rawen> <11483961427730125@web18o.yandex.ru> Message-ID: <2152024.9F1nUNzDUL@rawen> On Monday, March 30, 2015 18:42:05 Nikolay Mishin wrote: > здесь мне стало уже интересно, > что это за ортодоксы, которые не любят макросы? > и какой флейм они могут раздуть? ;)) > хотелось бы тоже более детального описания проблемы Проблема раздувания флейма меня не особо интересует. А то я снова окажусь "единственным умным человеком в _своей_ комнате". Макросы помогают решить вопрос копи-пастинга типичных кусков кода, когда требуется не только, чтобы выполнились какие-то действия, но и чтобы результат этих действий оказался немедленно доступен в основной функции. Обойтись можно, но с ними код выглядит лучше, чище, только по делу и множество рутин очень лаконично перечислено в аттрибутах. -- PEF Developer From maxim.vuets на gmail.com Mon Mar 30 11:48:59 2015 From: maxim.vuets на gmail.com (Maxim Vuets) Date: Mon, 30 Mar 2015 20:48:59 +0200 Subject: [Moscow.pm] get own source code In-Reply-To: <2408565.S91i6LNMmV@rawen> References: <2694412.EXZz7WL7pf@rawen> <1942621.gRSW2hNeau@rawen> <2408565.S91i6LNMmV@rawen> Message-ID: 2015-03-30 13:45 GMT+02:00 PEF Secure : > В моём случае, мне нравится использовать макросы, я пытаюсь их приспособить к > перлу. Докопались. Теперь понятно, что вы хотите. Спасибо. > У меня есть положительный опыт их использования, но есть и некоторая > неприспособленность инструментария, которую я пытаюсь как-то решить. Если я > начну подробнее писать об этом, то могу спровоцировать флейм с местными > ортодоксами, а мне это не интересно, поэтому я стараюсь задавать вопросы > точечно и только те, на которые сам не могу найти ответ. Советую вам не флеймить. А если они будут провоцировать ("троллить"), то игнорируйте их. Не вижу проблемы. From maxim.vuets на gmail.com Mon Mar 30 12:01:36 2015 From: maxim.vuets на gmail.com (Maxim Vuets) Date: Mon, 30 Mar 2015 21:01:36 +0200 Subject: [Moscow.pm] get own source code In-Reply-To: <2152024.9F1nUNzDUL@rawen> References: <2694412.EXZz7WL7pf@rawen> <2408565.S91i6LNMmV@rawen> <11483961427730125@web18o.yandex.ru> <2152024.9F1nUNzDUL@rawen> Message-ID: 2015-03-30 18:12 GMT+02:00 PEF Secure : > Макросы помогают решить вопрос копи-пастинга типичных кусков кода, когда > требуется не только, чтобы выполнились какие-то действия, но и чтобы результат > этих действий оказался немедленно доступен в основной функции. Обойтись можно, > но с ними код выглядит лучше, чище, только по делу и множество рутин очень > лаконично перечислено в аттрибутах. Как по мне это плохая идея. А аргументация слабая и поверхностная. Конечно, это только ваше дело что и как использовать. И вы, как я понял из прошлого ответа, не очень расположены обсуждать основной вопрос, потому я не буду продолжать. Приведу лишь один пример. Когда-то давным-давно, в perl-е был[1] специальный ключ -P. Он умел пропускать текст программы через C-препроцессор (напр. cpp(1)) перед запуском программы. Получалось что-то примерно похожее на пример и вашего первого сообщения. Т.е. можно было использовать старые и до боли знакомые сишные макросы. (1) mvuets на ilosonaloje:~$ cat clike.pl #!/usr/bin/env perl #define IF(x) if(x) #define THEN { #define ELSE }else{ #define END } my $age = 22; IF ($age >= 18) THEN print "( . Y . )\n"; ELSE print "/ / / / /\n"; END (1) mvuets на ilosonaloje:~$ perl -P clike.pl ( . Y . ) [1] https://metacpan.org/pod/distribution/perl/pod/perl5100delta.pod#Use-of--P-is-deprecated From pef-secure на yandex.ru Mon Mar 30 17:31:17 2015 From: pef-secure на yandex.ru (PEF Secure) Date: Tue, 31 Mar 2015 02:31:17 +0200 Subject: [Moscow.pm] get own source code In-Reply-To: References: <2694412.EXZz7WL7pf@rawen> <2152024.9F1nUNzDUL@rawen> Message-ID: <7305580.oA4lxXH584@rawen> On Monday, March 30, 2015 21:01:36 Maxim Vuets wrote: > Как по мне это плохая идея. А аргументация слабая и поверхностная. Есть очень много плохих идей написанных "правильно". Аргументации, кроме наличия у меня положительного опыта, я не приводил, поэтому согласен, она слабая. > Конечно, это только ваше дело что и как использовать. И вы, как я > понял из прошлого ответа, не очень расположены обсуждать основной > вопрос, потому я не буду продолжать. Я мог бы обсудить что-то, поддающееся обсуждению. C-like макросы понятно будут выглядеть ужасно, поэтому используется Filter::Simple. Ладно, попробую, если не получится, свернусь. Существуют шаблонные куски кода, они небольшие, выполняют какие то проверки и должны заполнить значения каких- то переменных, которые используются в дальнейшем в основном алгоритме. Такие куски кода, я считаю, удобно написать один раз, не в виде функций, поскольку этим функциям придётся передавать множество аргументов, а их возвращаемые значения копировать туда-сюда или хешем -- это всё засоряет текст, замыливает глаз и мешает читать основной код. В итоге у меня получается система макросов, которые скрывают это всё, остаётся только смысл выполняемого действия. Например, как может выглядеть обработчик, отвечающий на запрос получения информации о текущем клиенте, чтобы знать кому веб-сайт должен сказать "привет": handler get user info : prolog(get_user) { return { name => $user->name, email => $user->email, last_login => $user->last_login, result => "OK", }; end_handler; } В данном случае, handler создаёт обработчик "состояния" сессии в POE, псевдо атрибут prolog вызывает генерацию части get_user, которая создаёт объект $user из переданного ключа веб-сессии и добавляет информацию о пользователе в текущий контекст, чтобы можно было его добавить в лог, end_handler завершает формирование функции, создавая обработчик результата. Если развернуть эти несколько строк в получаемый результат, то там будет строчек на 20 больше. Писать подобные обработчики, на мой взгляд, быстрее и проще, чем на "настоящем перле". Читать и проверять код тоже. Ещё плюс в том, что это ничего не стоит с точки зрения производительности, код генерируется один раз на этапе компиляции. Конкретно в данном случае, удобно видеть какие запросы требуют авторизованного пользователя. Побочный эффект такого "псевдо-языка" ещё в том, что когда я решил менять POE на EV+pre-fork, в коде проектов не придётся ничего менять, всё полностью совместимо. -- PEF Developer From akovbovich на gmail.com Mon Mar 30 17:51:01 2015 From: akovbovich на gmail.com (Andrey Kovbovich) Date: Tue, 31 Mar 2015 03:51:01 +0300 Subject: [Moscow.pm] get own source code In-Reply-To: <7305580.oA4lxXH584@rawen> References: <2694412.EXZz7WL7pf@rawen> <2152024.9F1nUNzDUL@rawen> <7305580.oA4lxXH584@rawen> Message-ID: мне видится решением поместить в обработчик сабу с нужными параметрами и на этапе загрузки сгенерить обертки в зависимости от атрибутов методов обработчика. 31 марта 2015 г., 3:31 пользователь PEF Secure написал: > On Monday, March 30, 2015 21:01:36 Maxim Vuets wrote: > > > Как по мне это плохая идея. А аргументация слабая и поверхностная. > > Есть очень много плохих идей написанных "правильно". Аргументации, кроме > наличия у меня положительного опыта, я не приводил, поэтому согласен, она > слабая. > > > Конечно, это только ваше дело что и как использовать. И вы, как я > > понял из прошлого ответа, не очень расположены обсуждать основной > > вопрос, потому я не буду продолжать. > > Я мог бы обсудить что-то, поддающееся обсуждению. C-like макросы понятно > будут > выглядеть ужасно, поэтому используется Filter::Simple. > > Ладно, попробую, если не получится, свернусь. Существуют шаблонные куски > кода, > они небольшие, выполняют какие то проверки и должны заполнить значения > каких- > то переменных, которые используются в дальнейшем в основном алгоритме. > Такие > куски кода, я считаю, удобно написать один раз, не в виде функций, > поскольку > этим функциям придётся передавать множество аргументов, а их возвращаемые > значения копировать туда-сюда или хешем -- это всё засоряет текст, > замыливает > глаз и мешает читать основной код. В итоге у меня получается система > макросов, > которые скрывают это всё, остаётся только смысл выполняемого действия. > > Например, как может выглядеть обработчик, отвечающий на запрос получения > информации о текущем клиенте, чтобы знать кому веб-сайт должен сказать > "привет": > > handler get user info : prolog(get_user) { > return { > name => $user->name, > email => $user->email, > last_login => $user->last_login, > result => "OK", > }; > end_handler; > } > > В данном случае, handler создаёт обработчик "состояния" сессии в POE, > псевдо > атрибут prolog вызывает генерацию части get_user, которая создаёт объект > $user > из переданного ключа веб-сессии и добавляет информацию о пользователе в > текущий контекст, чтобы можно было его добавить в лог, end_handler > завершает > формирование функции, создавая обработчик результата. Если развернуть эти > несколько строк в получаемый результат, то там будет строчек на 20 больше. > Писать подобные обработчики, на мой взгляд, быстрее и проще, чем на > "настоящем > перле". Читать и проверять код тоже. Ещё плюс в том, что это ничего не > стоит с > точки зрения производительности, код генерируется один раз на этапе > компиляции. Конкретно в данном случае, удобно видеть какие запросы требуют > авторизованного пользователя. > > Побочный эффект такого "псевдо-языка" ещё в том, что когда я решил менять > POE > на EV+pre-fork, в коде проектов не придётся ничего менять, всё полностью > совместимо. > -- > PEF Developer > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From pef-secure на yandex.ru Mon Mar 30 22:50:47 2015 From: pef-secure на yandex.ru (PEF Secure) Date: Tue, 31 Mar 2015 07:50:47 +0200 Subject: [Moscow.pm] get own source code In-Reply-To: References: <2694412.EXZz7WL7pf@rawen> <7305580.oA4lxXH584@rawen> Message-ID: <2066612.AJs9TsRjYk@rawen> On Tuesday, March 31, 2015 03:51:01 Andrey Kovbovich wrote: > мне видится решением поместить в обработчик сабу с нужными параметрами и на > этапе загрузки сгенерить обертки в зависимости от атрибутов методов > обработчика. Вы мне пытаетесь рассказать, что _мне_ макросы не нужны? Использование атрибутов я уже пробовал, мне не хватает возможности определять переменную внутри хендлера. Ещё раз: задачу определить хендлер можно решить многими способами, можно и без моего синтаксического сахара, но удобно, с моей точки зрения, у меня получилось только вот так. -- PEF Developer From akovbovich на gmail.com Mon Mar 30 23:35:35 2015 From: akovbovich на gmail.com (Andrey Kovbovich) Date: Tue, 31 Mar 2015 09:35:35 +0300 Subject: [Moscow.pm] get own source code In-Reply-To: <2066612.AJs9TsRjYk@rawen> References: <2694412.EXZz7WL7pf@rawen> <7305580.oA4lxXH584@rawen> <2066612.AJs9TsRjYk@rawen> Message-ID: Нет сомнения, что макросы нужны, но у перла нет defmacro, но есть eval. Для чего нужно определять переменную внутри хендлера? Все данные можно передать через параметры, они то и определят протокол каждого конкретного хендлера, остается только сгенерить бойлерплейт стрингэвалом по атрибутам и получить готовый к работе хэндлер. 31 марта 2015 г., 8:50 пользователь PEF Secure написал: > On Tuesday, March 31, 2015 03:51:01 Andrey Kovbovich wrote: > > мне видится решением поместить в обработчик сабу с нужными параметрами и > на > > этапе загрузки сгенерить обертки в зависимости от атрибутов методов > > обработчика. > > Вы мне пытаетесь рассказать, что _мне_ макросы не нужны? Использование > атрибутов я уже пробовал, мне не хватает возможности определять переменную > внутри хендлера. Ещё раз: задачу определить хендлер можно решить многими > способами, можно и без моего синтаксического сахара, но удобно, с моей > точки > зрения, у меня получилось только вот так. > -- > PEF Developer > -- > Moscow.pm mailing list > moscow-pm на pm.org | http://moscow.pm.org > ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: From pef-secure на yandex.ru Tue Mar 31 01:20:34 2015 From: pef-secure на yandex.ru (PEF Secure) Date: Tue, 31 Mar 2015 10:20:34 +0200 Subject: [Moscow.pm] get own source code In-Reply-To: References: <2694412.EXZz7WL7pf@rawen> <2066612.AJs9TsRjYk@rawen> Message-ID: <1708776.gna1KfXTEm@rawen> On Tuesday, March 31, 2015 09:35:35 Andrey Kovbovich wrote: > Нет сомнения, что макросы нужны, но у перла нет defmacro, но есть eval. Для > чего нужно определять переменную внутри хендлера? Все данные можно передать > через параметры, они то и определят протокол каждого конкретного хендлера, > остается только сгенерить бойлерплейт стрингэвалом по атрибутам и получить > готовый к работе хэндлер. Это уже первый шаг к шаблонной генерации хендлеров. Следующим будет как раз примерно то, что я написал. Для чего добавлять переменную внутри хендлера - да просто это удобно. Например, 50% хендлеров начинается с получения объекта авторизованного пользователя и передачи его информации в текущий контекст, это всего пара строк, но они встречаются постоянно. Таких "шаблонных" моментов в реальном проекте больше десятка. Когда эти "моменты" имеют короткие обозначения и просто перечисляются в заголовке хендлера, то код очищается и его проще контролировать. -- PEF Developer From 0body0 на rambler.ru Tue Mar 31 04:41:58 2015 From: 0body0 на rambler.ru (=?UTF-8?B?0JDQvdCw0YLQvtC70LjQuSDQk9GA0LjRiNCw0LXQsg==?=) Date: Tue, 31 Mar 2015 14:41:58 +0300 Subject: [Moscow.pm] get own source code In-Reply-To: <2694412.EXZz7WL7pf@rawen> References: <2694412.EXZz7WL7pf@rawen> Message-ID: <551A8806.9040601@rambler.ru> Нужно воспользоваться специальными комментариями #line xxx "fileyyy" Тогда сообщения об ошибке будут лучше указывать на место проблемы. Самое сложное это генерация адекватных filexxx и строки. В filexxx можно вставить имя макроса которое подменяешь + параметры + номер исходной строки, а в номер строки 1 для Пример использования этих комментариев: ======================= sub main{ my @argv = @_; # line 999 "a distant galaxy" die "Ship сrashed"; }; ======================= Ship сrashed at a distant galaxy line 999. ======================= Сообщения об других ошибках тоже будут привязаны к этим маркерам 28.03.2015 19:07, PEF Secure пишет: > Hi, > > прошу направить меня на путь. > > Хочется получить собственный исполняемый код, который виден интерпретатору. > Нужен буквальный код, на который ссылается интерпретатор, когда говорит "такая > то ошибка в такой то строке". Дело не решается чтением исходного кода > соответствующего файла с диска, поскольку речь идёт о "фильтрованном" коде. > Вот надуманный пример: > > package TestFilter; > use Filter::Simple; > FILTER_ONLY code => sub { > s/\bIF\b(.*?) THEN/if($1){/g; > s/\bELSE\b/} else {/g; > s/\bEND IF\b/}/g; > s/\bEND\b/}/g; > }; > 1; > > use TestFilter; > use v5.018; > > eval { IF 1 == 2 THEN say "impossible" ELSE say "yes" END IF }; > > Если внутри eval-а будет ошибка, то хочется увидеть тот самый код, что там > исполнялся интерпретатором перла.