From rgiersig at cpan.org  Mon Oct  1 04:12:18 2007
From: rgiersig at cpan.org (Roland Giersig)
Date: Mon, 1 Oct 2007 13:12:18 +0200
Subject: [Vienna-pm] Vienna.pm TechSocialMeet: 1.10.2007
In-Reply-To: <46FB8AA1.8080206@geizhals.at>
References: <20070920232451.GA4590@i85.chello.at>
	<20070924220844.GA24447@hjp.at>
	<82DB9996-08D6-43AF-BD16-D83E3BA45C45@univie.ac.at>
	<46FA769F.8090004@k-1.com> <46FB8AA1.8080206@geizhals.at>
Message-ID: <9b0a9e30710010412g532999felfd5e47ad0211ac15@mail.gmail.com>

sorry, muss leider f?r heute absagen, bin krank geworden... :-(
jetzt habts mehr platz und einen weniger, der euch das bier wegtrinkt... ;-)

bis zum n?chsten mal!

lg, roland

From wilhelm.nagy at bfw.gv.at  Tue Oct  2 01:06:08 2007
From: wilhelm.nagy at bfw.gv.at (nagy)
Date: Tue, 2 Oct 2007 10:06:08 +0200
Subject: [Vienna-pm] Groovy
Message-ID: <BB0F801764F1DD4F9CA5C1414C31C2E6784CCD@mail.bfw.gv.at>

hallo leute,
 
weil ich gestern noch gefragt worden bin:
 
http://groovy.codehaus.org
 
Ihr k?nnt auch auch gleich groovy-1.1-Beta laden - ich nehme an, dass ihr ja nicht heute in produktion geht :-))
 
Erster kontakt mit 1.1 scheint, dass alles schneller und bequemer geworden ist.
 
Wie gesagt. an der perlisierung von groovy arbeit ich noch...
Ich treume von sowas wie:
 
use Groovy
$groovy = new Groovy(-cp=>.., usw.);
 
$ret = $groovy->execute("def X=12; return X*10");
 
Damit stuende neben CPAN das ganze JAVA Archiv zur Verf?gung,
 
Mag jemand mitmachen?
 
 
lg
\^/ili
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://mail.pm.org/pipermail/vienna-pm/attachments/20071002/1b068e30/attachment.html 

From rho at devc.at  Tue Oct  2 02:03:34 2007
From: rho at devc.at (Robert Barta)
Date: Tue, 2 Oct 2007 11:03:34 +0200
Subject: [Vienna-pm] Groovy
In-Reply-To: <BB0F801764F1DD4F9CA5C1414C31C2E6784CCD@mail.bfw.gv.at>
References: <BB0F801764F1DD4F9CA5C1414C31C2E6784CCD@mail.bfw.gv.at>
Message-ID: <20071002090334.GB9289@mando.int.devc.at>

On Tue, Oct 02, 2007 at 10:06:08AM +0200, nagy wrote:
> Wie gesagt. an der perlisierung von groovy arbeit ich noch...
> Ich treume von sowas wie:
>  
> use Groovy
> $groovy = new Groovy(-cp=>.., usw.);

Es gibt ja angeblich ein Inline::Java

  perl-inline-java isa cpan-module, which iko perl-module
  download: http://search.cpan.org/~patl/Inline-Java-0.52/
  purpose: Write Perl classes in Java

Vielleicht kann man das auf Inline::Groovy "leverage"n?

\rho

From gr at univie.ac.at  Tue Oct  2 04:40:13 2007
From: gr at univie.ac.at (=?ISO-8859-1?Q?Marcel_Gr=FCnauer?=)
Date: Tue, 2 Oct 2007 13:40:13 +0200
Subject: [Vienna-pm] Vienna.pm TechSocialMeet #2: 5. November 2007
Message-ID: <AAE1FCF0-B9CB-405D-A5DC-A21A61AB9CBE@univie.ac.at>

F?r unser zweites TechSocialMeet am 5. November 2007 hab ich bereits  
wieder den Besprechungsraum im NIG reserviert.

Marcel


From rl at brabbel.net  Tue Oct  2 06:55:22 2007
From: rl at brabbel.net (Roland Lammel)
Date: Tue, 2 Oct 2007 15:55:22 +0200
Subject: [Vienna-pm] Vienna.pm TechSocialMeet #2: 5. November 2007
In-Reply-To: <AAE1FCF0-B9CB-405D-A5DC-A21A61AB9CBE@univie.ac.at>
References: <AAE1FCF0-B9CB-405D-A5DC-A21A61AB9CBE@univie.ac.at>
Message-ID: <9b51ffb30710020655n12fa231mea6f184bcadf310b@mail.gmail.com>

Sehr gut!

Jetzt find ich auch hin ;-)

BTW: Nicht einmal ein Strafzetterl f?r Parken mit altem Parkschein (und auch
nur bis 21 Uhr)

Cheers

+rl

On 10/2/07, Marcel Gr?nauer <gr at univie.ac.at> wrote:
>
> F?r unser zweites TechSocialMeet am 5. November 2007 hab ich bereits
> wieder den Besprechungsraum im NIG reserviert.
>
> Marcel
>
> _______________________________________________
> Vienna-pm mailing list
> Vienna-pm at pm.org
> http://mail.pm.org/mailman/listinfo/vienna-pm
>



-- 
Roland Lammel

"Enjoy your job, make lots of money, work within the law. Choose any two."
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://mail.pm.org/pipermail/vienna-pm/attachments/20071002/3d1f9da5/attachment.html 

From rgiersig at cpan.org  Tue Oct  2 08:42:26 2007
From: rgiersig at cpan.org (Roland Giersig)
Date: Tue, 2 Oct 2007 17:42:26 +0200
Subject: [Vienna-pm] Vienna.pm TechSocialMeet #2: 5. November 2007
In-Reply-To: <AAE1FCF0-B9CB-405D-A5DC-A21A61AB9CBE@univie.ac.at>
References: <AAE1FCF0-B9CB-405D-A5DC-A21A61AB9CBE@univie.ac.at>
Message-ID: <9b0a9e30710020842n4e7834a6nc01a2df43c96244a@mail.gmail.com>

ist vorgemerkt, bis dahin muss ich wieder gesund sein... :o)
nachsitzung wieder in der bier-ambulanz?

lg, roland

On 10/2/07, Marcel Gr?nauer <gr at univie.ac.at> wrote:
> F?r unser zweites TechSocialMeet am 5. November 2007 hab ich bereits
> wieder den Besprechungsraum im NIG reserviert.
>
> Marcel
>
> _______________________________________________
> Vienna-pm mailing list
> Vienna-pm at pm.org
> http://mail.pm.org/mailman/listinfo/vienna-pm
>

From wilhelm.nagy at bfw.gv.at  Tue Oct  2 23:20:45 2007
From: wilhelm.nagy at bfw.gv.at (nagy)
Date: Wed, 3 Oct 2007 08:20:45 +0200
Subject: [Vienna-pm] Vienna.pm TechSocialMeet #2: 5. November 2007
Message-ID: <BB0F801764F1DD4F9CA5C1414C31C2E6784E7D@mail.bfw.gv.at>

Ich melde mich auch an...
 
lg
\^/ili
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://mail.pm.org/pipermail/vienna-pm/attachments/20071003/817c7156/attachment.html 

From georg.anzenberger at meduniwien.ac.at  Tue Oct  2 23:52:59 2007
From: georg.anzenberger at meduniwien.ac.at (Anzenberger Georg)
Date: Wed, 03 Oct 2007 08:52:59 +0200
Subject: [Vienna-pm] Vienna.pm TechSocialMeet #2: 5. November 2007
In-Reply-To: <AAE1FCF0-B9CB-405D-A5DC-A21A61AB9CBE@univie.ac.at>
References: <AAE1FCF0-B9CB-405D-A5DC-A21A61AB9CBE@univie.ac.at>
Message-ID: <47033C4B.2070908@meduniwien.ac.at>

Marcel Gr?nauer wrote:
> F?r unser zweites TechSocialMeet am 5. November 2007 hab ich bereits  
> wieder den Besprechungsraum im NIG reserviert.
Joe - ich bin auch wieder mit dabei! (Vielleicht diesmal auch bei der
hefigen Nachbesprechung ...)

Liebe Gruesse - Georg Anzenberger

From jozef at kutej.net  Wed Oct  3 04:49:12 2007
From: jozef at kutej.net (Jozef Kutej)
Date: Wed, 03 Oct 2007 11:49:12 +0000
Subject: [Vienna-pm] Vienna.pm TechSocialMeet #2: 5. November 2007
In-Reply-To: <AAE1FCF0-B9CB-405D-A5DC-A21A61AB9CBE@univie.ac.at>
References: <AAE1FCF0-B9CB-405D-A5DC-A21A61AB9CBE@univie.ac.at>
Message-ID: <1191412152.5116.20.camel@ant.local>

Hallo!

Ich bin "hier" neu. Ich will auch gerne am 5. November kommen. Ich lebe
im Bratislava aber das ist nur 1 Stunde mit dem Zug von Wien. Kann ich
auch etwas pr?sentieren ?ber Catalyst, Trac setup f?r mehr Projekten,
wie die DocBook Dokumenten schreiben oder Projekt "development cycle"
hier in HP Bratislava. Etwas interessant f?r sie?

Meine Deutsch Kenntnissen sind nicht sehr gut aber hoffentlich wurde das
beim Bier verbessern. :)

Jozef

On Tue, 2007-10-02 at 13:40 +0200, Marcel Gr?nauer wrote:
> F?r unser zweites TechSocialMeet am 5. November 2007 hab ich bereits  
> wieder den Besprechungsraum im NIG reserviert.
> 
> Marcel
> 
> _______________________________________________
> Vienna-pm mailing list
> Vienna-pm at pm.org
> http://mail.pm.org/mailman/listinfo/vienna-pm
> 


From domm at cpan.org  Wed Oct  3 04:52:48 2007
From: domm at cpan.org (Thomas Klausner)
Date: Wed, 3 Oct 2007 13:52:48 +0200
Subject: [Vienna-pm] Vienna.pm TechSocialMeet #2: 5. November 2007
In-Reply-To: <1191412152.5116.20.camel@ant.local>
References: <AAE1FCF0-B9CB-405D-A5DC-A21A61AB9CBE@univie.ac.at>
	<1191412152.5116.20.camel@ant.local>
Message-ID: <20071003115248.GH30634@localhost.chello.at>

Hi!

On Wed, Oct 03, 2007 at 11:49:12AM +0000, Jozef Kutej wrote:
 
> Ich bin "hier" neu. Ich will auch gerne am 5. November kommen. Ich lebe
> im Bratislava aber das ist nur 1 Stunde mit dem Zug von Wien. Kann ich
> auch etwas pr?sentieren ?ber Catalyst, Trac setup f?r mehr Projekten,
> wie die DocBook Dokumenten schreiben oder Projekt "development cycle"
> hier in HP Bratislava. Etwas interessant f?r sie?

Ja, das waere cool!

Und wenn die Rueckreise zeitlich ein Problem sein sollte, finden wir 
sicher irgendwo ein Gaestezimmer / Sofa.

> Meine Deutsch Kenntnissen sind nicht sehr gut aber hoffentlich wurde das
> beim Bier verbessern. :)

Wir freuen uns auch ueber Praesentationen auf Englisch. Slowakisch 
werden allerdings die wenigsten verstehen ...

Hoffentlich haben wir bald mal ein Wiki, dann koennen wir das ganze ein 
bischen einfacher managen

-- 
#!/usr/bin/perl                              http://domm.plix.at
for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/}

From gr at univie.ac.at  Wed Oct  3 04:54:24 2007
From: gr at univie.ac.at (=?ISO-8859-1?Q?Marcel_Gr=FCnauer?=)
Date: Wed, 3 Oct 2007 13:54:24 +0200
Subject: [Vienna-pm] Vienna.pm TechSocialMeet #2: 5. November 2007
In-Reply-To: <1191412152.5116.20.camel@ant.local>
References: <AAE1FCF0-B9CB-405D-A5DC-A21A61AB9CBE@univie.ac.at>
	<1191412152.5116.20.camel@ant.local>
Message-ID: <191565BB-584F-4169-BB9A-AEBA9CB1E6D0@univie.ac.at>

Hallo!

On 03.10.2007, at 13:49, Jozef Kutej wrote:

> Ich bin "hier" neu. Ich will auch gerne am 5. November kommen. Ich  
> lebe
> im Bratislava aber das ist nur 1 Stunde mit dem Zug von Wien. Kann ich
> auch etwas pr?sentieren ?ber Catalyst, Trac setup f?r mehr Projekten,
> wie die DocBook Dokumenten schreiben oder Projekt "development cycle"
> hier in HP Bratislava. Etwas interessant f?r sie?

Catalyst und Trac f?nde ich sehr interessant.

W?rde mich freuen, wenn Du da was vortragen k?nntest.

Marcel


From domm at cpan.org  Wed Oct  3 04:54:25 2007
From: domm at cpan.org (Thomas Klausner)
Date: Wed, 3 Oct 2007 13:54:25 +0200
Subject: [Vienna-pm] kleiner Bericht ueber TechSocialMeet #1
Message-ID: <20071003115424.GI30634@localhost.chello.at>

Hi!

Hab ich schon gestern geschrieben & vergessen, hier zu posten:

http://use.perl.org/~domm/journal/34590

-- 
#!/usr/bin/perl                              http://domm.plix.at
for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/}

From nine at detonation.org  Wed Oct  3 05:46:17 2007
From: nine at detonation.org (Stefan Seifert)
Date: Wed, 03 Oct 2007 14:46:17 +0200
Subject: [Vienna-pm] Vienna.pm TechSocialMeet #2: 5. November 2007
In-Reply-To: <1191412152.5116.20.camel@ant.local>
References: <AAE1FCF0-B9CB-405D-A5DC-A21A61AB9CBE@univie.ac.at>
	<1191412152.5116.20.camel@ant.local>
Message-ID: <47038F19.2090107@detonation.org>

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA256

Jozef Kutej wrote:
> Ich bin "hier" neu. Ich will auch gerne am 5. November kommen. Ich lebe
> im Bratislava aber das ist nur 1 Stunde mit dem Zug von Wien. Kann ich
> auch etwas pr?sentieren ?ber Catalyst, Trac setup f?r mehr Projekten,
> wie die DocBook Dokumenten schreiben oder Projekt "development cycle"
> hier in HP Bratislava. Etwas interessant f?r sie?

Dann werde ich wohl nicht mehr auskommen und ebenfalls nach Wien fahren
m?ssen ;)

Stefan
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.5 (GNU/Linux)
Comment: Using GnuPG with SUSE - http://enigmail.mozdev.org

iD8DBQFHA48Z1QuEJQQMVrgRCDLtAJ4g3xuifGcXTtZMviQcV6QeGyq2bACfQQkf
MsoqcIBv/oyAh78/6MXXYNU=
=J6Re
-----END PGP SIGNATURE-----

From elcondor at wennja.warum.net  Wed Oct  3 06:36:46 2007
From: elcondor at wennja.warum.net (Martin Schipany)
Date: Wed, 03 Oct 2007 15:36:46 +0200
Subject: [Vienna-pm] Vienna.pm TechSocialMeet #2: 5. November 2007
In-Reply-To: <AAE1FCF0-B9CB-405D-A5DC-A21A61AB9CBE@univie.ac.at>
References: <AAE1FCF0-B9CB-405D-A5DC-A21A61AB9CBE@univie.ac.at>
Message-ID: <47039AEE.9020900@wennja.warum.net>

Frisch ausgeruht nach dem 1. Urlaub seit Weihnachten gedenke ich zu
erscheinen ;)

Elco



From gr at univie.ac.at  Wed Oct  3 06:37:06 2007
From: gr at univie.ac.at (=?ISO-8859-1?Q?Marcel_Gr=FCnauer?=)
Date: Wed, 3 Oct 2007 15:37:06 +0200
Subject: [Vienna-pm] Vienna.pm TechSocialMeet #2: 5. November 2007
In-Reply-To: <47038F19.2090107@detonation.org>
References: <AAE1FCF0-B9CB-405D-A5DC-A21A61AB9CBE@univie.ac.at>
	<1191412152.5116.20.camel@ant.local>
	<47038F19.2090107@detonation.org>
Message-ID: <C76C7061-4369-49B8-B1EE-75EDEBCE5B94@univie.ac.at>

On 03.10.2007, at 14:46, Stefan Seifert wrote:

> Dann werde ich wohl nicht mehr auskommen und ebenfalls nach Wien  
> fahren
> m?ssen ;)

Cool; w?rd mich freuen, Dich wieder zu sehen. Ich seh, du bist auch  
auf #catalyst...

Marcel


From jozef at kutej.net  Thu Oct  4 00:30:53 2007
From: jozef at kutej.net (Jozef Kutej)
Date: Thu, 04 Oct 2007 09:30:53 +0200
Subject: [Vienna-pm] Vienna.pm TechSocialMeet #2: 5. November 2007
In-Reply-To: <1191448757.13188.3.camel@snatch>
References: <AAE1FCF0-B9CB-405D-A5DC-A21A61AB9CBE@univie.ac.at>
	<1191412152.5116.20.camel@ant.local> <1191448757.13188.3.camel@snatch>
Message-ID: <1191483053.4307.31.camel@ant.local>

Well Catalyst. Sie haben vieleicht alle ein Einfuhrung zum Catalyst
h?ren so kann ich etwan ?ber mein Projekt die ich im Catalyst gemacht
hatte sprechen. Was hatte ich nich in Catalyst::Manual gefunden and mehr
Trik. Zum Beispiel:

- getting rid of "please come back later" 
- wie kann mann "$c" im non Web Skripten haben
- was is das ein Catalyst Plugin
- automatish Database Table ?nderungen History mit Database Triggers und
plperl im Postregres
- user authentication mit Client Certificates (und mod_perl)
- wie die pod Dokumentation fur DBIx::Class Tables aussieht
- "nasty" session bug im Catalyst version die ist im default Debian
package
- mein $c->controller('Email') fur email handlung

Ich wurde sehr gern Ihre Meinung daruber horen.

Ich kann nur im English pr?sentieren. Hoffentlich das ist kein Problem.

Jozef.

On Wed, 2007-10-03 at 23:59 +0200, Stefan Schlesinger wrote:
> On Wed, 2007-10-03 at 11:49 +0000, Jozef Kutej wrote:
> > Ich bin "hier" neu. Ich will auch gerne am 5. November kommen. Ich lebe
> > im Bratislava aber das ist nur 1 Stunde mit dem Zug von Wien. Kann ich
> > auch etwas pr?sentieren ?ber Catalyst, Trac setup f?r mehr Projekten,
> > wie die DocBook Dokumenten schreiben oder Projekt "development cycle"
> > hier in HP Bratislava. Etwas interessant f?r sie?
> 
> Wenn ueber Catalyst referiert wird, bin ich auch das erste Mal
> dabei. :-)
> 
> Was wuerdest du denn Catalyst vortragen wollen?
> 
> Gruss, Stefan.
> 
> --
> Stefan Schlesinger //////////////////////////////////////////// ///////
> sts at ono.at
> 


From mailinglisten at renee-baecker.de  Thu Oct  4 00:44:18 2007
From: mailinglisten at renee-baecker.de (ReneeB)
Date: Thu, 04 Oct 2007 09:44:18 +0200
Subject: [Vienna-pm] Vienna.pm TechSocialMeet #2: 5. November 2007
In-Reply-To: <1191483053.4307.31.camel@ant.local>
References: <AAE1FCF0-B9CB-405D-A5DC-A21A61AB9CBE@univie.ac.at>	<1191412152.5116.20.camel@ant.local>
	<1191448757.13188.3.camel@snatch>
	<1191483053.4307.31.camel@ant.local>
Message-ID: <470499D2.3080006@renee-baecker.de>

Hallo Vienna.pm,

k?nnt ihr f?r dieses Thema nicht ein Live-Streaming machen?? W?rde mich 
auch interessieren... Oder sonstwie aufnehmen?

Gru?,
Ren?e

P.S.: A propos "aufnehmen": gibt es eigentlich die Lightning Talks von 
der YAPC schon irgendwo?

Jozef Kutej wrote:
> Well Catalyst. Sie haben vieleicht alle ein Einfuhrung zum Catalyst
> h?ren so kann ich etwan ?ber mein Projekt die ich im Catalyst gemacht
> hatte sprechen. Was hatte ich nich in Catalyst::Manual gefunden and mehr
> Trik. Zum Beispiel:
>
> - getting rid of "please come back later" 
> - wie kann mann "$c" im non Web Skripten haben
> - was is das ein Catalyst Plugin
> - automatish Database Table ?nderungen History mit Database Triggers und
> plperl im Postregres
> - user authentication mit Client Certificates (und mod_perl)
> - wie die pod Dokumentation fur DBIx::Class Tables aussieht
> - "nasty" session bug im Catalyst version die ist im default Debian
> package
> - mein $c->controller('Email') fur email handlung
>
> Ich wurde sehr gern Ihre Meinung daruber horen.
>
> Ich kann nur im English pr?sentieren. Hoffentlich das ist kein Problem.
>
> Jozef.
>
> On Wed, 2007-10-03 at 23:59 +0200, Stefan Schlesinger wrote:
>   
>> On Wed, 2007-10-03 at 11:49 +0000, Jozef Kutej wrote:
>>     
>>> Ich bin "hier" neu. Ich will auch gerne am 5. November kommen. Ich lebe
>>> im Bratislava aber das ist nur 1 Stunde mit dem Zug von Wien. Kann ich
>>> auch etwas pr?sentieren ?ber Catalyst, Trac setup f?r mehr Projekten,
>>> wie die DocBook Dokumenten schreiben oder Projekt "development cycle"
>>> hier in HP Bratislava. Etwas interessant f?r sie?
>>>       
>> Wenn ueber Catalyst referiert wird, bin ich auch das erste Mal
>> dabei. :-)
>>
>> Was wuerdest du denn Catalyst vortragen wollen?
>>
>> Gruss, Stefan.
>>
>> --
>> Stefan Schlesinger //////////////////////////////////////////// ///////
>> sts at ono.at
>>
>>     
>
> _______________________________________________
> Vienna-pm mailing list
> Vienna-pm at pm.org
> http://mail.pm.org/mailman/listinfo/vienna-pm


-- 
$foo - Perl-Magazin (http://foo-magazin.de)
Perl-Community.de (http://board.perl-community.de)
Perl-Blog (http://reneeb-perlblog.blogspot.com)


From gr at univie.ac.at  Fri Oct  5 03:37:56 2007
From: gr at univie.ac.at (=?ISO-8859-1?Q?Marcel_Gr=FCnauer?=)
Date: Fri, 5 Oct 2007 12:37:56 +0200
Subject: [Vienna-pm] London Perl Workshop 2007
Message-ID: <37DAEE9D-B100-4A18-8AFA-09C1D1BE7A17@univie.ac.at>

Eine Nachricht von Greg McCarroll von london.pm.

Registrieret Euch!

Marcel




London Perl Workshop 2007

So it's that time of year again, the nights are growing long, the  
mornings are growing cold
and people who should know better once again decide to organize a  
conference. That's right
it's time for this year's London Perl Workshop. So let's get down to  
the details, because we
haven't much time ...

When?

Saturday 1st of December (10:00->17:30)

Where?

Cavendish Campus, University of Westminster, London (Thanks again!)
(http://www.wmin.ac.uk/page-7679-smhp=4459)

What?

This year we will be encouraging people from other languages to  
participate so we can continue
Perl's long tradition of stealing the best ideas from other languages  
(including future versions
of Perl itself). We will also be doing a lot more lightning talks  
(because people like them).

What can you do?

Register to attend.

	http://conferences.yapceurope.org/lpw2007/

Propose a talk (remember lightning talks particularly welcome!)

	Same as above. n.b. you need to be registered to submit a proposal.  
The deadline for
	proposals is if I remember, remember correctly, the 5th of November.  
But please don't
	leave it to the last minute.
	(Talks should be 5 (lightning), 15 or 30 minutes long, unless it's  
something exceptional.)

Did you steal the opening paragraph from last year's announcement?

Of course, we're lazy.


From mailinglisten at renee-baecker.de  Mon Oct  8 03:02:59 2007
From: mailinglisten at renee-baecker.de (mailinglisten at renee-baecker.de)
Date: Mon, 8 Oct 2007 12:02:59 +0200
Subject: [Vienna-pm] 10. Deutscher Perl-Workshop // 2. Call for Papers
Message-ID: <20071008_100259_007958.mailinglisten@renee-baecker.de>

Hallo Perlmongers,

der Call for Papers f?r den 10. Deutschen Perl-Workshop l?uft schon seit ein paar Wochen. Es w?re sch?n, wenn sich noch ein paar Vortragsvorschl?ge beim Orga-Team eingehen w?rdem. 

Vortragsvorschl?ge k?nnen noch bis 29.10.2007 ?ber die Webseite des Perl-Workshops [1] eingereicht werden. Ihr braucht da noch keinen kompletten Vortrag einreichen sondern "nur" einen Abstract, der beschreibt ?ber was der Vortrag gehen soll. Der ausf?hrliche "Call for Papers" ist auch im Internet zu finden [2].

Der 10. Deutsche Perl-Workshop findet vom 13.-15. Februar 2008 am Regionalen Rechenzentrum in Erlangen statt.

Der Workshop steht und f?llt mit den Vortr?gen!

Das Orga-Team hat eine (unverbindliche) Liste mit Themenvorschl?gen bereitgestellt:

    * Aktuelle Web-Frameworks: Catalyst, Jifty, AxKit2, ...
    * Objektorientierung: Moose, Moose::Autobox, ...
    * Datenbankabstraktion: DBIx::Class
    * SPAM-Abwehr/Erkennung
    * Unicode
    * Perl-IO
    * Perl 6
    * Perl6-in-Perl5-Integration und vice versa
    * "wirklich gro?e" Perl-Systeme
    * Releasemanagement
    * Vergleich von "gleichen" Softwaresystemen (Template-Engines, Wikis, XML-Engines, ...)
    * Vertr?glichkeit mit anderen Systemen
    * (plattform?bergreifende) GUI-Programmierung
    * Erfahrungsberichte zum Einsatz von Perl (z.B. Inbetriebnahme gr?sserer Perl-Systeme (WebGUI, ...))
    * Grundlagen-Tutorials zu allen Perl-Themen (XML, Web, DBI, ...)

Wenn euer "Lieblingsthema" nicht dabei ist, k?nnt ihr trotzdem einen Vortrag einreichen. Diese Liste ist ja nicht vollst?ndig...

Gru?,
Renee

[1] http://www.perl-workshop.de
[2] http://www.perl-workshop.de/de/2008/cfp.html


From domm at cpan.org  Sun Oct 14 12:42:35 2007
From: domm at cpan.org (Thomas Klausner)
Date: Sun, 14 Oct 2007 21:42:35 +0200
Subject: [Vienna-pm] Emergency Social Meeting: Besuch von Tara Andrews
Message-ID: <20071014194235.GB11601@d610.chello.at>

Hi!

Tara Andrews (http://vienna.yapceurope.org/ye2007/user/2041 
http://www.eccentricity.org/~tla/  ) ist MO/DI in Wien (um Armenische 
Schriftrollen zu studieren...).

Deshalb findet am MO, 15.10., ab 19:00 ein Social Notfalls-Meeting im
Shabu statt:
  Shabu
  1020 Wien, Rotensterngasse 8 (Ecke Glockengasse)
  http://vienna.openguides.org/wiki.cgi?Shabu
  http://www.falter.at/web/wwei/detail.php?nr=4395&ref=(bezirk%3D2%26att%3D6%26teil%3D1)

Ich reserviere einen Tisch auf "Perl".

Leider kann ich selber erst gegen 21:00 auftauchen, aber Leo wird so um 
19:00 da sein. Tara wohl auch...

Bis dann!

-- 
#!/usr/bin/perl                              http://domm.plix.at
for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/}

From rgiersig at cpan.org  Mon Oct 15 07:57:17 2007
From: rgiersig at cpan.org (Roland Giersig)
Date: Mon, 15 Oct 2007 16:57:17 +0200
Subject: [Vienna-pm] Emergency Social Meeting: Besuch von Tara Andrews
In-Reply-To: <20071014194235.GB11601@d610.chello.at>
References: <20071014194235.GB11601@d610.chello.at>
Message-ID: <47137FCD.1050407@cpan.org>

Sozialer Notfall?! Seit wann sind Perl-Programmierer soziale Notf?lle?! :-)

Ich werd schaun, dass ich um 19 Uhr dort bin, ist ja ganz in meiner
N?he... Kann allerdings nicht allzu lange...

LG, Roland


Thomas Klausner wrote:
> Hi!
> 
> Tara Andrews (http://vienna.yapceurope.org/ye2007/user/2041 
> http://www.eccentricity.org/~tla/  ) ist MO/DI in Wien (um Armenische 
> Schriftrollen zu studieren...).
> 
> Deshalb findet am MO, 15.10., ab 19:00 ein Social Notfalls-Meeting im
> Shabu statt:
>   Shabu
>   1020 Wien, Rotensterngasse 8 (Ecke Glockengasse)
>   http://vienna.openguides.org/wiki.cgi?Shabu
>   http://www.falter.at/web/wwei/detail.php?nr=4395&ref=(bezirk%3D2%26att%3D6%26teil%3D1)
> 
> Ich reserviere einen Tisch auf "Perl".
> 
> Leider kann ich selber erst gegen 21:00 auftauchen, aber Leo wird so um 
> 19:00 da sein. Tara wohl auch...
> 
> Bis dann!
> 


From michael.kroell at uibk.ac.at  Mon Oct 15 08:00:27 2007
From: michael.kroell at uibk.ac.at (=?ISO-8859-1?Q?Michael_Kr=F6ll?=)
Date: Mon, 15 Oct 2007 17:00:27 +0200
Subject: [Vienna-pm] Emergency Social Meeting: Besuch von Tara Andrews
In-Reply-To: <47137FCD.1050407@cpan.org>
References: <20071014194235.GB11601@d610.chello.at> <47137FCD.1050407@cpan.org>
Message-ID: <4713808B.5060904@uibk.ac.at>

Roland Giersig wrote:
> Sozialer Notfall?! Seit wann sind Perl-Programmierer soziale Notf?lle?! :-)

H?ngt vom Bierkonsum beim jeweiligen Meeting ab ;-)

> Ich werd schaun, dass ich um 19 Uhr dort bin, ist ja ganz in meiner
> N?he... Kann allerdings nicht allzu lange...

ditto

lg,
michael


-- 
063A F25E B064 A98F A479  1690 78CD D023 5E2A 6688
http://zis.uibk.ac.at/.m/uibk.ac.at_pgp_pubkey.asc

From domm at cpan.org  Mon Oct 15 08:27:27 2007
From: domm at cpan.org (Thomas Klausner)
Date: Mon, 15 Oct 2007 17:27:27 +0200
Subject: [Vienna-pm] Emergency Social Meeting: Besuch von Tara Andrews
In-Reply-To: <47137FCD.1050407@cpan.org>
References: <20071014194235.GB11601@d610.chello.at> <47137FCD.1050407@cpan.org>
Message-ID: <20071015152726.GE3486@d610.chello.at>

Hi!

On Mon, Oct 15, 2007 at 04:57:17PM +0200, Roland Giersig wrote:
> Sozialer Notfall?! Seit wann sind Perl-Programmierer soziale Notf?lle?! :-)

Mit "emergency social meetings" sind aussertourliche, extratreffen 
gemeint". siehe zB
http://mail.pm.org/pipermail/tyneside-pm/2001-August/000029.html
oder google

> Ich werd schaun, dass ich um 19 Uhr dort bin, ist ja ganz in meiner
> N?he... Kann allerdings nicht allzu lange...

Super.

Ich bin noch nicht 100%ig sicher, ob ich wirklich einen Tisch 
reservieren kann, weil bisher noch niemand ans Telefon gegangen ist...

Aber ihr kennt euch eh, und Tara hat hier ein foto:
http://www.eccentricity.org/~tla/

> LG, Roland
> 
> 
> Thomas Klausner wrote:
> > Hi!
> > 
> > Tara Andrews (http://vienna.yapceurope.org/ye2007/user/2041 
> > http://www.eccentricity.org/~tla/  ) ist MO/DI in Wien (um Armenische 
> > Schriftrollen zu studieren...).
> > 
> > Deshalb findet am MO, 15.10., ab 19:00 ein Social Notfalls-Meeting im
> > Shabu statt:
> >   Shabu
> >   1020 Wien, Rotensterngasse 8 (Ecke Glockengasse)
> >   http://vienna.openguides.org/wiki.cgi?Shabu
> >   http://www.falter.at/web/wwei/detail.php?nr=4395&ref=(bezirk%3D2%26att%3D6%26teil%3D1)
> > 
> > Ich reserviere einen Tisch auf "Perl".
> > 
> > Leider kann ich selber erst gegen 21:00 auftauchen, aber Leo wird so um 
> > 19:00 da sein. Tara wohl auch...
> > 
> > Bis dann!
> > 
> 
> _______________________________________________
> Vienna-pm mailing list
> Vienna-pm at pm.org
> http://mail.pm.org/mailman/listinfo/vienna-pm

-- 
#!/usr/bin/perl                              http://domm.plix.at
for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/}

From oliver.baier at lotterien.at  Wed Oct 17 23:13:03 2007
From: oliver.baier at lotterien.at (Baier Oliver)
Date: Thu, 18 Oct 2007 08:13:03 +0200
Subject: [Vienna-pm] =?iso-8859-1?q?kein_SIG=7BALRM=7D_w=E4hrend_flock=3F?=
Message-ID: <18297712.1192687984415.JavaMail.root@rwopss003>

Hi,

in einem Programm verwende ich mehrfach alarme um eventuelle timeouts
nicht abwarten zu m?ssen. W?hrend einem open von Dateien funktioniert
das pr?chtig, aber wenn ich dann auf die Freigabe eines Locks warte,
scheint der alarm nicht zu greifen.

...
$SIG{ALRM} = sub { notify "CRITICAL>  $statfile still locked after 30 seconds!"; exit 1 };
alarm 30;
if (open STATFILE, "+>> $statfile") {
    flock STATFILE, 2;
### hier geht's oft erst nach Minuten weiter...
...

Kann mir wer sagen, wie ich da drum herum komm?

lg
Oliver

Oesterreichische Lotterien Gesellschaft m.b.H., Rennweg 44, A-1038 Wien,
FN 54472 g, Handelsgericht Wien, DVR-Nr: 0476706

---
Laden Sie das E-Mail Wurzelzertifikat der Oesterreichischen Lotterien zur Vervollst?ndigung des Validierungspfades.
Download the E-Mail root certificate of the Austrian Lotteries for completing the validation-path. 
http://www.lotterien.at/gaming/mailcert.html
-------------- next part --------------
A non-text attachment was scrubbed...
Name: smime.p7s
Type: application/pkcs7-signature
Size: 3634 bytes
Desc: not available
Url : http://mail.pm.org/pipermail/vienna-pm/attachments/20071018/c21ca6b5/attachment.bin 

From lt at toetsch.at  Thu Oct 18 02:27:04 2007
From: lt at toetsch.at (Leopold Toetsch)
Date: Thu, 18 Oct 2007 11:27:04 +0200
Subject: [Vienna-pm]
	=?iso-8859-15?q?kein_SIG=7BALRM=7D_w=E4hrend_flock=3F?=
In-Reply-To: <18297712.1192687984415.JavaMail.root@rwopss003>
References: <18297712.1192687984415.JavaMail.root@rwopss003>
Message-ID: <200710181127.04537.lt@toetsch.at>

Am Donnerstag, 18. Oktober 2007 08:13 schrieb Baier Oliver:
> Hi,
>
> in einem Programm verwende ich mehrfach alarme um eventuelle timeouts
> nicht abwarten zu m?ssen. W?hrend einem open von Dateien funktioniert
> das pr?chtig, aber wenn ich dann auf die Freigabe eines Locks warte,
> scheint der alarm nicht zu greifen.
>
> ...
> $SIG{ALRM} = sub { notify "CRITICAL>  $statfile still locked after 30
> seconds!"; exit 1 }; alarm 30;
> if (open STATFILE, "+>> $statfile") {
>     flock STATFILE, 2;
> ### hier geht's oft erst nach Minuten weiter...
> ...
>
> Kann mir wer sagen, wie ich da drum herum komm?

Kann ich nicht nachvoilziehen, ganz im Gegentum:
CRITICAL> x.lock still locked after 3 seconds! at lk.pl line 6.

(Ein 2. lk.pl hatte ein flock auf das File)

Auf welchem Filesystem liegt das $statfile? NFS?

> lg
> Oliver

leo

From oliver.baier at lotterien.at  Thu Oct 18 03:46:16 2007
From: oliver.baier at lotterien.at (Baier Oliver)
Date: Thu, 18 Oct 2007 12:46:16 +0200
Subject: [Vienna-pm]
	=?iso-8859-1?q?kein_SIG=7BALRM=7D_w=E4hrend_flock=3F?=
In-Reply-To: <200710181127.04537.lt@toetsch.at>
References: <18297712.1192687984415.JavaMail.root@rwopss003>
	<200710181127.04537.lt@toetsch.at>
Message-ID: <788902.1192704376971.JavaMail.root@rwopss003>

Interessant, dass es bei dir klappt...

es geht zwar um shares, aber das statfile liegt am lokalen FS.
Auch mit einem "eval" drumherum und "die" greift der alarm nicht.

(Ich verwende v5.8.5 built for x86_64-linux-thread-multi mit RHEL4)

lg
Oliver


> -----Urspr?ngliche Nachricht-----
> Von: Leopold Toetsch [mailto:lt at toetsch.at] 
> Gesendet: Donnerstag, 18. Oktober 2007 11:27
> An: vienna-pm at pm.org
> Cc: Baier Oliver
> Betreff: Re: [Vienna-pm] kein SIG{ALRM} w?hrend flock?
> 
> Am Donnerstag, 18. Oktober 2007 08:13 schrieb Baier Oliver:
> > Hi,
> >
> > in einem Programm verwende ich mehrfach alarme um 
> eventuelle timeouts
> > nicht abwarten zu m?ssen. W?hrend einem open von Dateien 
> funktioniert
> > das pr?chtig, aber wenn ich dann auf die Freigabe eines Locks warte,
> > scheint der alarm nicht zu greifen.
> >
> > ...
> > $SIG{ALRM} = sub { notify "CRITICAL>  $statfile still 
> locked after 30
> > seconds!"; exit 1 }; alarm 30;
> > if (open STATFILE, "+>> $statfile") {
> >     flock STATFILE, 2;
> > ### hier geht's oft erst nach Minuten weiter...
> > ...
> >
> > Kann mir wer sagen, wie ich da drum herum komm?
> 
> Kann ich nicht nachvoilziehen, ganz im Gegentum:
> CRITICAL> x.lock still locked after 3 seconds! at lk.pl line 6.
> 
> (Ein 2. lk.pl hatte ein flock auf das File)
> 
> Auf welchem Filesystem liegt das $statfile? NFS?
> 
> > lg
> > Oliver
> 
> leo
> 

Oesterreichische Lotterien Gesellschaft m.b.H., Rennweg 44, A-1038 Wien,
FN 54472 g, Handelsgericht Wien, DVR-Nr: 0476706

---
Laden Sie das E-Mail Wurzelzertifikat der Oesterreichischen Lotterien zur Vervollst?ndigung des Validierungspfades.
Download the E-Mail root certificate of the Austrian Lotteries for completing the validation-path. 
http://www.lotterien.at/gaming/mailcert.html
-------------- next part --------------
A non-text attachment was scrubbed...
Name: smime.p7s
Type: application/pkcs7-signature
Size: 3634 bytes
Desc: not available
Url : http://mail.pm.org/pipermail/vienna-pm/attachments/20071018/a491cf1a/attachment.bin 

From lt at toetsch.at  Thu Oct 18 04:02:36 2007
From: lt at toetsch.at (Leopold Toetsch)
Date: Thu, 18 Oct 2007 13:02:36 +0200
Subject: [Vienna-pm]
	=?iso-8859-15?q?kein_SIG=7BALRM=7D_w=E4hrend_flock=3F?=
In-Reply-To: <788902.1192704376971.JavaMail.root@rwopss003>
References: <18297712.1192687984415.JavaMail.root@rwopss003>
	<200710181127.04537.lt@toetsch.at>
	<788902.1192704376971.JavaMail.root@rwopss003>
Message-ID: <200710181302.36182.lt@toetsch.at>

Am Donnerstag, 18. Oktober 2007 12:46 schrieb Baier Oliver:
> Interessant, dass es bei dir klappt...
>
> es geht zwar um shares, aber das statfile liegt am lokalen FS.
> Auch mit einem "eval" drumherum und "die" greift der alarm nicht.

Du k?nntest mit LOCK_NB eine non-blocking Variante probieren. 

leo

From domm at cpan.org  Tue Oct 23 01:45:14 2007
From: domm at cpan.org (Thomas Klausner)
Date: Tue, 23 Oct 2007 10:45:14 +0200
Subject: [Vienna-pm] Einladung: Vienna.pm TechSocialMeet #2: 5. November 2007
Message-ID: <20071023084514.GF9715@d610.chello.at>

Hi!

Einladung zum Vienna.pm TechSocialMeeting

am MO, 5.11.2007, um 19:00

Der Tech-Teil findet wie gehabt statt im
  NIG, Raum D116, im Gang D,
  siehe http://www.univie.ac.at/ZID/plaene/nig-leer.gif

Programm:
  Wir bekommen Besuch aus Bratislava von Jozef Kutej
  http://search.cpan.org/~jkutej/

  Jozef wird ueber verschiedene Catalyst-Themen reden, zB
  - getting rid of "please come back later"
  - wie kann mann "$c" im non Web Skripten haben
  - was ist ein Catalyst Plugin
  - automatisch Database Table ?nderungen History mit Database Triggers und
    plperl im Postregres
  - user authentication mit Client Certificates (und mod_perl)
  - wie die pod Dokumentation fur DBIx::Class Tables aussieht
  - "nasty" session bug im Catalyst version die ist im default Debian package
  - mein $c->controller('Email') fur email handlung
 
  Der Vortrag wird auf Englisch gehalten!

Der Social-Teil findet diese mal statt im
  Restaurant Sperl
  Karolinengasse 13
  1040 Wien 
  (erreichbar mit dem D-Wagen von der Uni aus)

  Wir werden dort wohl gegen 20:30 / 21:00 auftauchen.

Bis dann!

-- 
#!/usr/bin/perl                              http://domm.plix.at
for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/}

From wilhelm.nagy at bfw.gv.at  Tue Oct 23 01:41:33 2007
From: wilhelm.nagy at bfw.gv.at (nagy)
Date: Tue, 23 Oct 2007 10:41:33 +0200
Subject: [Vienna-pm] Einladung: Vienna.pm TechSocialMeet #2: 5. November
	2007
Message-ID: <BB0F801764F1DD4F9CA5C1414C31C2E67B7CD3@mail.bfw.gv.at>

$countTeilnehmer++
\^/ili


-----Urspr?ngliche Nachricht-----
Von: Thomas Klausner [mailto:domm at cpan.org] 
Gesendet: Dienstag, 23. Oktober 2007 09:45
An: vienna-pm at pm.org
Betreff: [Vienna-pm] Einladung: Vienna.pm TechSocialMeet #2: 5. November 2007


Hi!

Einladung zum Vienna.pm TechSocialMeeting

am MO, 5.11.2007, um 19:00

Der Tech-Teil findet wie gehabt statt im
  NIG, Raum D116, im Gang D,
  siehe http://www.univie.ac.at/ZID/plaene/nig-leer.gif

Programm:
  Wir bekommen Besuch aus Bratislava von Jozef Kutej
  http://search.cpan.org/~jkutej/

  Jozef wird ueber verschiedene Catalyst-Themen reden, zB
  - getting rid of "please come back later"
  - wie kann mann "$c" im non Web Skripten haben
  - was ist ein Catalyst Plugin
  - automatisch Database Table ?nderungen History mit Database Triggers und
    plperl im Postregres
  - user authentication mit Client Certificates (und mod_perl)
  - wie die pod Dokumentation fur DBIx::Class Tables aussieht
  - "nasty" session bug im Catalyst version die ist im default Debian package
  - mein $c->controller('Email') fur email handlung
 
  Der Vortrag wird auf Englisch gehalten!

Der Social-Teil findet diese mal statt im
  Restaurant Sperl
  Karolinengasse 13
  1040 Wien 
  (erreichbar mit dem D-Wagen von der Uni aus)

  Wir werden dort wohl gegen 20:30 / 21:00 auftauchen.

Bis dann!

-- 
#!/usr/bin/perl                              http://domm.plix.at
for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/}
_______________________________________________
Vienna-pm mailing list
Vienna-pm at pm.org
http://mail.pm.org/mailman/listinfo/vienna-pm

From rho at devc.at  Tue Oct 23 02:09:57 2007
From: rho at devc.at (Robert Barta)
Date: Tue, 23 Oct 2007 11:09:57 +0200
Subject: [Vienna-pm] Einladung: Vienna.pm TechSocialMeet #2: 5. November
	2007
In-Reply-To: <20071023084514.GF9715@d610.chello.at>
References: <20071023084514.GF9715@d610.chello.at>
Message-ID: <20071023090957.GA11295@mando.int.devc.at>

On Tue, Oct 23, 2007 at 10:45:14AM +0200, Thomas Klausner wrote:
> Einladung zum Vienna.pm TechSocialMeeting
> 
> am MO, 5.11.2007, um 19:00

Damn. Das ueberlappt sich mit meiner Vorlesung, d.h. ich werd erst
spaeter dazustossen koennen.

\rho
-- 
And then he said: "You should read my blog." http://kill.devc.at/

From domm at cpan.org  Tue Oct 23 06:31:43 2007
From: domm at cpan.org (Thomas Klausner)
Date: Tue, 23 Oct 2007 15:31:43 +0200
Subject: [Vienna-pm] pseudo-bitmask to ints
Message-ID: <20071023133142.GP9715@d610.chello.at>

Hi!

Weil im IRC grad alle schmaestad sind:

Fuer folgendes Problem such ich eine kleine, praktische Loesung:

Gegeben ist ein String in der Form '00?1' der eine Bitmask darstellt

Ich brauche alle Ints, die dieser Batmask-Pseudo-Regex matchen, also in 
diesem Fall 1 und 3

bzw, ich haatte gerne eine Funktion:
   
   pseudobitmask2ints('00?1');   # (1,3)
   pseudobitmask2ints('1??1');   # (9,11,15,16)
   pseudobitmask2ints('0100');   # (4)

Mir reichen 4 bits.

Weiss da jemand was parktischen?

-- 
#!/usr/bin/perl                              http://domm.plix.at
for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/}

From domm at cpan.org  Tue Oct 23 06:42:49 2007
From: domm at cpan.org (Thomas Klausner)
Date: Tue, 23 Oct 2007 15:42:49 +0200
Subject: [Vienna-pm] pseudo-bitmask to ints
In-Reply-To: <20071023133142.GP9715@d610.chello.at>
References: <20071023133142.GP9715@d610.chello.at>
Message-ID: <20071023134248.GQ9715@d610.chello.at>

Hi!

On Tue, Oct 23, 2007 at 03:31:43PM +0200, Thomas Klausner wrote:
 
> Gegeben ist ein String in der Form '00?1' der eine Bitmask darstellt
> 
> Ich brauche alle Ints, die dieser Batmask-Pseudo-Regex matchen, also in 
> diesem Fall 1 und 3

Hm, ev kann ich den Genome Sequence Generator aus HOP verwenden (oder 
ist das Kanone->Spatz?). Mal probieren...

-- 
#!/usr/bin/perl                              http://domm.plix.at
for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/}

From mailinglisten at renee-baecker.de  Tue Oct 23 07:21:01 2007
From: mailinglisten at renee-baecker.de (ReneeB)
Date: Tue, 23 Oct 2007 16:21:01 +0200
Subject: [Vienna-pm] pseudo-bitmask to ints
In-Reply-To: <20071023133142.GP9715@d610.chello.at>
References: <20071023133142.GP9715@d610.chello.at>
Message-ID: <471E034D.3090502@renee-baecker.de>

Auf die Schnelle w?rde mir so etwas einfallen:

#!/usr/bin/perl

use strict;
use warnings;
use Algorithm::Permute;

pseudobitmask2ints('00?1');   # (1,3)
pseudobitmask2ints('1??1');   # (9,11,15,16)
pseudobitmask2ints('0100');   # (4)


sub pseudobitmask2ints{
    my ($string) = @_;
    my $quest = () = $string =~ /(\?)/g;
    my @bits = (0,1) x $quest;
   
    unless( $quest ){
        print bin2dec($string)," " unless $quest;
    }
    else{
        my %perms;
        my $perm = Algorithm::Permute->new( \@bits );
        while( my @combo = $perm->next ){
            my $tmp = $string;
            for my $bit ( @combo ){
                $tmp =~ s/\?/$bit/;
            }
            next if $perms{$tmp}++;
            print bin2dec($tmp)," ";
        }
    }
   
    print "\n";
}

sub bin2dec {
    return unpack("N", pack("B32", substr("0" x 32 . shift, -32)));
}


Ist auch nicht auf bits eingeschr?nkt...

Gru?,
Ren?e

Thomas Klausner wrote:
> Hi!
>
> Weil im IRC grad alle schmaestad sind:
>
> Fuer folgendes Problem such ich eine kleine, praktische Loesung:
>
> Gegeben ist ein String in der Form '00?1' der eine Bitmask darstellt
>
> Ich brauche alle Ints, die dieser Batmask-Pseudo-Regex matchen, also in 
> diesem Fall 1 und 3
>
> bzw, ich haatte gerne eine Funktion:
>    
>    pseudobitmask2ints('00?1');   # (1,3)
>    pseudobitmask2ints('1??1');   # (9,11,15,16)
>    pseudobitmask2ints('0100');   # (4)
>
> Mir reichen 4 bits.
>
> Weiss da jemand was parktischen?
>
>   


-- 
$foo - Perl-Magazin (http://foo-magazin.de)
Perl-Community.de (http://board.perl-community.de)
Perl-Blog (http://reneeb-perlblog.blogspot.com)


From domm at cpan.org  Tue Oct 23 07:26:52 2007
From: domm at cpan.org (Thomas Klausner)
Date: Tue, 23 Oct 2007 16:26:52 +0200
Subject: [Vienna-pm] pseudo-bitmask to ints
In-Reply-To: <471E034D.3090502@renee-baecker.de>
References: <20071023133142.GP9715@d610.chello.at>
	<471E034D.3090502@renee-baecker.de>
Message-ID: <20071023142652.GR9715@d610.chello.at>

Hi!

On Tue, Oct 23, 2007 at 04:21:01PM +0200, ReneeB wrote:
> Auf die Schnelle w?rde mir so etwas einfallen:

Ah, Cool.

Ich bin grad dazu gekommen:

sub p2i {
    my ($todo,$done)=@_;
    $done=[] unless $done;
    foreach my $string (@$todo) {
        my $one=my $zero=$string;
        $one=~s/\D/1/;
        $zero=~s/\D/0/;
        if ($one=~/\D/) {
            p2i([$one,$zero],$done) if $one=~/\D/;
        }
        else {
            push(@$done,$one,$zero);
        }
    }
}

print join "\n",@{ p2i(['0??0']) };
0110
0100
0010
0000

Allerdings geht das nicht bei Input wie 0110 (der nicht permutiert gehoert)...

Jetzt schau ich mir deine Loesung mal genau an, Danke!


-- 
#!/usr/bin/perl                              http://domm.plix.at
for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/}

From mailinglisten at renee-baecker.de  Tue Oct 23 07:38:38 2007
From: mailinglisten at renee-baecker.de (ReneeB)
Date: Tue, 23 Oct 2007 16:38:38 +0200
Subject: [Vienna-pm] pseudo-bitmask to ints
In-Reply-To: <20071023142652.GR9715@d610.chello.at>
References: <20071023133142.GP9715@d610.chello.at>	<471E034D.3090502@renee-baecker.de>
	<20071023142652.GR9715@d610.chello.at>
Message-ID: <471E076E.8090706@renee-baecker.de>

Hi,

Deins und meins gemischt (funktioniert ganz gut):

#!/usr/bin/perl

use strict;
use warnings;

pseudobitmask2ints('00?1');   # (1,3)
pseudobitmask2ints('1??1');   # (9,11,15,16)
pseudobitmask2ints('0100');   # (4)
pseudobitmask2ints('0100??');   # (4)

sub p2i {
    my ($todo,$done)=@_;
    $done=[] unless $done;
    foreach my $string (@$todo) {
        my $one=my $zero=$string;
        $one=~s/\D/1/;
        $zero=~s/\D/0/;
        if ($one=~/\D/) {
            p2i([$one,$zero],$done);
        }
        else {
            push(@$done,$one,$zero);
        }
    }

    return $done;
}

sub pseudobitmask2ints{
    my ($string) = @_;
    my $quest = () = $string =~ /(\?)/g;
   
    unless( $quest ){
        print bin2dec($string)," " unless $quest;
    }
    else{
        print bin2dec( $_ )," " for @{ p2i([$string]) };
    }
   
    print "\n";
}

sub bin2dec {
    return unpack("N", pack("B32", substr("0" x 32 . shift, -32)));
}

-- 
$foo - Perl-Magazin (http://foo-magazin.de)
Perl-Community.de (http://board.perl-community.de)
Perl-Blog (http://reneeb-perlblog.blogspot.com)


From domm at cpan.org  Tue Oct 23 07:59:27 2007
From: domm at cpan.org (Thomas Klausner)
Date: Tue, 23 Oct 2007 16:59:27 +0200
Subject: [Vienna-pm] pseudo-bitmask to ints
In-Reply-To: <471E076E.8090706@renee-baecker.de>
References: <20071023133142.GP9715@d610.chello.at>
	<471E034D.3090502@renee-baecker.de>
	<20071023142652.GR9715@d610.chello.at>
	<471E076E.8090706@renee-baecker.de>
Message-ID: <20071023145924.GS9715@d610.chello.at>

Hi!

On Tue, Oct 23, 2007 at 04:38:38PM +0200, ReneeB wrote:
 
> Deins und meins gemischt (funktioniert ganz gut):

yay! Und jetzt noch statt dem pack/unpack ein kleiner String-Eval Hack:

sub p2i {
    my ($todo,$done)=@_;
    return $todo if $todo !~ /\D/;
    $todo=[$todo] unless ref($todo) eq 'ARRAY';
    $done=[] unless $done;

    foreach my $string (@$todo) {
        my $one=my $zero=$string;
        $one=~s/\D/1/;
        $zero=~s/\D/0/;
        if ($one=~/\D/) {
            p2i([$one,$zero],$done) if $one=~/\D/;
        }
        else {
            push(@$done,map { eval "0b$_" } $one,$zero);
        }
    }
    return wantarray ? @$done : $done;
}

Eigentlich gehoerte hier wohl noch mehr input checking rein (zB explodierts bei
input wie 00?5)
Andererseits koennte man den Kern wohl noch recht nett golfen :-)

-- 
#!/usr/bin/perl                              http://domm.plix.at
for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/}

From schaefer at mond.at  Tue Oct 23 08:23:09 2007
From: schaefer at mond.at (franz schaefer)
Date: Tue, 23 Oct 2007 17:23:09 +0200
Subject: [Vienna-pm] pseudo-bitmask to ints
In-Reply-To: <20071023145924.GS9715@d610.chello.at>
References: <20071023133142.GP9715@d610.chello.at>
	<471E034D.3090502@renee-baecker.de>
	<20071023142652.GR9715@d610.chello.at>
	<471E076E.8090706@renee-baecker.de>
	<20071023145924.GS9715@d610.chello.at>
Message-ID: <20071023152309.GA2172@mond.at>

meins schaut aehnlich aus....

lg mond.


#!/usr/bin/perl -w

print join(',',bitmap2int('?0?1')),"\n";

sub bitmap2int {
  my $map=shift;
  
  my $p=1;
  my $b=0;
  my @v=(0);
  foreach(reverse(split('',$map))) {
    $b += $p if $_ eq '1'; 
    if ($_ eq '?' ) {
     push @v,map { $p + $_   }  @v ;
    }
    $p = 2 * $p;
  }
  @v=map { $_ + $b } @v;
  return @v;
}


-- 
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
   .                Franz Schaefer         GPG KeyID: CFA2F632
  ..  +43 699 106 14 590 +43 720502048  Fingerprint: 57C2 C0CC
  ...             schaefer at mond.at         6F0A 54C7 0D88 D37E 
    ...          http://www.mond.at/       C17C CB16 CFA2 F632


From rgiersig at cpan.org  Tue Oct 23 09:21:15 2007
From: rgiersig at cpan.org (Roland Giersig)
Date: Tue, 23 Oct 2007 18:21:15 +0200
Subject: [Vienna-pm] pseudo-bitmask to ints
In-Reply-To: <20071023133142.GP9715@d610.chello.at>
References: <20071023133142.GP9715@d610.chello.at>
Message-ID: <471E1F7B.7090607@cpan.org>

Hach, das ist doch ein Einzeiler... *prahlerischtu*

perl -wle 'print join("\n", glob("0{0,1}{0,1}0"))'

Der Einbau des s/\?/\{0,1\}/g wird als ?bungsaufgabe dem interessierten 
Leser ?berlassen... ;-)))

LG, Roland

Thomas Klausner wrote:
> Hi!
> 
> Weil im IRC grad alle schmaestad sind:
> 
> Fuer folgendes Problem such ich eine kleine, praktische Loesung:
> 
> Gegeben ist ein String in der Form '00?1' der eine Bitmask darstellt
> 
> Ich brauche alle Ints, die dieser Batmask-Pseudo-Regex matchen, also in 
> diesem Fall 1 und 3
> 
> bzw, ich haatte gerne eine Funktion:
>    
>    pseudobitmask2ints('00?1');   # (1,3)
>    pseudobitmask2ints('1??1');   # (9,11,15,16)
>    pseudobitmask2ints('0100');   # (4)
> 
> Mir reichen 4 bits.
> 
> Weiss da jemand was parktischen?
> 

From gr at univie.ac.at  Tue Oct 23 09:41:53 2007
From: gr at univie.ac.at (=?ISO-8859-1?Q?Marcel_Gr=FCnauer?=)
Date: Tue, 23 Oct 2007 18:41:53 +0200
Subject: [Vienna-pm] pseudo-bitmask to ints
In-Reply-To: <20071023133142.GP9715@d610.chello.at>
References: <20071023133142.GP9715@d610.chello.at>
Message-ID: <69E9925B-8266-4063-8DDD-2830C5670614@univie.ac.at>

On Oct 23, 2007, at 3:31 PM, Thomas Klausner wrote:

> bzw, ich haatte gerne eine Funktion:
>
>    pseudobitmask2ints('00?1');   # (1,3)
>    pseudobitmask2ints('1??1');   # (9,11,15,16)

16? Wie? Eher 9, 11, 13, 15.

>    pseudobitmask2ints('0100');   # (4)

Also alles in allem, mit Rolands elegantem glob()-Code:

perl -le'print unpack("N", pack("B32", substr("0" x 32 . $_, -32)))  
for glob("1{0,1}{0,1}1")'
9
11
13
15

Marcel


From e9427749 at stud4.tuwien.ac.at  Tue Oct 23 12:57:46 2007
From: e9427749 at stud4.tuwien.ac.at (Josef)
Date: Tue, 23 Oct 2007 21:57:46 +0200
Subject: [Vienna-pm] pseudo-bitmask to ints
In-Reply-To: <69E9925B-8266-4063-8DDD-2830C5670614@univie.ac.at>
References: <20071023133142.GP9715@d610.chello.at>
	<69E9925B-8266-4063-8DDD-2830C5670614@univie.ac.at>
Message-ID: <471E523A.3040003@stud4.tuwien.ac.at>

Hi, allerseits!

Neben glob gebt's da das Regexp::Genex Modul.
(Ansonsten fielen mir noch *::Combinatorics und
  Quantum::Superpositions ein ;-)

Aber aus sportlichen Gr?nden noch eine Variante
ohne glob und Co.

use strict;
use warnings;

sub pseudobitmask2bitmasks (@);
sub binstr2num (@);

sub pseudobitmasks2ints (@)
   { return binstr2num pseudobitmask2bitmasks @_ }

sub pseudobitmask2bitmasks (@)
{ return map {
    /^([01]*)\?(.*)$/ ? pseudobitmask2bitmasks("${1}0$2","${1}1$2") : $_;
   } @_;
}

sub binstr2num (@) { return map { oct("0b$_") } @_ }

# test
print join ', ',pseudobitmasks2ints('1??1');
9, 11, 13, 15

----------
Und f?r die die einem Quanten-Computer ihr eigen nennen:

use strict;
use warnings;

use Quantum::Superpositions qw(any eigenstates);

sub pseudobitmask2superint ($)
{ my @maskbits=split '',$_[0];
   my $ret=0;
   my $cat=any(1,0); # 1=lebt, 0=tot
   for (my $f=1,my $bit;defined($bit=pop @maskbits);$f<<=1)
     { $ret+= ($bit eq '?' ? $cat : $bit) * $f }
   return $ret
}

# test
print "passt!\n" if pseudobitmask2superint('1??1')==11;
print join ', ',eigenstates pseudobitmask2superint('1??1');


pfiateng,
   Josef



From rgiersig at cpan.org  Wed Oct 24 02:09:31 2007
From: rgiersig at cpan.org (Roland Giersig)
Date: Wed, 24 Oct 2007 11:09:31 +0200
Subject: [Vienna-pm] Einladung: Vienna.pm TechSocialMeet #2: 5. November
 2007
In-Reply-To: <20071023084514.GF9715@d610.chello.at>
References: <20071023084514.GF9715@d610.chello.at>
Message-ID: <471F0BCB.7020409@cpan.org>

wenn ich nicht wieder krank werd, bin ich diesmal dabei... :-)


Thomas Klausner wrote:
> Hi!
> 
> Einladung zum Vienna.pm TechSocialMeeting
> 
> am MO, 5.11.2007, um 19:00
> 
> Der Tech-Teil findet wie gehabt statt im
>   NIG, Raum D116, im Gang D,
>   siehe http://www.univie.ac.at/ZID/plaene/nig-leer.gif
> 
> Programm:
>   Wir bekommen Besuch aus Bratislava von Jozef Kutej
>   http://search.cpan.org/~jkutej/
> 
>   Jozef wird ueber verschiedene Catalyst-Themen reden, zB
>   - getting rid of "please come back later"
>   - wie kann mann "$c" im non Web Skripten haben
>   - was ist ein Catalyst Plugin
>   - automatisch Database Table ?nderungen History mit Database Triggers und
>     plperl im Postregres
>   - user authentication mit Client Certificates (und mod_perl)
>   - wie die pod Dokumentation fur DBIx::Class Tables aussieht
>   - "nasty" session bug im Catalyst version die ist im default Debian package
>   - mein $c->controller('Email') fur email handlung
>  
>   Der Vortrag wird auf Englisch gehalten!
> 
> Der Social-Teil findet diese mal statt im
>   Restaurant Sperl
>   Karolinengasse 13
>   1040 Wien 
>   (erreichbar mit dem D-Wagen von der Uni aus)
> 
>   Wir werden dort wohl gegen 20:30 / 21:00 auftauchen.
> 
> Bis dann!
> 

From e9427749 at stud4.tuwien.ac.at  Wed Oct 24 11:13:30 2007
From: e9427749 at stud4.tuwien.ac.at (Josef)
Date: Wed, 24 Oct 2007 20:13:30 +0200
Subject: [Vienna-pm] pseudo-bitmask to ints
In-Reply-To: <471E523A.3040003@stud4.tuwien.ac.at>
References: <20071023133142.GP9715@d610.chello.at>	<69E9925B-8266-4063-8DDD-2830C5670614@univie.ac.at>
	<471E523A.3040003@stud4.tuwien.ac.at>
Message-ID: <471F8B4A.50003@stud4.tuwien.ac.at>

Nochmals, hai!

Josef schrieb:
> Neben glob gebt's da das Regexp::Genex Modul.

Zu glob() f?llt mir noch ein das dies - falls der
Eingabestring von ausserhalb abgeleitet wird -
dann "pseudobitmask2int" zum Ausspionieren des
Dateisystems (auf ?lteren Perls auch Ausf?hren von
beliebigen Systembefehlen) verwendet werden kann.
Also Eingabe pr?fen.

Hier eine Variante f?r die die Windoof? nicht m?gen,
daf?r Gefahr umso mehr. >:->

sub pseudobitmask2int ($)
{ my ($bm)=@_;
   open (my $fh, '-|',
   qq{eval echo "ibase=2\;"`echo '$bm\;'|sed 's/\?/{0,1}/g'`|bc});
   return <$fh>
}

> (Ansonsten fielen mir noch *::Combinatorics und

use strict;
use warnings;
use Algorithm::Combinatorics qw(variations_with_repetition);

sub _fillin ($@)
{ my $template=shift;
   $template=~s/\?/ shift /ge;
   return oct("0b$template");
}

sub pseudobitmask2ints ($)
{ my ($bm)=@_;
   return map { _fillin($bm,@$_) }
          variations_with_repetition([0,1], $bm=~tr/?/?/);
}

Gef?llt mir so eigentlich ganz gut...


>   Quantum::Superpositions ein ;-)

> Aber aus sportlichen Gr?nden noch eine Variante
> ohne glob und Co.
> 
> use strict;
> use warnings;
> 
> sub pseudobitmask2bitmasks (@);
> sub binstr2num (@);
> 
> sub pseudobitmasks2ints (@)
>    { return binstr2num pseudobitmask2bitmasks @_ }
> 
> sub pseudobitmask2bitmasks (@)
> { return map {
>     /^([01]*)\?(.*)$/ ? pseudobitmask2bitmasks("${1}0$2","${1}1$2") : $_;
>    } @_;
> }
> 
> sub binstr2num (@) { return map { oct("0b$_") } @_ }
> 
> # test
> print join ', ',pseudobitmasks2ints('1??1');
> 9, 11, 13, 15
> 
> ----------
> Und f?r die die einem Quanten-Computer ihr eigen nennen:
> 
> use strict;
> use warnings;
> 
> use Quantum::Superpositions qw(any eigenstates);
> 
> sub pseudobitmask2superint ($)
> { my @maskbits=split '',$_[0];
>    my $ret=0;
>    my $cat=any(1,0); # 1=lebt, 0=tot
>    for (my $f=1,my $bit;defined($bit=pop @maskbits);$f<<=1)
>      { $ret+= ($bit eq '?' ? $cat : $bit) * $f }
>    return $ret
> }
> 
> # test
> print "passt!\n" if pseudobitmask2superint('1??1')==11;
> print join ', ',eigenstates pseudobitmask2superint('1??1');

obwohl?wohl?keinem?mehr?interessieren?wird-lichst,
   Jo "kurzzeitig verschickfreudig" sef


From e9427749 at stud4.tuwien.ac.at  Thu Oct 25 06:13:04 2007
From: e9427749 at stud4.tuwien.ac.at (Josef)
Date: Thu, 25 Oct 2007 15:13:04 +0200
Subject: [Vienna-pm] pseudo-bitmask to ints
In-Reply-To: <471F8B4A.50003@stud4.tuwien.ac.at>
References: <20071023133142.GP9715@d610.chello.at>	<69E9925B-8266-4063-8DDD-2830C5670614@univie.ac.at>	<471E523A.3040003@stud4.tuwien.ac.at>
	<471F8B4A.50003@stud4.tuwien.ac.at>
Message-ID: <47209660.8090407@stud4.tuwien.ac.at>

Hi!

<aus neugierde frag>
   Wof?r brauchtest Du das denn?
</aus neugierde frag>

Interessant ist das niemand auf den einfachsten Ansatz
n?mlich alles (brute force) durchzuprobieren kam?

Ist wohl in unseren Gehirnen als nicht gangbarer Weg
eingebrannt, oder so?

sub bruteforce_pseudobitmask2ints ($)
{ my ($bm)=@_; $bm=~s/^0+//;
   my $xorm=$bm; for ($xorm) { s/1/?/g; s/0/1/g; s/\?/0/g }
   (my $andm=$bm)=~s/\?/0/g;
   $xorm=oct "0b$xorm"; $andm=$xorm|oct "0b$andm";
   return grep { (($_^$xorm)&$andm)==$andm } 0..(1<<length $bm)-1
}

pfiateng,
   Josef

---
sub pseudobitmask2ints ($)    # auch ? l?nger als glob-Variante
{ my ($bm)=@_;                # ein anderer Tabubruch
   1 while $bm=~s/([01]*)\?([01?]*)/${1}0$2,${1}1$2/g;
   return map oct("0b$_"), split /,/,$bm
}


From Wolfgang.Laun at thalesgroup.com  Mon Oct 29 00:16:26 2007
From: Wolfgang.Laun at thalesgroup.com (Wolfgang Laun)
Date: Mon, 29 Oct 2007 08:16:26 +0100
Subject: [Vienna-pm] pseudo-bitmask to ints
In-Reply-To: <20071023133142.GP9715@d610.chello.at>
References: <20071023133142.GP9715@d610.chello.at>
Message-ID: <472588CA.2030400@thalesgroup.com>

Vielleicht noch eine kompakte L?sung:

  $mask =~ s/\?/./g;
  @p = join('X','',map(unpack('B*',pack('C',$_)),0..15)) =~ 
m/X0{4}($mask)/g;
  print "p=@p\n" ;

Das Ergebnis von join braucht nat?rlich nur einmal berechnet zu werden.
-W

Thomas Klausner wrote:

>Hi!
>
>Weil im IRC grad alle schmaestad sind:
>
>Fuer folgendes Problem such ich eine kleine, praktische Loesung:
>
>Gegeben ist ein String in der Form '00?1' der eine Bitmask darstellt
>
>Ich brauche alle Ints, die dieser Batmask-Pseudo-Regex matchen, also in 
>diesem Fall 1 und 3
>
>bzw, ich haatte gerne eine Funktion:
>   
>   pseudobitmask2ints('00?1');   # (1,3)
>   pseudobitmask2ints('1??1');   # (9,11,15,16)
>   pseudobitmask2ints('0100');   # (4)
>
>Mir reichen 4 bits.
>
>Weiss da jemand was parktischen?
>
>  
>


From e9427749 at stud4.tuwien.ac.at  Mon Oct 29 12:36:40 2007
From: e9427749 at stud4.tuwien.ac.at (Josef)
Date: Mon, 29 Oct 2007 20:36:40 +0100
Subject: [Vienna-pm] pseudo-bitmask to ints
In-Reply-To: <472588CA.2030400@thalesgroup.com>
References: <20071023133142.GP9715@d610.chello.at>
	<472588CA.2030400@thalesgroup.com>
Message-ID: <47263648.5000506@stud4.tuwien.ac.at>

Wolfgang Laun schrieb:
> Vielleicht noch eine kompakte L?sung:
> 
>   $mask =~ s/\?/./g;
>   @p = join('X','',map(unpack('B*',pack('C',$_)),0..15)) =~ 
> m/X0{4}($mask)/g;
>   print "p=@p\n" ;

Achso K?rze war gefragt, dann allerdings:

sub pseudobit4mask2int ($)
{ (my $bm=shift)=~s/\?/./g;
   return map oct,sprintf('%#06b 'x16,0..15)=~m/\b(0b0*$bm)\b/g;
}

Ebenfalls bruteforce f?r max. 4bits,
f?hrende Nullen d?rfen allerdings weggelassen werden, und
es liefert Nummern statt Bitstrings.

ciao,
   Josef ;-)

---
   unpack('B*',chr) === unpack('B*',pack('C',$_))


From domm at cpan.org  Tue Oct 30 02:43:57 2007
From: domm at cpan.org (Thomas Klausner)
Date: Tue, 30 Oct 2007 10:43:57 +0100
Subject: [Vienna-pm] Vienna.pm Winter of Code
Message-ID: <20071030094357.GE5194@d610.chello.at>

Hi!

Von der YAPC::Europe ist ja ein recht grosser Batzen Geld 
uebriggeblieben, von dem wir einen grossen Teil in "Perl Entwicklung" 
stecken wollen (Wir reden von 10.000 bis 20.000 Euro). Wie wir eh schon 
mehrmals besprochen haben, wird es also einen
  Vienna.pm (oder YAPC?) Winter of Code
geben

Folgende Ideen dazu gibt es, die wir moeglichst bald in eine (englische) 
Aussendung finalisieren & dann an die ganze Welt schicken sollten.

1) Grants und MicroGrants

Leute schicken uns Vorschlaege, was sie gerne um wieviel Geld entwickeln 
wuerden. Wir entscheiden uns, welche Projekte wir foerdern. Die 
EntwicklerInnen coden. Wenn sie fertig sind, bekommen sie das Geld.

Pot. Probleme:
- Es gibt bereits die TPF-Grants, die oft nicht ausgeschoepft werden
- tw kommen auch sehr fragwuerdige grant requests.


2) Bounties

Wir ueberlegen uns Dinge, die wir gerne implementiert haette, und 
versehen sie mit einem "Preisschild". Wer eines der Projekte umsetzten 
will, meldet sich, und wenn wir glauben, dass die Person(en) in der Lage 
ist, das Projekt umzusetzten, geben wir das OK.
Je nach Groesse der Bounty wird ein Teil des Geldes nach einem 
Zwischenbericht ausbezahlt

Pot. Probleme:
- Zu grosste Projekte (SOAP!!), deren Erreichung schwer zu ueberpruefen ist.
- Das definieren von Bouties kann kompliziert/muehsam sein


3) Awards

JedeR (mit PAUSEID, oder Besucher der YAPC) kann Leute vorschlagen, die 
fuer irgendwelche Taten Geld bekommen sollen. JedeR (siehe oben) kann 
dann drueber abstimmen, wer gewinnen soll. Die 3 Leute/Projekte mit den 
meisten Stimmen bekommen das Geld. 

Pot. Probleme:
- Die Abstimmung wird von einer Sub-Community (Catalyst, Matts Script
  Archive) unterlaufen (cf. netznetz)


Gibts noch andere Ideen, wie wir foerdern koennen? zB ein Travel-Grant, 
oder Geld fuer Hardware/Bandbreite?


- Welche Methode(n) verwenden wir? Wenn wir mehrere verwenden, wie 
  teilen wir das Geld auf die verschiedenen Methoden auf?

- Fuer jede Methode muessen einige Dinge erledigt werden
  (Bounties erstellen, Voting-Verfahren definieren (und implementieren), 
  Texte schreiben, Texte uebersetzten)

- Wer kann sich vorstellen, hier mitzuarbeiten
  (Texte schreiben & uebersetzen, Anfragen evaluieren, Bounties 
  ausdenken, Voting-Tools erstellen, ...)



-- 
#!/usr/bin/perl                              http://domm.plix.at
for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/}

From wilhelm.nagy at bfw.gv.at  Tue Oct 30 03:19:04 2007
From: wilhelm.nagy at bfw.gv.at (nagy)
Date: Tue, 30 Oct 2007 11:19:04 +0100
Subject: [Vienna-pm] Vienna.pm Winter of Code
Message-ID: <BB0F801764F1DD4F9CA5C1414C31C2E67D1076@mail.bfw.gv.at>

Hallo Leute,

Besitz besitzt!

Fuer welches verfahren wir uns auch immer entscheiden es wird muehsam.

Was waehre, wenn wir zum ?ID/Cariats/? gehen wuerden und uns von denen eine Schule/Integrations-/Frauenhaus udergl. Vorschlagen lassen und wir spenden denen dann computer/schulungen (Splittungen m?glich)

Ein bisschen geld sollten wir uns aber auch fuer vereinseigene hardware/lokal/? lassen.

Vorteil: Das Projekt wird von der angesprochenene Organisation vorgeschlagen. 
Nachteil: wir muessen uns fuer eins oder mehere entscheiden, dass kann aber bei/statt einem Montags-demo-treffen statfinden. 
Die die da sind entscheiden


Lg
\^/ili

-----Urspr?ngliche Nachricht-----
Von: Thomas Klausner [mailto:domm at cpan.org] 
Gesendet: Dienstag, 30. Oktober 2007 10:44
An: vienna-pm at pm.org
Betreff: [Vienna-pm] Vienna.pm Winter of Code


Hi!

Von der YAPC::Europe ist ja ein recht grosser Batzen Geld 
uebriggeblieben, von dem wir einen grossen Teil in "Perl Entwicklung" 
stecken wollen (Wir reden von 10.000 bis 20.000 Euro). Wie wir eh schon 
mehrmals besprochen haben, wird es also einen
  Vienna.pm (oder YAPC?) Winter of Code
geben

Folgende Ideen dazu gibt es, die wir moeglichst bald in eine (englische) 
Aussendung finalisieren & dann an die ganze Welt schicken sollten.

1) Grants und MicroGrants

Leute schicken uns Vorschlaege, was sie gerne um wieviel Geld entwickeln 
wuerden. Wir entscheiden uns, welche Projekte wir foerdern. Die 
EntwicklerInnen coden. Wenn sie fertig sind, bekommen sie das Geld.

Pot. Probleme:
- Es gibt bereits die TPF-Grants, die oft nicht ausgeschoepft werden
- tw kommen auch sehr fragwuerdige grant requests.


2) Bounties

Wir ueberlegen uns Dinge, die wir gerne implementiert haette, und 
versehen sie mit einem "Preisschild". Wer eines der Projekte umsetzten 
will, meldet sich, und wenn wir glauben, dass die Person(en) in der Lage 
ist, das Projekt umzusetzten, geben wir das OK.
Je nach Groesse der Bounty wird ein Teil des Geldes nach einem 
Zwischenbericht ausbezahlt

Pot. Probleme:
- Zu grosste Projekte (SOAP!!), deren Erreichung schwer zu ueberpruefen ist.
- Das definieren von Bouties kann kompliziert/muehsam sein


3) Awards

JedeR (mit PAUSEID, oder Besucher der YAPC) kann Leute vorschlagen, die 
fuer irgendwelche Taten Geld bekommen sollen. JedeR (siehe oben) kann 
dann drueber abstimmen, wer gewinnen soll. Die 3 Leute/Projekte mit den 
meisten Stimmen bekommen das Geld. 

Pot. Probleme:
- Die Abstimmung wird von einer Sub-Community (Catalyst, Matts Script
  Archive) unterlaufen (cf. netznetz)


Gibts noch andere Ideen, wie wir foerdern koennen? zB ein Travel-Grant, 
oder Geld fuer Hardware/Bandbreite?


- Welche Methode(n) verwenden wir? Wenn wir mehrere verwenden, wie 
  teilen wir das Geld auf die verschiedenen Methoden auf?

- Fuer jede Methode muessen einige Dinge erledigt werden
  (Bounties erstellen, Voting-Verfahren definieren (und implementieren), 
  Texte schreiben, Texte uebersetzten)

- Wer kann sich vorstellen, hier mitzuarbeiten
  (Texte schreiben & uebersetzen, Anfragen evaluieren, Bounties 
  ausdenken, Voting-Tools erstellen, ...)



-- 
#!/usr/bin/perl                              http://domm.plix.at
for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/}
_______________________________________________
Vienna-pm mailing list
Vienna-pm at pm.org
http://mail.pm.org/mailman/listinfo/vienna-pm

From domm at cpan.org  Tue Oct 30 03:42:03 2007
From: domm at cpan.org (Thomas Klausner)
Date: Tue, 30 Oct 2007 11:42:03 +0100
Subject: [Vienna-pm] Vienna.pm Winter of Code
In-Reply-To: <20071030094357.GE5194@d610.chello.at>
References: <20071030094357.GE5194@d610.chello.at>
Message-ID: <20071030104203.GH5194@d610.chello.at>

Hi!

On Tue, Oct 30, 2007 at 10:43:57AM +0100, Thomas Klausner wrote:

Um mir mal gleich selber zu antworten:

> 1) Grants und MicroGrants

Hier koennen wir IMO mal schauen, ob sich jemand bewirbt. Wir sollten 
allerdings klar machen, dass auch 'Kleine Projekte' erwuenscht sind (bzw 
sogar mehr noch als riesendinger)

> 2) Bounties

Finde ich sehr interessant. koennte ev auch erweitert werden in 
Richtung: Die Perl Communitiy schlaegt Bounties vor.

> 3) Awards

Das wuerde ich auf jeden Fall machen wollen. Es gibt Haufenweise Leute, 
die cooles Zeugs machen (Catalyst, Strawberry Perl, ACT, 
Template::Toolkit, ....) aber niemals um Geld ansuchen wuerden.

> - Welche Methode(n) verwenden wir? Wenn wir mehrere verwenden, wie 
>   teilen wir das Geld auf die verschiedenen Methoden auf?

Ich wuerde mal 3.000 - 5.000 Euro fuer Awards auf die Seite legen. Dann 
schaun, ob uns ein paar Bounties einfallen (max 10.000) und den Rest auf 
MicroGrants aufteilen.

-- 
#!/usr/bin/perl                              http://domm.plix.at
for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/}

From rl at brabbel.net  Tue Oct 30 06:25:12 2007
From: rl at brabbel.net (Roland Lammel)
Date: Tue, 30 Oct 2007 14:25:12 +0100
Subject: [Vienna-pm] Vienna.pm Winter of Code
In-Reply-To: <20071030104203.GH5194@d610.chello.at>
References: <20071030094357.GE5194@d610.chello.at>
	<20071030104203.GH5194@d610.chello.at>
Message-ID: <9b51ffb30710300625l578b4e14p5efbb6d35fbd3ad1@mail.gmail.com>

On 10/30/07, Thomas Klausner <domm at cpan.org> wrote:
> Hi!
>
> On Tue, Oct 30, 2007 at 10:43:57AM +0100, Thomas Klausner wrote:
>
> Um mir mal gleich selber zu antworten:
>
> > 1) Grants und MicroGrants
>
> Hier koennen wir IMO mal schauen, ob sich jemand bewirbt. Wir sollten
> allerdings klar machen, dass auch 'Kleine Projekte' erwuenscht sind (bzw
> sogar mehr noch als riesendinger)

Sofern wir 2) und 3) machen wollen, w?rd ich die Grants komplett der
TPF ?berlassen und eher auf Bounties bzw. Awards konzentrieren.

> > 2) Bounties
>
> Finde ich sehr interessant. koennte ev auch erweitert werden in
> Richtung: Die Perl Communitiy schlaegt Bounties vor.

Find ich eine geniale Sache. Es sollte schon allein durch Input von
der Vienna.pm Mailingliste genug "Kleinzeugs" zusammenkommen, dass
wenn umgesetzt auch einen direkten Nutzen f?r uns wieder bringt (ja,
der Egoismus ist bewusst eingesetzt, da so auch Dinge realisiert
werden, die jemand wirklich braucht, also weniger der Social Perl als
mehr der Use Perl ansatz)

> > 3) Awards
>
> Das wuerde ich auf jeden Fall machen wollen. Es gibt Haufenweise Leute,
> die cooles Zeugs machen (Catalyst, Strawberry Perl, ACT,
> Template::Toolkit, ....) aber niemals um Geld ansuchen wuerden.

W?rd ich mit kleinem Teil unseres Budgets machen, da es zwar very
"Social Perl" ist, aber ned fern von "Chaotic Perl", da es schwer ist
zu bewerten (lines of code, number of modules, users of module, ...)

> > - Welche Methode(n) verwenden wir? Wenn wir mehrere verwenden, wie
> >   teilen wir das Geld auf die verschiedenen Methoden auf?

Ich bin f?r 2) mit ca. 70% budget und 3 mit ca 30% budget.

> Ich wuerde mal 3.000 - 5.000 Euro fuer Awards auf die Seite legen. Dann
> schaun, ob uns ein paar Bounties einfallen (max 10.000) und den Rest auf
> MicroGrants aufteilen.
>

Cheers

+rl
> --
> #!/usr/bin/perl                              http://domm.plix.at
> for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/}
> _______________________________________________
> Vienna-pm mailing list
> Vienna-pm at pm.org
> http://mail.pm.org/mailman/listinfo/vienna-pm
>


-- 
Roland Lammel

"Enjoy your job, make lots of money, work within the law. Choose any two."

From e9427749 at stud4.tuwien.ac.at  Tue Oct 30 08:05:52 2007
From: e9427749 at stud4.tuwien.ac.at (Josef)
Date: Tue, 30 Oct 2007 16:05:52 +0100
Subject: [Vienna-pm] Vienna.pm Winter of Code
In-Reply-To: <9b51ffb30710300625l578b4e14p5efbb6d35fbd3ad1@mail.gmail.com>
References: <20071030094357.GE5194@d610.chello.at>	<20071030104203.GH5194@d610.chello.at>
	<9b51ffb30710300625l578b4e14p5efbb6d35fbd3ad1@mail.gmail.com>
Message-ID: <47274850.1050806@stud4.tuwien.ac.at>

Hi, allerseits!

Roland Lammel schrieb:
> On 10/30/07, Thomas Klausner <domm at cpan.org> wrote:
>> On Tue, Oct 30, 2007 at 10:43:57AM +0100, Thomas Klausner wrote:
>>
>> Um mir mal gleich selber zu antworten:
>>
>>> 1) Grants und MicroGrants
>> Hier koennen wir IMO mal schauen, ob sich jemand bewirbt. Wir sollten
>> allerdings klar machen, dass auch 'Kleine Projekte' erwuenscht sind (bzw
>> sogar mehr noch als riesendinger)
> 
> Sofern wir 2) und 3) machen wollen, w?rd ich die Grants komplett der
> TPF ?berlassen und eher auf Bounties bzw. Awards konzentrieren.

Ihmo sollte 1) _nicht_ von 2+3 abh?ngen, h?chstens! wir haben
nicht gen?gend Geld um all das was wir machen wollen durchziehen
zu k?nnen.

Die Frage hier ist k?nnen wir einen Vorteil gegen?ber TPF bieten.
z.B.: * unb?rokratischer
       * andere Projektgr?ssen
       * direkter Ansprechpartner => lokal
       * ...


>>> 2) Bounties
>> Finde ich sehr interessant. koennte ev auch erweitert werden in
>> Richtung: Die Perl Communitiy schlaegt Bounties vor.
> 
> Find ich eine geniale Sache. Es sollte schon allein durch Input von
> der Vienna.pm Mailingliste genug "Kleinzeugs" zusammenkommen, dass
> wenn umgesetzt auch einen direkten Nutzen f?r uns wieder bringt (ja,
> der Egoismus ist bewusst eingesetzt, da so auch Dinge realisiert
> werden, die jemand wirklich braucht, also weniger der Social Perl als
> mehr der Use Perl ansatz)

Gutes Zeugs setzt sich m.E. erst mit der Zeit durch.
Und Dinge die von haus aus darauf getrimmt sind, m?glichst
schnell gebraucht zu werden, killen dann die Projekte dessen
Betreiber den Fehler begannen hat dies einzusetzen.

Deshalb sollte - falls wir nicht das Interface vorgeben -
eine bereits ausgearbeitete Interfacebeschreibung bei
der Einreichung Teilnahmebedingung sein.


>>> 3) Awards
>> Das wuerde ich auf jeden Fall machen wollen. Es gibt Haufenweise Leute,
>> die cooles Zeugs machen (Catalyst, Strawberry Perl, ACT,
>> Template::Toolkit, ....) aber niemals um Geld ansuchen wuerden.

StrawberryPerl finde ich auch cool, aber gab's daf?r nicht Geld
von TPF?
Ihmo, sollten wir Projekte die noch nix, oder wenig an Geld
bekommen haben vorziehen.

> W?rd ich mit kleinem Teil unseres Budgets machen, da es zwar very
> "Social Perl" ist, aber ned fern von "Chaotic Perl", da es schwer ist
> zu bewerten (lines of code, number of modules, users of module, ...)

Das Bewertungsproblem ist ihmo bei allen 3 gegeben.
Abgesehen das man hier zumindest mehr Infos hat.

Meine Erfahrung ist die, wenn man "social" _nicht_ ber?cksichtigt,
dann wird es "chaotic".

Vorschlag f?r Vorgehensweise:
1. Mir ?berlegen sich unter welchen Bedingungen kein
    Award zu bekommen ist.
      * hat bereits geld von anderswo...
      * ...
2. Unter denen die unter 1 fallen, aber cooles
    getan haben fragen ob sie als Jurymitglied
    (jeweils einen pro Projekt) zur Verf?gung
    stehen w?rden.
3. Verschiedene Kategorien, ala
    gro?e Projekte (1 Award), CPAN?Modul (z.B. 2-3),
    Dokumentation, Perl6, ...

W?rde zumindest das pot. Problem der
Sub?Community-Unterlaufung ?hh unterlaufen.
Selbst wenn die Wahl der Jurymitglieder durch
die Community passiert, sollte das so funken.

Wobei man bei kleineren, noch unbekannteren Projekten,
wo die genannte Gefahr keine Rolle spielt, dies dann
als direkte Publikumswahl anbieten kann.

Ist aber nur mal so eine Idee.


>> Ich wuerde mal 3.000 - 5.000 Euro fuer Awards auf die Seite legen. Dann
>> schaun, ob uns ein paar Bounties einfallen (max 10.000) und den Rest auf
>> MicroGrants aufteilen.

auch?so?seh?

pfiateng,
   Josef

---
sub pseudonibblemask2int ($)
{(my$m=shift)=~y/?/./;map+oct,sprintf('%#06b:'x16,0..15)=~/0b0*$m\b/g}



From e9427749 at stud4.tuwien.ac.at  Tue Oct 30 08:17:24 2007
From: e9427749 at stud4.tuwien.ac.at (Josef)
Date: Tue, 30 Oct 2007 16:17:24 +0100
Subject: [Vienna-pm] Vienna.pm Winter of Code
In-Reply-To: <BB0F801764F1DD4F9CA5C1414C31C2E67D1076@mail.bfw.gv.at>
References: <BB0F801764F1DD4F9CA5C1414C31C2E67D1076@mail.bfw.gv.at>
Message-ID: <47274B04.40405@stud4.tuwien.ac.at>


Hallo!

nagy schrieb:
> Besitz besitzt! Fuer welches verfahren wir uns auch immer entscheiden
> es wird muehsam.

Schon, aber irgendwas braucht der Mensch sonst kommt er sich nutzlos
vor, oder es ist im gar langweilig. ;-)


> Was waehre, wenn wir zum ?ID/Cariats/? gehen wuerden und uns von
> denen eine Schule/Integrations-/Frauenhaus udergl. Vorschlagen lassen
> und wir spenden denen dann computer/schulungen (Splittungen m?glich)

Ich glaube das k?nnen wir zus?tzlich tun.
(Falls unsere Statuten das erlauben, sonst muss auf jeden Computer
  Perl vorinstalliert werden ;-)

Insbesondere das Anbieten von Schulungen muss nicht kostenintensiv
sein. Stelle gern ein paar Stunden meiner Freizeit f?r eine
Perl?Einf?hrungskurs zur Verf?gung. Ein paar andere sicher auch.

pfiateng,
   Josef