From domm at zsi.at Thu Mar 20 06:28:10 2003 From: domm at zsi.at (Thomas Klausner) Date: Mon Aug 2 21:39:10 2004 Subject: [Vienna-pm] Wiener Perl Community Message-ID: <20030320122810.GK21709@zsi.at> Hi! [ Ich schicke dieses Mail an alle moeglichen (und unmoeglichen..) Adressen und Mailinglisten, von denen ich weiss / annehme, das dahinter Perl-Interessierte Leute sitzen. Wenn jemand das Mail mehrmals bekommt ... Sorry! ] Vienna.pm ist ja seit etwas mehr als einem Jahr so gut wie tot (Zumindest hab ich nix von irgendwelchen Treffen mitbekommen...). 2001, als es ein wenig Aktivitaet gab, war ich leider nicht in Wien. Wie auch immer, zumindest ich haette sehr grosses Interesse daran, mich hie und da mit anderen Perl-Mongern zu treffen und ein wenig Perl zu plaudern (YAPCs und Perlworkshops sind zwar nett, aber zu selten). Da der soziale Aspekt tw recht gut von den LUGA-Treffen abgedeckt wird, und (siehe 2001) reine "social meetings" anscheinend nicht so gut funktionieren, hab ich mir gedacht, ob nicht zB 2-monatige "technical meetings" besser klappen wuerden. Technical meetings sind Treffen, bei denen einige der Anwesenden kurze oder nicht ganz so kurze Vortrage / Praesentationen halten und die spaeter meist zu social meetings mutieren. Siehe zB. http://london.pm.org/tech_talks/ Ich koennte ueber einige Themen sprechen, von Obfuscation ueber mod_perl und HTML-Parsen bis hin zu Tests. Und melde mich hiermit freiwillig, beim ersten dieser Meetings irgendeinen Talk zu machen. Den sonstigen Teil der Organisation (Location (mit Beamer) auftreiben, etc) kann ich auch machen, allerdings natuerlich nur, wenn auch tatsaechlich Leute teilnehmen. Also, Vienna.pm Resurrection - besteht daran Interesse? Wenn ja, wuerde ich vorschlagen, die Diskussion auf der Vienna.pm Mailinglist forzusetzten. Siehe http://www.fff.at/2001/03/31/vpm-maillist-de/ Wenn nein, dann back to your regular scheduled emails... -- #!/usr/bin/perl http://domm.zsi.at for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/} From hjp at wsr.ac.at Thu Mar 20 06:53:23 2003 From: hjp at wsr.ac.at (Peter J. Holzer) Date: Mon Aug 2 21:39:10 2004 Subject: [Vienna-pm] Re: Wiener Perl Community In-Reply-To: <20030320122810.GK21709@zsi.at> References: <20030320122810.GK21709@zsi.at> Message-ID: <20030320125323.GD21207@wsr.ac.at> [mal sehen, ob ich mit der Adresse auf vienna-pm posten darf - da war schon so lange Stille, dass ich nicht mehr wei?, mit welcher Adresse ich subscribiert bin] On 2003-03-20 13:28:10 +0100, Thomas Klausner wrote: > Da der soziale Aspekt tw recht gut von den LUGA-Treffen abgedeckt > wird, und (siehe 2001) reine "social meetings" anscheinend nicht so > gut funktionieren, hab ich mir gedacht, ob nicht zB 2-monatige > "technical meetings" besser klappen wuerden. Warst Du gestern beim LUGA-Treffen? Der Marcel war auch dort, da w?ren wir schon zu dritt gewesen. > > Technical meetings sind Treffen, bei denen einige der Anwesenden kurze > oder nicht ganz so kurze Vortrage / Praesentationen halten und die > spaeter meist zu social meetings mutieren. Siehe zB. > http://london.pm.org/tech_talks/ [...] > Also, Vienna.pm Resurrection - besteht daran Interesse? Ja, ich bin dabei. hp -- _ | Peter J. Holzer | Unser Universum w?re betr?blich |_|_) | Sysadmin WSR / LUGA | unbedeutend, h?tte es nicht jeder | | | hjp@wsr.ac.at | Generation neue Probleme bereit. __/ | http://www.hjp.at/ | -- Seneca, naturales quaestiones -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 431 bytes Desc: not available Url : http://mail.pm.org/pipermail/vienna-pm/attachments/20030320/95438d23/attachment.bin From marcel at noug.at Thu Mar 20 07:13:47 2003 From: marcel at noug.at (=?ISO-8859-1?Q?Marcel_Gr=FCnauer?=) Date: Mon Aug 2 21:39:10 2004 Subject: [Vienna-pm] ping Message-ID: Nur ein Test, um zu sehen, ob die Liste ?berhaupt noch lebt. Marcel From marcel at noug.at Sat Mar 22 05:53:25 2003 From: marcel at noug.at (=?ISO-8859-1?Q?Marcel_Gr=FCnauer?=) Date: Mon Aug 2 21:39:10 2004 Subject: [luga] Re: [Vienna-pm] Wiener Perl Community In-Reply-To: Message-ID: Hi, > ich bin etwas verbl?fft ?ber Dein Posting auf der Luga-Liste. Wieso? > War es nicht so, da? Du vor einigen Monaten die Webseiten von Vienna.pm > neu machen und die Liste/Gruppe beleben wolltest? Ja, wie gesagt, bin ich nicht dazugekommen. > [...] Scheint so, als stimmten wir ?berein. Also techmeets sind eine gute Idee; gesellige Treffen k?nnen wir f?r's Erste im Rahmen der luga machen. Thomas, du hast gemeint, Du h?ttest R?umlichkeiten und Beamer und so f?r technische Treffen ("techmeet" hat sich bei london.pm daf?r eingeb?rgert; wie sollen wir das nennen?); wann und wo ginge es denn einmal aus? Fixe monatliche Termine w?ren gut, etwa "jeder zweite Donnerstag im Monat" oder so. Bei den london.pm-techmeets gab es meist Vortr?ge von so 10-20 Minuten; plus einige "lightning talks" von nicht mehr als 5 Minuten. Was w?ren denn konkrete Themen, ?ber die wir reden wollen? Ich k?nnte mir vorstellen, ein paar kleinere Talks zu jeweils einem Modul von mir zu machen, z.B. Getopt::Attribute oder Exporter::Simple. Als der "group leader" sollte ich mich wohl auch langsam um die vienna.pm-website k?mmern. Steht also ziemlich weit oben auf meiner Liste. Marcel From p.seitz at koehler-seitz.de Tue Mar 25 03:29:53 2003 From: p.seitz at koehler-seitz.de (Peter Seitz jun.) Date: Mon Aug 2 21:39:10 2004 Subject: [Vienna-pm] =?ISO-8859-1?Q?Muster_=DCberpr=FCfen?= Message-ID: <4B79BF76B7@koehler-seitz.de> Hallo Freunde, ich habe ein kleines Perl Problem und komme hier nicht weiterkomme. Ich habe einen Text, in dem bestimmte Muster durch ein anderes Muster ersetzt werden m?ssen. Die m?glichen Muster habe auf einem Skalar abgespeichert: my $match = "(gelb)|(gr?n)|(blau)"; Die zu ersetzenden Werte habe ich in einem Hash abgelegt: my %replace = (); $replace{'gelb'} = "rot"; $replace{'gr?n'} = "lila"; $replace{'blau'} = "schwarz"; Wenn ich nun enige Muster in meinem Skalar habe klappt das zeilenweise Durchsuchen des Textes auch: if ($line =~ /$match/) {print "Muster gefunden\n"}; Wenn in meinem Skalar dann ca 200 Werte stehen, klappt die Suche nicht mehr. Was mache ich hier falsch. Nun w?rde ich bei auftreten des Musters gerne herausbekommen, um welches Muster es sich handelt, so da? ich es mit Hilfe der im Hash abgelegten Muster ersetzen kann. Leider wei? ich nicht, wie ich das bewerkstelligen kann. Meine ?berlegung die zu erstzenden Muster in ein Hash zu legen kamen aus Performancegr?nden. Wenn man obiges allerdings auf einen anderen Weg performanter machen kann, habe ich auch nichts gegen einen anderen Ansatz. Ich bin f?r jeden Rat dankbar. -- With best compliments Peter Seitz jun. Member of the Pegasus Mail Support Group Coordinator of the Pmail Translation Process ++++++++++++++++++++++++++++++++++++++++++++++++++ KOEHLER+SEITZ Beraten und Planen GmbH Waldaustrasse 13, D-90441 Nuernberg, Germany Tel: INT+49-911-6238-152, Fax: INT+49-911-6238-100 +++++ Internet: http://www.koehler-seitz.de/ +++++ From marcel at noug.at Tue Mar 25 03:49:51 2003 From: marcel at noug.at (=?ISO-8859-1?Q?Marcel_Gr=FCnauer?=) Date: Mon Aug 2 21:39:10 2004 Subject: [Vienna-pm] =?ISO-8859-1?Q?Re:_[Vienna-pm]_Muster_=DCberpr=FCfen?= In-Reply-To: <4B79BF76B7@koehler-seitz.de> Message-ID: <1FBD019A-5EA7-11D7-9179-003065F97C4A@noug.at> Hi, > Ich habe einen Text, in dem bestimmte Muster durch ein anderes Muster > ersetzt werden m?ssen. Die m?glichen Muster habe auf einem Skalar > abgespeichert: Ich w?rde mit Hilfe der hash keys eine Regex aufbauen und sie mit \b verankern, damit nicht Teilworte ersetzt werden (also "blau" schon, aber nicht "blaues"): my %replace = ( gelb => 'rot', gruen => 'lila', blau => 'schwarz'); local $" = '|'; my @orig = join '|' => keys %replace; while () { s/\b(@orig)\b/$replace{$1}/g; print; } __DATA__ der wald ist gruen, ein blaues wunder Gelb ist die Sonne, nicht blau. Ein anderer, recht interessanter, Ansatz ist while () { s/ gelb (?{'rot'}) | gruen (?{'lila'}) | blau (?{'schwarz'}) /$^R/gx; print; } __DATA__ der wald ist gruen, ein blaues wunder Gelb ist die Sonne, nicht blau. Mehr explizit, da die zusammengeh?rigen Teile auch nahe beieinander stehen. Siehe 'perldoc perlre' f?r Details. Marcel From k.zoechling at wirtschaftsblatt.at Tue Mar 25 03:56:29 2003 From: k.zoechling at wirtschaftsblatt.at (Karlheinz Zoechling) Date: Mon Aug 2 21:39:10 2004 Subject: [Vienna-pm] Muster Überprüfen In-Reply-To: <4B79BF76B7@koehler-seitz.de> Message-ID: <20030325095733.890A8B7C69@zeus.et-multimedia.at> >Wenn in meinem Skalar dann ca 200 Werte stehen, klappt die Suche >nicht mehr. Was mache ich hier falsch. hm, kann ich auf die schnelle auch nicht sagen, aber: >Nun w?rde ich bei auftreten des Musters gerne herausbekommen, um >welches Muster es sich handelt, so da? ich es mit Hilfe der >im Hash abgelegten Muster ersetzen kann. Leider wei? ich nicht, wie >ich das bewerkstelligen kann. $line =~ s/($match)/$replace{$1}/g; >Ich bin f?r jeden Rat dankbar. hope this helps. karlheinz # # # # Karlheinz Zoechling # Web Development # # WirtschaftsBlatt online # tel.: +43-1-91919 452 # mail: k.zoechling@wirtschaftsblatt.at # # (this message is CPIP compliant # according to rfc 1149) From domm at zsi.at Wed Mar 26 04:14:50 2003 From: domm at zsi.at (Thomas Klausner) Date: Mon Aug 2 21:39:10 2004 Subject: [Vienna-pm] Wiener Perl Community Message-ID: <20030326101450.GC23541@zsi.at> Hi! On Sam, M?r 22, 2003 at 12:38:31 +0100, Marcel Gr?nauer wrote: > Thomas, du hast gemeint, Du h?ttest R?umlichkeiten und Beamer und > so f?r technische Treffen ("techmeet" hat sich bei london.pm > daf?r eingeb?rgert; wie sollen wir das nennen?); techmeets find ich auch sehr OK. > wann und wo ginge > es denn einmal aus? Fixe monatliche Termine w?ren gut, etwa "jeder > zweite Donnerstag im Monat" oder so. Wo: Eine Moeglichkleit waere in den Raeumlichkeiten von netbridge (www.netbridge.at). Ist nahezu direkt neben der U3-Station Ottakring, es gibt einen Beamer und Platz fuer einige Leute (10-20). Rauchen verboten (Gut so, IMO). Wenn jemand eine andere Location hat (zB etwas zentraler, wobei die Erreichbarkeit eh gut ist..), koennen wir uns aber auch gerne woanders treffen. Wann: fixe Termin sind sicher sinnvoll, aber monatlich ist ev etwas zu oft. In London sind die techmeets ja auch nur alle 2 Monate, und dort gibts ein paar mehr Monger als hier... Wochentag etc ist mir relativ wurscht, es sollte sich nur nicht mit anderen Veranstaltungen (LUGA..) ueberschneiden. > Bei den london.pm-techmeets gab es meist Vortr?ge von so 10-20 > Minuten; plus einige "lightning talks" von nicht mehr als 5 > Minuten. Was w?ren denn konkrete Themen, ?ber die wir reden wollen? Kurze Talk plus Lightning talks find ich auch OK, wenn wir genug Leute haben, die was sagen wollen (ein kurztalk und ein lightning talk sind nicht unbedingt abendfuellend) > Ich k?nnte mir vorstellen, ein paar kleinere Talks zu jeweils einem > Modul von mir zu machen, z.B. Getopt::Attribute oder Exporter::Simple. Super! Ich hab zwei fertige Talks (Obfuscation (simpel, wie auf den Linuxwochen, oder komplexer, wie auf der YAPC::2002) und mod_perl (ist eigentlich ein 3-Stunden-Tutorial, kann ich aber aufsplitten; hab ich am Perlworkshop 2003 gehalten) Sonst koennte ich noch was ueber HTML-Parsen machen (ist quasi in Vorbereitung..), oder 100 andere Themen .. Alfie hat angeboten, ueber Mason zu reden. D.h. drei Talks haetten wir schon, mit pot. weiteren fuer die naechsten techmeets. Und gerade lightning talks sind ja eine geniale Moeglichkeit fuer Leute, die zum ersten mal reden, in kurzer Zeit ein wenig Erfarhrung etc zu sammlen. Also bitte, her mit den Vorschlaegen! -- #!/usr/bin/perl http://domm.zsi.at for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/} From hjp-vienna-pm-list at hjp.at Wed Mar 26 05:33:58 2003 From: hjp-vienna-pm-list at hjp.at (Peter J. Holzer) Date: Mon Aug 2 21:39:10 2004 Subject: [Vienna-pm] Wiener Perl Community In-Reply-To: <20030326101450.GC23541@zsi.at> References: <20030326101450.GC23541@zsi.at> Message-ID: <20030326113358.GA6522@teal.hjp.at> On 2003-03-26 11:14:50 +0100, Thomas Klausner wrote: > On Sam, M?r 22, 2003 at 12:38:31 +0100, Marcel Gr?nauer wrote: > > wann und wo ginge > > es denn einmal aus? Fixe monatliche Termine w?ren gut, etwa "jeder > > zweite Donnerstag im Monat" oder so. > Wann: fixe Termin sind sicher sinnvoll, aber monatlich ist ev etwas zu oft. > In London sind die techmeets ja auch nur alle 2 Monate, und dort gibts ein > paar mehr Monger als hier... Ich w?rde auch vorschlagen, erst mal zweimonatige Treffen anzupeilen. Bei gro?em Erfolg k?nnen wir ja immer noch die Frequenz steigern. > Wochentag etc ist mir relativ wurscht, es sollte sich nur nicht mit anderen > Veranstaltungen (LUGA..) ueberschneiden. Donnerstag ist bei mir schlecht, und zwei Mittwoche und ein Freitag pro Monat sind auch schon verplant. > Super! Ich hab zwei fertige Talks (Obfuscation (simpel, wie auf den > Linuxwochen, oder komplexer, wie auf der YAPC::2002) und mod_perl (ist > eigentlich ein 3-Stunden-Tutorial, kann ich aber aufsplitten; hab ich am > Perlworkshop 2003 gehalten) > > Sonst koennte ich noch was ueber HTML-Parsen machen (ist quasi in > Vorbereitung..), oder 100 andere Themen .. Ein paar Lightning- bis Kurztalks kann ich sicher auch besteuern (XML- und DBI-Gschichteln und sonstige Details aus dem, was ich in letzter Zeit gemacht habe). hp -- _ | Peter J. Holzer | Latein ist das humanoide ?quivalent |_|_) | Sysadmin WSR | zu Fortran. | | | hjp@hjp.at | __/ | http://www.hjp.at/ | -- Alexander Bartolich in at.linux -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 189 bytes Desc: not available Url : http://mail.pm.org/pipermail/vienna-pm/attachments/20030326/badb904c/attachment.bin From mjy at geizhals.at Wed Mar 26 16:21:33 2003 From: mjy at geizhals.at (Marinos J . Yannikos) Date: Mon Aug 2 21:39:10 2004 Subject: [Vienna-pm] Wiener Perl Community In-Reply-To: <20030326113358.GA6522@teal.hjp.at>; from hjp-vienna-pm-list@hjp.at on Wed, Mar 26, 2003 at 12:33:58PM +0100 References: <20030326101450.GC23541@zsi.at> <20030326113358.GA6522@teal.hjp.at> Message-ID: <20030326232130.T11280@work.inode.at> On Wed, Mar 26, 2003 at 12:33:58PM +0100, Peter J. Holzer wrote: > Ich w?rde auch vorschlagen, erst mal zweimonatige Treffen anzupeilen. > Bei gro?em Erfolg k?nnen wir ja immer noch die Frequenz steigern. Bin daf?r ... Wei? jemand ?berhaupt, wieviele Leute prinzipiell Interesse h?tten? (gibt es Zahlen zu bisherigen Treffen? Waren es schon mehr als 8 Personen? => http://www.fff.at/2001/05/29/vpm-treffen-hist/) > Donnerstag ist bei mir schlecht, und zwei Mittwoche und ein Freitag pro > Monat sind auch schon verplant. Na, da wird sich alle 2 Monate doch noch etwas ausgehen ;-) > Ein paar Lightning- bis Kurztalks kann ich sicher auch besteuern (XML- > und DBI-Gschichteln und sonstige Details aus dem, was ich in letzter > Zeit gemacht habe). L?sungen aus der Praxis sind sicher interessant... (sowas wie http://www.perl.com/pub/a/2001/10/17/etoys.html). OT: Ich w?rde ?brigens auch eine Perl-Jobs-Seite f?r Wien begr??en... MfG, -mjy -- Marinos Yannikos, CEO Preisvergleich Internet Services AG Franzensbr?ckenstra?e 8/2/16, A-1020 Wien Tel./Fax: (+431) 5811609-52/-55 From marcel at noug.at Wed Mar 26 16:30:47 2003 From: marcel at noug.at (=?ISO-8859-1?Q?Marcel_Gr=FCnauer?=) Date: Mon Aug 2 21:39:10 2004 Subject: [Vienna-pm] Wiener Perl Community In-Reply-To: <20030326232130.T11280@work.inode.at> Message-ID: <9711EB10-5FDA-11D7-905D-003065F97C4A@noug.at> On Mittwoch, M?rz 26, 2003, at 11:21 Uhr, Marinos J . Yannikos wrote: > OT: Ich w?rde ?brigens auch eine Perl-Jobs-Seite f?r Wien begr??en... Hatte ich auch vor; allerdings bef?rchte ich, da? da nicht viel Fluktuation drauf sein wird. Ich warte nur noch darauf, da? die vienna.pm.org-Anfragen auf den neuen Server umgeleitet werden und dann kann ich einmal die erste, sehr einfache vienna.pm-Homepage live stellen. Marcel From domm at zsi.at Thu Mar 27 03:03:52 2003 From: domm at zsi.at (Thomas Klausner) Date: Mon Aug 2 21:39:10 2004 Subject: techmeet termine (was: Re: [Vienna-pm] Wiener Perl Community) In-Reply-To: <20030326232130.T11280@work.inode.at> References: <20030326101450.GC23541@zsi.at> <20030326113358.GA6522@teal.hjp.at> <20030326232130.T11280@work.inode.at> Message-ID: <20030327090352.GA6535@zsi.at> Hi! On Mit, M?r 26, 2003 at 11:21:33 +0100, Marinos J . Yannikos wrote: > Bin daf?r ... Wei? jemand ?berhaupt, wieviele Leute prinzipiell Interesse > h?tten? (gibt es Zahlen zu bisherigen Treffen? Waren es schon mehr als > 8 Personen? => http://www.fff.at/2001/05/29/vpm-treffen-hist/) Laut mailman sind hier 63 Leute subskribiert (einige anscheindend aus .de) Wenn da 10% kommen, sinds mal 6 Leute. > > Donnerstag ist bei mir schlecht, und zwei Mittwoche und ein Freitag pro > > Monat sind auch schon verplant. > > Na, da wird sich alle 2 Monate doch noch etwas ausgehen ;-) Machen wir das mal hintenrum.. Pot. Termine fuer das erste techmeet (in ca einem Monat, einerseits damit genug Zeit bleibt fuer Vorbereitun, andererseits wegen der Osterferien): DI, 22.4. MI, 23.4. DO, 24.4. FR, 25.4. Bitte abstimmen, wanns den passen wuerde, hier gleich mal meine Votes: DI, 22.4. + MI, 23.4. + DO, 24.4. + FR, 25.4. + > > Ein paar Lightning- bis Kurztalks kann ich sicher auch besteuern (XML- > > und DBI-Gschichteln und sonstige Details aus dem, was ich in letzter > > Zeit gemacht habe). > > L?sungen aus der Praxis sind sicher interessant... (sowas wie > http://www.perl.com/pub/a/2001/10/17/etoys.html). Stimmt. Wobei Perrins Artikel ja doch ein etwas riesiges Projekt beschreibt... Aber kleinere Dinge sind ja genauso interessant (wenn nicht interessanter, weil ich eher darin beschriebene Techniken verwenden kann (irgendwie arbeite ich selten an Sites mit 800.000 page views/hour)) > OT: Ich w?rde ?brigens auch eine Perl-Jobs-Seite f?r Wien begr??en... -- #!/usr/bin/perl http://domm.zsi.at for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/} From marcel at noug.at Thu Mar 27 03:27:07 2003 From: marcel at noug.at (=?ISO-8859-1?Q?Marcel_Gr=FCnauer?=) Date: Mon Aug 2 21:39:10 2004 Subject: techmeet termine (was: Re: [Vienna-pm] Wiener Perl Community) In-Reply-To: <20030327090352.GA6535@zsi.at> Message-ID: <47892000-6036-11D7-B812-003065F97C4A@noug.at> On Donnerstag, M?rz 27, 2003, at 10:03 Uhr, Thomas Klausner wrote: > Bitte abstimmen, wanns den passen wuerde, hier gleich mal meine Votes: DI, 22.4. + MI, 23.4. + DO, 24.4. + FR, 25.4. - (Freitag abend geh ich eher in Lokale als auf techmeets.) Marcel From mjy at geizhals.at Thu Mar 27 07:01:26 2003 From: mjy at geizhals.at (Marinos J . Yannikos) Date: Mon Aug 2 21:39:10 2004 Subject: techmeet termine (was: Re: [Vienna-pm] Wiener Perl Community) In-Reply-To: <20030327090352.GA6535@zsi.at>; from domm@zsi.at on Thu, Mar 27, 2003 at 10:03:52AM +0100 References: <20030326101450.GC23541@zsi.at> <20030326113358.GA6522@teal.hjp.at> <20030326232130.T11280@work.inode.at> <20030327090352.GA6535@zsi.at> Message-ID: <20030327140126.K11280@work.inode.at> Hi, On Thu, Mar 27, 2003 at 10:03:52AM +0100, Thomas Klausner wrote: > DI, 22.4. + > MI, 23.4. + > DO, 24.4. + > FR, 25.4. + Uhrzeit? Bei mir ginge theoretisch alles, aber nach 17 Uhr (lieber noch sp?ter) > Stimmt. Wobei Perrins Artikel ja doch ein etwas riesiges Projekt > beschreibt... Aber kleinere Dinge sind ja genauso interessant (wenn nicht > interessanter, weil ich eher darin beschriebene Techniken verwenden kann > (irgendwie arbeite ich selten an Sites mit 800.000 page views/hour)) Die Techniken sind ja auch interessant, wenn man nicht gleich 30-40 Server zur Verf?gung hat und f?r .at realistischen Traffic (geizhals.at hat z.T. ~60.000/Stunde auf 2 Servern mit einer ?hnlichen Applikation/Konfiguration; nat?rlich w?re uns 1 Server lieber ;-)) MfG, -mjy -- Marinos Yannikos, CEO Preisvergleich Internet Services AG Franzensbr?ckenstra?e 8/2/16, A-1020 Wien Tel./Fax: (+431) 5811609-52/-55 From domm at zsi.at Thu Mar 27 07:11:51 2003 From: domm at zsi.at (Thomas Klausner) Date: Mon Aug 2 21:39:10 2004 Subject: [Vienna-pm] Re: techmeet termine In-Reply-To: <20030327140126.K11280@work.inode.at> References: <20030326101450.GC23541@zsi.at> <20030326113358.GA6522@teal.hjp.at> <20030326232130.T11280@work.inode.at> <20030327090352.GA6535@zsi.at> <20030327140126.K11280@work.inode.at> Message-ID: <20030327131151.GG6535@zsi.at> Hi! On Don, M?r 27, 2003 at 02:01:26 +0100, Marinos J . Yannikos wrote: > Uhrzeit? Bei mir ginge theoretisch alles, aber nach 17 Uhr (lieber noch > sp?ter) Achja, genau. Natuerlich eher abends, wie waere es mit 19:00? -- #!/usr/bin/perl http://domm.zsi.at for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/} From BaierO at spardat.at Fri Mar 28 05:54:49 2003 From: BaierO at spardat.at (Baier Oliver INT SD) Date: Mon Aug 2 21:39:10 2004 Subject: [Vienna-pm] use strict => Geltungsbereich? Message-ID: <1FCFCFC1F0830E4D93860866CACC07B601455C29@m0114.s-mxs.net> Hi, habe mit Namespaces bzw. Packages bisher noch nichts zu tun gehabt und stehe nun vor einem kleinen Problem. Ich will, wenn @ARGV definiert ist, eine andere Variable ($db_count) definieren, die natuerlich im Hauptprogramm sichtbar ist. Da ich "use strict" verwende und somit alle vars definieren muss, kann ich die Variable nicht mit my deklarieren, da sie sonst ausserhalb des if-Blocks nicht sichtbar ist aber auch nicht mit $::db_count, da ich sie sonst im Hauptprogramm erst wieder importieren muesste, was ich vermeiden will. => In welchem Geltungsbereich befinde ich mich nach "use strict" Hier noch ein Code-Schnipsel, der folgenden Fehler produziert: Variable "$db_count" is not imported at ./checkcache.pl line 34. ---------- snip ---------- use strict; if (defined @ARGV && $ARGV[0] eq '-c') { $::db_count = 0; ... ... } print "passt\n" if defined $db_count; ---------- snip ---------- mfg Oliver From domm at zsi.at Fri Mar 28 06:02:15 2003 From: domm at zsi.at (Thomas Klausner) Date: Mon Aug 2 21:39:10 2004 Subject: [Vienna-pm] use strict => Geltungsbereich? In-Reply-To: <1FCFCFC1F0830E4D93860866CACC07B601455C29@m0114.s-mxs.net> References: <1FCFCFC1F0830E4D93860866CACC07B601455C29@m0114.s-mxs.net> Message-ID: <20030328120215.GC21469@zsi.at> Hi! On Fri, Mar 28, 2003 at 12:54:49PM +0100, Baier Oliver INT SD wrote: > habe mit Namespaces bzw. Packages bisher noch nichts zu tun > gehabt und stehe nun vor einem kleinen Problem. > .. > => In welchem Geltungsbereich befinde ich mich nach "use strict" wenn du mit package SomeNameSpace; einen Namespace definiert hast, in jeweiligen Namespace. Sonst in main. > use strict; > > if (defined @ARGV && $ARGV[0] eq '-c') { > $::db_count = 0; > ... > ... > } > > print "passt\n" if defined $db_count; print "so passts\n" if defined $::db_count; Andere Moeglichkeiten waere zB use vars qw($db_count); # siehe perldoc vars also: use strict; use vars qw($db_count); if (defined @ARGV && $ARGV[0] eq '-c') { $db_count = 0; } print "passt\n" if defined $db_count; -- #!/usr/bin/perl http://domm.zsi.at for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/} From marcel at noug.at Fri Mar 28 06:05:49 2003 From: marcel at noug.at (=?ISO-8859-1?Q?Marcel_Gr=FCnauer?=) Date: Mon Aug 2 21:39:10 2004 Subject: [Vienna-pm] use strict => Geltungsbereich? In-Reply-To: <1FCFCFC1F0830E4D93860866CACC07B601455C29@m0114.s-mxs.net> Message-ID: <9D9F83A0-6115-11D7-8007-003065F97C4A@noug.at> On Freitag, M?rz 28, 2003, at 12:54 Uhr, Baier Oliver INT SD wrote: > Ich will, wenn @ARGV definiert ist, eine andere Variable > ($db_count) definieren, die natuerlich im Hauptprogramm > sichtbar ist. Da ich "use strict" verwende und somit alle > vars definieren muss, kann ich die Variable nicht mit my > deklarieren, da sie sonst ausserhalb des if-Blocks nicht > sichtbar ist aber auch nicht mit $::db_count, da ich sie > sonst im Hauptprogramm erst wieder importieren muesste, > was ich vermeiden will. 'use vars' deklariert sozusagen globale Variablen. Du kannst aber auch die Variablen einfach au?erhalb des if-Blocks definieren: use strict; my $db_count; if (defined @ARGV && $ARGV[0] eq '-c') { $db_count = 0; ... } print "passt\n" if defined $db_count; In Perl 5.6.0 und h?her gibt es auch das 'our'-keyword, das dasselbe wie 'use vars' macht (siehe 'perldoc -f our'), aber in einem lexikalischen Scope. Damit kannst Du Variablen deklarieren, die nur im lexikalischen Scope (z.B. in einem if-Block) g?ltig sind, aber die dieselbe Variable bezeichnen, wenn sie gleich hei?en, auch in unterschiedlichen Scopes. Dein obigen Beispiel w?rde dann also so aussehen: use strict; if (defined @ARGV && $ARGV[0] eq '-c') { our $db_count = 0; ... } print_it; sub print_it { our $db_count; print "passt\n" if defined $db_count; } oder sogar sub print_it { print "passt\n" if defined our $db_count; } Marcel From domm at zsi.at Fri Mar 28 06:08:11 2003 From: domm at zsi.at (Thomas Klausner) Date: Mon Aug 2 21:39:10 2004 Subject: [Vienna-pm] use strict => Geltungsbereich? In-Reply-To: <1FCFCFC1F0830E4D93860866CACC07B601455C29@m0114.s-mxs.net> References: <1FCFCFC1F0830E4D93860866CACC07B601455C29@m0114.s-mxs.net> Message-ID: <20030328120810.GD21469@zsi.at> Hi! On Fri, Mar 28, 2003 at 12:54:49PM +0100, Baier Oliver INT SD wrote: Beziehungsweise eigentlich ist hast du da ein Problem mit dem Scope, weil du anscheinend "my $db_count" in der IF-Schleife definierst. Damit ist $db_count aber nur in dieser Schleife sichtbar (weil my den Scope eben auf den enclosing block festlegt) und du bekommst den Fehler, wenn du $db_count nachher abfragen willst. > Hier noch ein Code-Schnipsel, der folgenden Fehler produziert: > Variable "$db_count" is not imported at ./checkcache.pl line 34. > eigentlich willst du glaub ich das: ---------- snip ---------- use strict; my $db_count; if (defined @ARGV && $ARGV[0] eq '-c') { $db_count = 0; # ... } print "passt\n" if defined $db_count; -- #!/usr/bin/perl http://domm.zsi.at for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/} From domm at zsi.at Fri Mar 28 06:10:55 2003 From: domm at zsi.at (Thomas Klausner) Date: Mon Aug 2 21:39:10 2004 Subject: [Vienna-pm] use strict => Geltungsbereich? In-Reply-To: <9D9F83A0-6115-11D7-8007-003065F97C4A@noug.at> References: <1FCFCFC1F0830E4D93860866CACC07B601455C29@m0114.s-mxs.net> <9D9F83A0-6115-11D7-8007-003065F97C4A@noug.at> Message-ID: <20030328121055.GE21469@zsi.at> Hi! On Fri, Mar 28, 2003 at 01:05:49PM +0100, Marcel Gr?nauer wrote: > In Perl 5.6.0 und h?her gibt es auch das 'our'-keyword, das dasselbe Ein kleines Problem mit "our" und der Tatsache, das zB h2xs "our" verwendet, ist, das CPAN-Module, die "our" verwenden (ev aus versehen, weil eben h2xs...) nicht mit alten Perl-Versionen funktionieren. Ich waere also (je nach Sinn des Codes..) ein wenig vorsichtig mit "our"... -- #!/usr/bin/perl http://domm.zsi.at for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/} From marcel at noug.at Fri Mar 28 06:20:14 2003 From: marcel at noug.at (=?ISO-8859-1?Q?Marcel_Gr=FCnauer?=) Date: Mon Aug 2 21:39:10 2004 Subject: [Vienna-pm] use strict => Geltungsbereich? In-Reply-To: <20030328121055.GE21469@zsi.at> Message-ID: On Freitag, M?rz 28, 2003, at 01:10 Uhr, Thomas Klausner wrote: > On Fri, Mar 28, 2003 at 01:05:49PM +0100, Marcel Gr?nauer wrote: > >> In Perl 5.6.0 und h?her gibt es auch das 'our'-keyword, das dasselbe > > Ein kleines Problem mit "our" und der Tatsache, das zB h2xs "our" > verwendet, > ist, das CPAN-Module, die "our" verwenden (ev aus versehen, weil eben > h2xs...) nicht mit alten Perl-Versionen funktionieren. Ich waere also > (je > nach Sinn des Codes..) ein wenig vorsichtig mit "our"... Daher auch die Einschr?nkung "In Perl 5.6.0 und h?her". Klar funktioniert das dann mit 5.5.3 nicht. Aber Du verwendest doch nicht mehr 5.5.3, oder? Und 5.6.0 ist eh buggy, also am besten 5.8.0 installieren :) Abgesehen davon hast Du nat?rlich recht: Man sollte 'our' nicht als Selbstzweck verwenden, sondern nur, wenn es sinnvoll ist. Dann ziehe ich es aber dem 'use vars'-Konstrukt in jedem Fall vor, schon wegen der lexikalischen G?ltigkeit der mit 'our' deklarierten Variablen. Marcel From BaierO at spardat.at Fri Mar 28 06:30:51 2003 From: BaierO at spardat.at (Baier Oliver INT SD) Date: Mon Aug 2 21:39:10 2004 Subject: AW: [Vienna-pm] use strict => Geltungsbereich? Message-ID: <1FCFCFC1F0830E4D93860866CACC07B601455C2B@m0114.s-mxs.net> Hi! Danke fuer die vielen Loesungsansaetze. Nachdem in dem laengeren Prog bei Vorhandensein von @ARGV ein paar Teile nicht ausfuehre und der Einfachkeit halber dort bloss auf (defined $db_count) abfrage, ist fuer mich "use vars" genau die Loesung, die ich gesucht habe. mfg Oliver > -----Urspr?ngliche Nachricht----- > Von: vienna-pm-admin@mail.pm.org > [mailto:vienna-pm-admin@mail.pm.org]Im > Auftrag von Thomas Klausner > Gesendet: Freitag, 28. M?rz 2003 13:11 > An: vienna-pm@mail.pm.org > Betreff: Re: [Vienna-pm] use strict => Geltungsbereich? > > > Hi! > > On Fri, Mar 28, 2003 at 01:05:49PM +0100, Marcel Gr?nauer wrote: > > > In Perl 5.6.0 und h?her gibt es auch das 'our'-keyword, das dasselbe > > Ein kleines Problem mit "our" und der Tatsache, das zB h2xs > "our" verwendet, > ist, das CPAN-Module, die "our" verwenden (ev aus versehen, weil eben > h2xs...) nicht mit alten Perl-Versionen funktionieren. Ich > waere also (je > nach Sinn des Codes..) ein wenig vorsichtig mit "our"... > > -- > #!/usr/bin/perl http://domm.zsi.at > for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/} > _______________________________________________ > Vienna-pm mailing list > Vienna-pm@mail.pm.org > http://mail.pm.org/mailman/listinfo/vienna-pm > From domm at zsi.at Fri Mar 28 07:44:42 2003 From: domm at zsi.at (Thomas Klausner) Date: Mon Aug 2 21:39:10 2004 Subject: [Vienna-pm] use strict => Geltungsbereich? In-Reply-To: <1FCFCFC1F0830E4D93860866CACC07B601455C2B@m0114.s-mxs.net> References: <1FCFCFC1F0830E4D93860866CACC07B601455C2B@m0114.s-mxs.net> Message-ID: <20030328134442.GF21469@zsi.at> Hi! On Fri, Mar 28, 2003 at 01:30:51PM +0100, Baier Oliver INT SD wrote: > Nachdem in dem laengeren Prog bei Vorhandensein von @ARGV Ach ja, warum verwendest du nicht Getopt::Std fuer das Lesen der Parameter? Fuer single-character switches ist das IMO um sehr vieles angenehmer als direkt in @ARGV rumzustochern. -- #!/usr/bin/perl http://domm.zsi.at for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/} From hjp-vienna-pm-list at hjp.at Sun Mar 30 12:04:30 2003 From: hjp-vienna-pm-list at hjp.at (Peter J. Holzer) Date: Mon Aug 2 21:39:10 2004 Subject: [Vienna-pm] Re: techmeet termine In-Reply-To: <20030327131151.GG6535@zsi.at>; from domm@zsi.at on Thu, Mar 27, 2003 at 02:11:51PM +0100 References: <20030326101450.GC23541@zsi.at> <20030326113358.GA6522@teal.hjp.at> <20030326232130.T11280@work.inode.at> <20030327090352.GA6535@zsi.at> <20030327140126.K11280@work.inode.at> <20030327131151.GG6535@zsi.at> Message-ID: <20030330200430.A13795@teal.hjp.at> On 2003-03-27 14:11:51 +0100, Thomas Klausner wrote: > On Don, M?r 27, 2003 at 02:01:26 +0100, Marinos J . Yannikos wrote: > > > Uhrzeit? Bei mir ginge theoretisch alles, aber nach 17 Uhr (lieber noch > > sp?ter) > > Achja, genau. Natuerlich eher abends, wie waere es mit 19:00? 19:00 ist mir recht. Hier sind meine Votes: DI, 22.4. + MI, 23.4. + DO, 24.4. - FR, 25.4. + hp -- _ | Peter J. Holzer | Latein ist das humanoide ?quivalent |_|_) | Sysadmin WSR | zu Fortran. | | | hjp@hjp.at | __/ | http://www.hjp.at/ | -- Alexander Bartolich in at.linux -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 189 bytes Desc: not available Url : http://mail.pm.org/pipermail/vienna-pm/attachments/20030330/08459f34/attachment.bin From marcel at noug.at Mon Mar 31 03:22:16 2003 From: marcel at noug.at (=?ISO-8859-1?Q?Marcel_Gr=FCnauer?=) Date: Mon Aug 2 21:39:10 2004 Subject: [Vienna-pm] vienna.pm.org website Message-ID: <43DB3D59-635A-11D7-AE91-003065F97C4A@noug.at> Hi, Es gibt jetzt eine erste kleine vienna.pm-website auf http://vienna.pm.org. Wenn es Perl-Jobs gibt, werde ich diese gerne auf einer weiteren Seite ank?ndigen. Bitte Informationen ?ber Perl-Jobs, sowohl was reinstellen als auch wieder l?schen betrifft, an marcel@noug.at. Feedback erw?nscht; f?r ?nderungsvorschl?ge bin ich offen. Dies soll unsere Website sein, also soll die Vienna.pm-Gemeinde sie auch gestalten k?nnen. Marcel From domm at zsi.at Mon Mar 31 03:30:36 2003 From: domm at zsi.at (Thomas Klausner) Date: Mon Aug 2 21:39:11 2004 Subject: [Vienna-pm] vienna.pm.org website In-Reply-To: <43DB3D59-635A-11D7-AE91-003065F97C4A@noug.at> References: <43DB3D59-635A-11D7-AE91-003065F97C4A@noug.at> Message-ID: <20030331093036.GA4483@zsi.at> Hi! On Mon, Mar 31, 2003 at 11:22:16AM +0200, Marcel Gr?nauer wrote: > Es gibt jetzt eine erste kleine vienna.pm-website > auf http://vienna.pm.org. Super! > Feedback erw?nscht; f?r ?nderungsvorschl?ge bin ich offen. > Dies soll unsere Website sein, also soll die Vienna.pm-Gemeinde > sie auch gestalten k?nnen. Hmm. Hast du irgendwo einen kleinen NavBar vorgesehen (wenns zB mal Jobs gibt, oder sonst irgendwelche weiteren Seiten)? Wie machst du die Seite? Statisches HTML (wegen dem LUGA-Abend, ob das quasi haendisch upgedatet wird, oder automatisch..)? Danke! -- #!/usr/bin/perl http://domm.zsi.at for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/} From marcel at noug.at Mon Mar 31 03:43:10 2003 From: marcel at noug.at (=?ISO-8859-1?Q?Marcel_Gr=FCnauer?=) Date: Mon Aug 2 21:39:11 2004 Subject: [Vienna-pm] vienna.pm.org website In-Reply-To: <20030331093036.GA4483@zsi.at> Message-ID: <2F090536-635D-11D7-AE91-003065F97C4A@noug.at> On Montag, M?rz 31, 2003, at 11:30 Uhr, Thomas Klausner wrote: > Hmm. Hast du irgendwo einen kleinen NavBar vorgesehen (wenns zB mal > Jobs > gibt, oder sonst irgendwelche weiteren Seiten)? Noch nicht; wenn's eine Jobs-Seite gibt, werde ich einen kleinen navbar einbauen. > Wie machst du die Seite? Statisches HTML (wegen dem LUGA-Abend, ob das > quasi > haendisch upgedatet wird, oder automatisch..)? Nein, nein - ist alles Handarbeit. Das einemal pro Monat schaff ich noch ein manuelles Update :) Marcel