From hjp at wsr.ac.at Fri Mar 4 11:28:40 2005 From: hjp at wsr.ac.at (Peter J. Holzer) Date: Fri Mar 4 11:28:51 2005 Subject: [Vienna-pm] Perl 5 vs. Perl 6 Message-ID: <20050304192840.GA28624@wsr.ac.at> Programming in Perl 5 is like exploring a large medieval castle, surrounded by a dark, mysterious forest, with something new and unexpected around each corner. There are dragons to be conquered, maidens to be rescued, and holy grails to be quested for. Lots of fun. Perl 6 looks like a Louis-XVI castle and garden to me. Straight, symmetric, and bright. There are wigs to be powdered, minuets to be danced, all quite boring. -- Abigail, zitiert von Autrijus Tang in http://www.perl.com/pub/a/2005/03/03/pugs_interview.html (Der Rest des Interviews ist ?brigens auch lesenswert) -- _ | Peter J. Holzer \Beta means "we're down to fixing misspelled comments in |_|_) | Sysadmin WSR \the source, and you might run into a memory leak if | | | hjp@wsr.ac.at \you enable embedded haskell as a loadable module and __/ | http://www.hjp.at/ \write your plugins upside-down in lisp". --ae@op5.se -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 388 bytes Desc: not available Url : http://mail.pm.org/pipermail/vienna-pm/attachments/20050304/d31b38c3/attachment-0001.bin From hjp at wsr.ac.at Fri Mar 4 11:56:35 2005 From: hjp at wsr.ac.at (Peter J. Holzer) Date: Fri Mar 4 11:56:45 2005 Subject: [Vienna-pm] Seltsames XML::Parser-Problem Message-ID: <20050304195635.GB28624@wsr.ac.at> Gegeben sei folgendes Script ------------------------------------------------------ #!/usr/local/bin/perl -w use strict; use XML::DOM; use Data::Dumper; use 5.8.3; # see [filehandle_utf8] for my $file (@ARGV) { my $parser = new XML::DOM::Parser; my $doc = $parser->parsefile ($file); my $f = FileHandle->new("$file.out", ">:utf8") or die "cannot open $file.out: $!"; $doc->print($f); $f->close() or die "cannot close $$: $!"; } ----------------------------------------------------- und folgendes Inputfile (in iso-8859-1 kodiert, d.h., das "?" ist ein Byte 0xE4): ------------------------------------------------------

L?uft wo?

----------
------------------------------------------- Dann erwarte ich als Output ein File namens backup-fs2.xml.out mit dem gleichen Inhalt, nur in UTF-8 kodiert. So ist es auch auf einem meiner Rechner. Auf anderen wird offenbar doppelt in UTF-8 umgewandelt: Aus dem ? werden die vier Bytes 0xC3 0x83 0xC2 0xA4. Soweit ich sehe passiert das einmal beim Parsen und beim Ausgeben noch einmal, weil der String beim Parsen nicht korrekt als UTF-8 markiert wird. Entfernt man das Newline zwischen "L?uft" und "wo?", so bekommt man das richtige Ergebnis. Funktionieren tut es auf: OS: Fedora Core 2 Perl: v5.8.3 built for i386-linux-thread-multi expat: 1.95.7-1.1 XML::Parser: 2.34 XML::DOM: 1.43 glibc: 2.3.3-27.1 Nicht funktionieren tut es auf: OS: Redhat 9 Perl: v5.8.6 built for i686-linux expat: 1.95.5-2 XML::Parser: 2.34 XML::DOM: 1.43 glibc: 2.3.2-27.9.7 OS: Debian Sarge Perl: v5.8.4 built for i386-linux-thread-multi expat: 1.95.8-1 XML::Parser: 2.34 XML::DOM: 1.43 glibc: 2.3.2.ds1-20 XML::Parser und XML::DOM ist also in allen F?llen identisch. expat ist einmal ?lter und einmal j?nger als im funktionierenden Fall, wird es also vermutlich auch nicht sein. Bleiben Perl (bei 5.8.3 gehts, bei neueren nicht) oder die glibc (bei 2.3.2 gehts nicht, bei 2.3.3 schon). Bevor ich mich in die unerquicklichen Tiefen von perl5 und der glibc2 st?rze: Kann das noch wer nachvollziehen und eventuell weiter eingrenzen? hp -- _ | Peter J. Holzer \Beta means "we're down to fixing misspelled comments in |_|_) | Sysadmin WSR \the source, and you might run into a memory leak if | | | hjp@wsr.ac.at \you enable embedded haskell as a loadable module and __/ | http://www.hjp.at/ \write your plugins upside-down in lisp". --ae@op5.se -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 388 bytes Desc: not available Url : http://mail.pm.org/pipermail/vienna-pm/attachments/20050304/8290286f/attachment.bin From spaceman at foo.at Fri Mar 4 16:27:33 2005 From: spaceman at foo.at (Stefan Weiss) Date: Fri Mar 4 16:28:54 2005 Subject: [Vienna-pm] Seltsames XML::Parser-Problem In-Reply-To: <20050304195635.GB28624@wsr.ac.at> References: <20050304195635.GB28624@wsr.ac.at> Message-ID: <4228FCF5.1030109@foo.at> Ich habe nicht versucht, dem Fehler auf den Grund zu gehen, aber ich kann dir 2 weitere F?lle liefern: On 2005-03-04 20:56, Peter J. Holzer wrote: > Nicht funktionieren tut es auf: add to that: OS: Debian 3.1 perl: perl, v5.8.4 built for i386-linux-thread-multi expat: 1.95.8 XML::Parser: 2.34 XML::DOM: 1.43 glibc: 2.3.2 OS: SuSE 9.2 perl: v5.8.5 built for i586-linux-thread-multi expat: 1.95.8 XML::Parser: 2.34 XML::DOM: 1.43 glibc: 2.3.3-118 HTH, stefan From mjy at geizhals.at Fri Mar 4 19:49:10 2005 From: mjy at geizhals.at (Marinos Yannikos) Date: Fri Mar 4 19:49:19 2005 Subject: [Vienna-pm] Seltsames XML::Parser-Problem In-Reply-To: <20050304195635.GB28624@wsr.ac.at> References: <20050304195635.GB28624@wsr.ac.at> Message-ID: <42292C36.1010408@geizhals.at> welches (default-)locale? Peter J. Holzer schrieb: > Gegeben sei folgendes Script [..] MfG, -mjy -- Dipl.-Ing. Marinos Yannikos, CEO Preisvergleich Internet Services AG Obere Donaustrasse 63, A-1020 Wien Tel./Fax: (+431) 5811609-52/-55 From hjp-vienna-pm-list at hjp.at Fri Mar 4 23:22:49 2005 From: hjp-vienna-pm-list at hjp.at (Peter J. Holzer) Date: Fri Mar 4 23:23:01 2005 Subject: [Vienna-pm] Seltsames XML::Parser-Problem In-Reply-To: <42292C36.1010408@geizhals.at> References: <20050304195635.GB28624@wsr.ac.at> <42292C36.1010408@geizhals.at> Message-ID: <20050305072249.GA4571@teal.hjp.at> On 2005-03-05 04:49:10 +0100, Marinos Yannikos wrote: > welches (default-)locale? en_US.UTF-8 hp -- _ | Peter J. Holzer | Weil wir die materielle Welt nicht so |_|_) | Sysadmin WSR | wahrnehmen, wie sie ist, sind Sachen wie | | | hjp@hjp.at | JPEG, MP3 usw. m?glich. __/ | http://www.hjp.at/ | -- Heiko Schlenker in drsm. -------------- 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/20050305/7f1a1f3b/attachment.bin From lt at toetsch.at Sat Mar 5 00:34:45 2005 From: lt at toetsch.at (Leopold Toetsch) Date: Sat Mar 5 01:52:42 2005 Subject: [Vienna-pm] Perl 5 vs. Perl 6 In-Reply-To: <20050304192840.GA28624@wsr.ac.at> References: <20050304192840.GA28624@wsr.ac.at> Message-ID: <42296F25.1030903@toetsch.at> Peter J. Holzer wrote: > Perl 6 looks like a Louis-XVI castle and garden to me. Straight, > symmetric, and bright. There are wigs to be powdered, minuets to be > danced, all quite boring. > > -- Abigail, zitiert von Autrijus Tang in > http://www.perl.com/pub/a/2005/03/03/pugs_interview.html > (Der Rest des Interviews ist ?brigens auch lesenswert) Yep - interessantes Interview. Apropos "quite boring": $ cat quicksort.p6 #!perl6 use v6; multi sub quicksort ( ) { () } multi sub quicksort ( *$x, *@xs ) { my @pre = @xs.grep:{ $_ < $x }; my @post = @xs.grep:{ $_ >= $x }; (@pre.quicksort, $x, @post.quicksort); } (1, 5, 2, 4, 3).quicksort.say; $ ./pugs quicksort.p6 12345 leo From hjp-vienna-pm-list at hjp.at Sat Mar 5 12:41:51 2005 From: hjp-vienna-pm-list at hjp.at (Peter J. Holzer) Date: Sat Mar 5 12:42:01 2005 Subject: [Vienna-pm] Seltsames XML::Parser-Problem In-Reply-To: <20050304195635.GB28624@wsr.ac.at> References: <20050304195635.GB28624@wsr.ac.at> Message-ID: <20050305204151.GA10039@teal.hjp.at> > So ist es auch auf einem meiner Rechner. Auf anderen wird offenbar > doppelt in UTF-8 umgewandelt: Aus dem ? werden die vier Bytes 0xC3 0x83 > 0xC2 0xA4. Soweit ich sehe passiert das einmal beim Parsen und beim > Ausgeben noch einmal, weil der String beim Parsen nicht korrekt als > UTF-8 markiert wird. Es geht offenbar mit Perl 5.8.3, aber nicht mit neueren Perls. Beim Testen bin ich aber auf etwas gesto?en, was nur am Rande mit dem Problem zu tun hat, aber mich noch mehr verwirrt. Meiner Meinung nach sollten zwei Strings dann und nur dann gleich sein (d.h., eq sollte true liefern), wenn unpack("U*", $str) ein Array mit den gleichen Zahlenwerten liefert. Wenn ich selber irgendwelche Teststrings zusammenbastle, ist das auch der Fall. Z.B.: ------------------------------------------------------------ #!/usr/local/bin/perl use warnings; use strict; use Encode; sub toHex { my $str = shift; my @a = unpack ("U*", $str); my $s = ""; for (@a) { $s .= sprintf ("%02x ", $_); } $s .= utf8::is_utf8($str) ? "(utf8)" : "(bytes)"; $s; } my $str1 = "\x{4c}\x{c3}\x{a4}\x{75}\x{66}\x{74}\x{20}\x{77}\x{6f}\x{3f}"; print toHex($str1), "\n"; my $str2 = Encode::decode("iso-8859-1", $str1); Encode::_utf8_on($str1); print "str1 = ", toHex($str1), "\n"; print "str2 = ", toHex($str2), "\n"; my $str3 = "L\x{e4}uft wo?"; print "str3 = ", toHex($str3), "\n"; print "str1 ", ($str1 eq $str2 ? "eq" : "ne"), " str2", "\n"; print "str1 ", ($str1 eq $str3 ? "eq" : "ne"), " str3", "\n"; print "str2 ", ($str2 eq $str3 ? "eq" : "ne"), " str3", "\n"; ----------------------------------------------------------- liefert: 4c c3 a4 75 66 74 20 77 6f 3f (bytes) str1 = 4c e4 75 66 74 20 77 6f 3f (utf8) str2 = 4c c3 a4 75 66 74 20 77 6f 3f (utf8) str3 = 4c e4 75 66 74 20 77 6f 3f (bytes) str1 ne str2 str1 eq str3 str2 ne str3 Von XML::DOM aber bekomme ich einen String t/dom_utf8.t: $str = 4c c3 a4 75 66 74 20 77 6f 3f (utf8) zur?ck, der eq zum String t/dom_utf8.t: $exp = 4c e4 75 66 74 20 77 6f 3f (bytes) ist. F?r mich sehen $str und $str2 bzw. $exp und $str3 identisch aus. Trotzdem ist perl im einen Fall der Meinung, dass sie gleich seien, im anderen Fall nicht. Versteht das wer? hp -- _ | Peter J. Holzer | Weil wir die materielle Welt nicht so |_|_) | Sysadmin WSR | wahrnehmen, wie sie ist, sind Sachen wie | | | hjp@hjp.at | JPEG, MP3 usw. m?glich. __/ | http://www.hjp.at/ | -- Heiko Schlenker in drsm. -------------- 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/20050305/47a28d36/attachment.bin From hjp-vienna-pm-list at hjp.at Sat Mar 5 14:38:07 2005 From: hjp-vienna-pm-list at hjp.at (Peter J. Holzer) Date: Sat Mar 5 14:38:17 2005 Subject: [Vienna-pm] Seltsames XML::Parser-Problem In-Reply-To: <20050305204151.GA10039@teal.hjp.at> References: <20050304195635.GB28624@wsr.ac.at> <20050305204151.GA10039@teal.hjp.at> Message-ID: <20050305223807.GC10039@teal.hjp.at> Hallo, hier ist wieder die Ingrid :-) On 2005-03-05 21:41:51 +0100, Peter J. Holzer wrote: > Es geht offenbar mit Perl 5.8.3, aber nicht mit neueren Perls. > > Beim Testen bin ich aber auf etwas gesto?en, was nur am Rande mit dem > Problem zu tun hat, aber mich noch mehr verwirrt. Meiner Meinung nach > sollten zwei Strings dann und nur dann gleich sein (d.h., eq sollte true > liefern), wenn unpack("U*", $str) ein Array mit den gleichen > Zahlenwerten liefert. Wenn ich selber irgendwelche Teststrings > zusammenbastle, ist das auch der Fall. Z.B.: [aber in XML::DOM ist alles anders] In meinen Testscripts stand auch kein "use bytes", im XML::DOM aber schon. Daher das seltsame Verhalten. Ich halte "use bytes" in XML::DOM f?r einen Bug, da XML::Parser Character-Strings liefert. Wenn man die mit Bytesemantik bearbeitet (was z.B. passiert, wenn ein Element ?ber mehrere Zeilen geht) kommen (offenbar beginnend mit Perl 5.8.4) Byte-Strings heraus, die man dann explizit wieder dekodieren m?sste. Wenn ich "use bytes" am Anfang entferne funktioniert mein Script und alle Testcases au?er den japanischen (die funktionieren aber mit use bytes auch nicht). Ich werde mal einen Bugreport dazu einwerfen. Wenn ich das README-File richtig interpretiere, d?rfte wohl perl-xml@listserv.activestate.com der richtige Ort daf?r sein. hp -- _ | Peter J. Holzer | Weil wir die materielle Welt nicht so |_|_) | Sysadmin WSR | wahrnehmen, wie sie ist, sind Sachen wie | | | hjp@hjp.at | JPEG, MP3 usw. m?glich. __/ | http://www.hjp.at/ | -- Heiko Schlenker in drsm. -------------- 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/20050305/32da3fa7/attachment.bin From kh at dartbase.com Sat Mar 5 15:08:28 2005 From: kh at dartbase.com (karlheinz) Date: Sat Mar 5 15:08:30 2005 Subject: [Vienna-pm] Seltsames XML::Parser-Problem In-Reply-To: <20050305223807.GC10039@teal.hjp.at> References: <20050304195635.GB28624@wsr.ac.at> <20050305204151.GA10039@teal.hjp.at> <20050305223807.GC10039@teal.hjp.at> Message-ID: <422A3BEC.9090203@dartbase.com> Peter J. Holzer wrote: > In meinen Testscripts stand auch kein "use bytes", im XML::DOM aber > schon. Daher das seltsame Verhalten. das duerfte ein Relikt aus 5.6 zeiten sein wo man fuer alles was utf-8 betraf kaum ohne workarounds die use bytes benoetigen auskam, weil das unicode modell in 5.6 ziemlich broken war. > Ich halte "use bytes" in XML::DOM f?r einen Bug, da XML::Parser > Character-Strings liefert. jo. gibt es einen grund warum du auf expat basierende module verwendest und nicht die neuere und bessere libxml2 (XML::LibXML)? lg karlheinz From hjp-vienna-pm-list at hjp.at Sat Mar 5 15:28:06 2005 From: hjp-vienna-pm-list at hjp.at (Peter J. Holzer) Date: Sat Mar 5 15:28:17 2005 Subject: [Vienna-pm] Seltsames XML::Parser-Problem In-Reply-To: <422A3BEC.9090203@dartbase.com> References: <20050304195635.GB28624@wsr.ac.at> <20050305204151.GA10039@teal.hjp.at> <20050305223807.GC10039@teal.hjp.at> <422A3BEC.9090203@dartbase.com> Message-ID: <20050305232806.GA12003@teal.hjp.at> On 2005-03-06 00:08:28 +0100, karlheinz wrote: > gibt es einen grund warum du auf expat basierende module verwendest und > nicht die neuere und bessere libxml2 (XML::LibXML)? Erstens kannte ich XML::LibXML bisher gar nicht. Zweitens ist libxml2 Teil von Gnome und das erste was mir bei Gnome einf?llt sind Kompatibilit?tsprobleme. Und siehe da, im README lese ich: | First of all XML::LibXML requires at least libxml2 2.4.25. Das habe ich aber nicht ?berall (tats?chlich habe ich auf einigen Systemen noch libxml1). Um mir den Aufwand anzutun, ?berall eine aktuelle libxml2 zu installieren (und zu testen, ob dann wohl noch alles andere funktioniert), brauche ich handfeste Vorteile. Inwiefern ist XML::LibXML besser? hp -- _ | Peter J. Holzer | Weil wir die materielle Welt nicht so |_|_) | Sysadmin WSR | wahrnehmen, wie sie ist, sind Sachen wie | | | hjp@hjp.at | JPEG, MP3 usw. m?glich. __/ | http://www.hjp.at/ | -- Heiko Schlenker in drsm. -------------- 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/20050306/c63da14e/attachment-0001.bin From kh at dartbase.com Sat Mar 5 15:56:38 2005 From: kh at dartbase.com (karlheinz) Date: Sat Mar 5 15:56:40 2005 Subject: [Vienna-pm] Seltsames XML::Parser-Problem In-Reply-To: <20050305232806.GA12003@teal.hjp.at> References: <20050304195635.GB28624@wsr.ac.at> <20050305204151.GA10039@teal.hjp.at> <20050305223807.GC10039@teal.hjp.at> <422A3BEC.9090203@dartbase.com> <20050305232806.GA12003@teal.hjp.at> Message-ID: <422A4736.4010900@dartbase.com> Peter J. Holzer wrote: > First of all XML::LibXML requires at least libxml2 2.4.25. ja, das ist leider ein problem bei XML::LibXML. schlimmer noch, es kann auch probleme mit neueren versionen von libxml2 geben, eventuell brauchst du genau eine bestimmte libxml2 version... zumindest war das bis vor einem halben jahr so, den aktuellen stand der kompatibilitaeten kenne ich nicht. > Inwiefern ist XML::LibXML > besser? expat kann nur XML parsen, libxml2 enthaelt AFAIK (hab schon laenger nichts mehr damit gemacht und das ganze nicht mehr genau im kopf, also diese info mit etwas vorsicht geniessen) auch DOM libraries. wenn XML::DOM (was ich wiederum nicht kenne ;-) ) wie ich annehme DOM ueber perl und nicht c libraries implementiert sollte es klar langsamer sein. expat mit XML::Parser ist dafuer im reinen parsen von XML sehr schnell (http://www.xml.com/pub/a/2004/09/15/pl-perf.html). da ich XML::DOM nicht kenne kann ich es nicht mit XML::LibXML vergleichen. ich habe nur recht intensiv XML::LibXML verwendet und es gab nie probleme (was bei XML und speziell XML mit perl sonst eher selten ist), meiner erfahrung nach also ein gute, stabile und weitreichende DOM implementation (wenn man sie einmal zum laufen gebracht hat natuerlich). ein weiterer punkt fuer libxml2 ist dass es aus demselben projekt eine libxslt gibt (mit uugehoreiger XML::LibXSLT). wenn du (vielleicht auch irgendwann mal) XSLT machen musst dann ist libxml2 vorzuziehen weil es mit XML/XSLT mit verschiedenen parsern / XSLT implementationen immer wieder zu kompatibilitaetsproblemen kommt. lg karlheinz From hjp-vienna-pm-list at hjp.at Sun Mar 6 07:46:56 2005 From: hjp-vienna-pm-list at hjp.at (Peter J. Holzer) Date: Sun Mar 6 07:47:06 2005 Subject: [Vienna-pm] Seltsames XML::Parser-Problem In-Reply-To: <422A4736.4010900@dartbase.com> References: <20050304195635.GB28624@wsr.ac.at> <20050305204151.GA10039@teal.hjp.at> <20050305223807.GC10039@teal.hjp.at> <422A3BEC.9090203@dartbase.com> <20050305232806.GA12003@teal.hjp.at> <422A4736.4010900@dartbase.com> Message-ID: <20050306154656.GA18831@teal.hjp.at> On 2005-03-06 00:56:38 +0100, karlheinz wrote: > Peter J. Holzer wrote: > >Inwiefern ist XML::LibXML besser? > > expat kann nur XML parsen, libxml2 enthaelt AFAIK (hab schon laenger > nichts mehr damit gemacht und das ganze nicht mehr genau im kopf, also > diese info mit etwas vorsicht geniessen) auch DOM libraries. wenn > XML::DOM (was ich wiederum nicht kenne ;-) ) wie ich annehme DOM ueber > perl und nicht c libraries implementiert Tut es > sollte es klar langsamer sein. Mag sein, ist allerdings bei den Datenmengen, um die es bei mir geht, nicht wirklich relevant. Das schafft auch XML::SAX::PurePerl :-) Ich habe gerade spa?eshalber versucht, das Script, das der Anlass dieses Threads war, auf XML::LibXML umzuschreiben, bin aber vorerst gescheitert: Das Script liest alle XML-Files in einem bestimmten Directory (derzeit sind es 66), sucht aus jedem ein paar Elemente raus und merkt sich die in einem Hash. Dann generiert es aus diesen Elementen neue XML-Files. Mit XML::DOM funktioniert das problemlos. XML::LibXML hingegen beklagt sich beim Parsen des 32sten Dokuments: Operation in progress at /usr/lib/perl5/XML/LibXML.pm line 435. at ./snippets/combine-libxml line 54 Kann es sein, dass die libxml2 ein Limit von 31 DOM-B?umen hat? Ich dachte, ich kann das umgehen, indem ich ein Hilfsdokument erzeuge und alle Elemente, die ich mir merken will, mit adoptNode in dieses Dokument ziehe, aber das n?tzt auch nichts. Irgendwo bleibt da offenbar eine Referenz bestehen ... hp -- _ | Peter J. Holzer | Weil wir die materielle Welt nicht so |_|_) | Sysadmin WSR | wahrnehmen, wie sie ist, sind Sachen wie | | | hjp@hjp.at | JPEG, MP3 usw. m?glich. __/ | http://www.hjp.at/ | -- Heiko Schlenker in drsm. -------------- 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/20050306/76bf3064/attachment.bin From kh at dartbase.com Sun Mar 6 09:17:16 2005 From: kh at dartbase.com (karlheinz) Date: Sun Mar 6 09:17:23 2005 Subject: [Vienna-pm] Seltsames XML::Parser-Problem In-Reply-To: <20050306154656.GA18831@teal.hjp.at> References: <20050304195635.GB28624@wsr.ac.at> <20050305204151.GA10039@teal.hjp.at> <20050305223807.GC10039@teal.hjp.at> <422A3BEC.9090203@dartbase.com> <20050305232806.GA12003@teal.hjp.at> <422A4736.4010900@dartbase.com> <20050306154656.GA18831@teal.hjp.at> Message-ID: <422B3B1C.3080808@dartbase.com> Peter J. Holzer wrote: > Kann es sein, dass die libxml2 ein Limit von 31 DOM-B?umen hat? das kann durchaus sein... ich habe nie mehr als ein paar XML dokumente parallel bearbeitet. > Ich dachte, ich kann das umgehen, indem ich ein Hilfsdokument erzeuge > und alle Elemente, die ich mir merken will, mit adoptNode in dieses > Dokument ziehe, aber das n?tzt auch nichts. Irgendwo bleibt da offenbar > eine Referenz bestehen ... womit du ausserdem wahrscheinlich in dieses problem rennst: NOTE: Don't try to adoptNode() to import subtrees that contain entity references - even if the entity reference is the root node of the subtree. This will cause serious problems to your program. This is a limitation of libxml2 and not of XML::LibXML itself. du muesstest bei diesem ansatz also eher mit sowas wie $hilfsdoc->documentElement->appendChild($node->cloneNode(1)) arbeiten. wenn allerdings die angenommenen 31 DOM baeume limit nicht zu umgehen sind wird's aber wohl beim gepatchten XML::DOM bleiben... lg karlheinz From domm at zsi.at Mon Mar 7 12:46:37 2005 From: domm at zsi.at (Thomas Klausner) Date: Mon Mar 7 12:47:58 2005 Subject: [Vienna-pm] Powered by Perl, wiedermal Message-ID: <20050307204637.GE7946@domm2.zsi.at> Hi! Ich hab (nach ein wenig Feedback von Ask Bjorn Hansen) die Powered-by-Perl site ein wenig umgestellt/ueberarbeitet. Neben ein paar Textaendernungen/ergaenzungen gibts jetzt auch ein "featured project" Wenn ihr euch das ganze auch mal anschauen wollt (von wegen Typos, English-Fehler, etc), wuerde mich das freuen. Zahlreiche Projekt-Einwuerfe natuerlich auch :-) Oh, 2 Dinge/Fragen noch: * URL das ganze Ding wird wahrscheinlich eine perl.org subdomaine werden. Ich hab mal powered.by.perl.org vorgeschlagen. Andere Moeglichkeiten waeren poweredby.perl.org powered_by.perl.org powererd.perl.org Was meint ihr denn? * Button Ein 'Powered by Perl' Button waere natuerlich auch recht nett. Hat jemand Lust, endlosen Ruhm zu erlangen, indem er/sie sowas zeichnet? Ich bin da leider ein wenig unbegabt.. BTW, ein Vienna.pm-Logo waere auch nett ... Oh, und noch ein wenig semi-informelle Vorabinfo: Um sich von dem Kamel-O'Reilly-Trademark ein wenig zu emanzipieren, hat sich die Perl Foundation ein neues Perl-Logo ausgedacht: eine Zwiebel http://www.perl.org/simages/onion/onion-160x160a.gif (von wegen 'state of the onion' und so) Also wenn jemand was Logo/Button/Artiges machen mag, koennte das ev mitgedacht werden. Danke! -- #!/usr/bin/perl http://domm.zsi.at for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/} From rl at brabbel.net Mon Mar 7 12:53:56 2005 From: rl at brabbel.net (Roland Lammel) Date: Mon Mar 7 12:54:11 2005 Subject: [Vienna-pm] Powered by Perl, wiedermal In-Reply-To: <20050307204637.GE7946@domm2.zsi.at> References: <20050307204637.GE7946@domm2.zsi.at> Message-ID: <1110228836.7148.5.camel@einstein> Howdi, Bin f?r poweredby.perl.org bzw. powered.perl.org (im Sinne von Perl powered) w?r auch noch ok. Bin zwar minderbegabt, was Logos betrifft, aber wenn sonst keiner Interesse hat, w?rd ich mal damit anfangen. Irgendwelche bestimmte Ideen bereits? Und zum Thema Zwiebel-Logo, hat es immerhin einen ?hnlichen d?rftigen bzw. fragw?rdigen Bezug zu Perl, wie das Camel, also perfekt ;-) Cheers +rl On Mon, 2005-03-07 at 21:46 +0100, Thomas Klausner wrote: > Hi! > > Ich hab (nach ein wenig Feedback von Ask Bjorn Hansen) die Powered-by-Perl > site ein wenig umgestellt/ueberarbeitet. > > Neben ein paar Textaendernungen/ergaenzungen gibts jetzt auch ein "featured > project" > > Wenn ihr euch das ganze auch mal anschauen wollt (von wegen Typos, > English-Fehler, etc), wuerde mich das freuen. > > Zahlreiche Projekt-Einwuerfe natuerlich auch :-) > > Oh, 2 Dinge/Fragen noch: > > * URL > > das ganze Ding wird wahrscheinlich eine perl.org subdomaine werden. > > Ich hab mal powered.by.perl.org vorgeschlagen. Andere Moeglichkeiten waeren > poweredby.perl.org > powered_by.perl.org > powererd.perl.org > > Was meint ihr denn? > > * Button > > Ein 'Powered by Perl' Button waere natuerlich auch recht nett. Hat jemand > Lust, endlosen Ruhm zu erlangen, indem er/sie sowas zeichnet? Ich bin da > leider ein wenig unbegabt.. > > BTW, ein Vienna.pm-Logo waere auch nett ... > > Oh, und noch ein wenig semi-informelle Vorabinfo: Um sich von dem > Kamel-O'Reilly-Trademark ein wenig zu emanzipieren, hat sich die Perl > Foundation ein neues Perl-Logo ausgedacht: eine Zwiebel > > http://www.perl.org/simages/onion/onion-160x160a.gif > > (von wegen 'state of the onion' und so) > > Also wenn jemand was Logo/Button/Artiges machen mag, koennte das ev > mitgedacht werden. > > Danke! > -- Roland Lammel From hjp-vienna-pm-list at hjp.at Mon Mar 7 13:25:51 2005 From: hjp-vienna-pm-list at hjp.at (Peter J. Holzer) Date: Mon Mar 7 13:26:03 2005 Subject: [Vienna-pm] Powered by Perl, wiedermal In-Reply-To: <20050307204637.GE7946@domm2.zsi.at> References: <20050307204637.GE7946@domm2.zsi.at> Message-ID: <20050307212551.GC6546@teal.hjp.at> On 2005-03-07 21:46:37 +0100, Thomas Klausner wrote: > * URL > > das ganze Ding wird wahrscheinlich eine perl.org subdomaine werden. > > Ich hab mal powered.by.perl.org vorgeschlagen. Gef?llt mir am besten. > Andere Moeglichkeiten waeren > poweredby.perl.org > powered_by.perl.org ^ dagegen hat ein RFC was. powered-by.perl.org w?re konform. > powererd.perl.org ^^^^ Ein "r" m?ssen wir leider abziehen. Klingt aber nicht besonders fl?ssig. > * Button > > Ein 'Powered by Perl' Button waere natuerlich auch recht nett. Hat jemand > Lust, endlosen Ruhm zu erlangen, indem er/sie sowas zeichnet? Ich bin da > leider ein wenig unbegabt.. > > BTW, ein Vienna.pm-Logo waere auch nett ... > > Oh, und noch ein wenig semi-informelle Vorabinfo: Um sich von dem > Kamel-O'Reilly-Trademark ein wenig zu emanzipieren, hat sich die Perl > Foundation ein neues Perl-Logo ausgedacht: eine Zwiebel > > http://www.perl.org/simages/onion/onion-160x160a.gif > > (von wegen 'state of the onion' und so) Powered by Perlzwieberl? > Also wenn jemand was Logo/Button/Artiges machen mag, koennte das ev > mitgedacht werden. Meine kulinarischen Assoziationen zur Zwiebel sind alle graphisch schwer umsetzbar. Das Kamel ist da irgendwie ein dankbareres Subjekt. hp -- _ | Peter J. Holzer | Weil wir die materielle Welt nicht so |_|_) | Sysadmin WSR | wahrnehmen, wie sie ist, sind Sachen wie | | | hjp@hjp.at | JPEG, MP3 usw. m?glich. __/ | http://www.hjp.at/ | -- Heiko Schlenker in drsm. -------------- 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/20050307/f304d047/attachment.bin From hjp at wsr.ac.at Tue Mar 8 01:12:22 2005 From: hjp at wsr.ac.at (Peter J. Holzer) Date: Tue Mar 8 01:12:43 2005 Subject: [Vienna-pm] Powered by Perl, wiedermal In-Reply-To: <20050307212551.GC6546@teal.hjp.at> References: <20050307204637.GE7946@domm2.zsi.at> <20050307212551.GC6546@teal.hjp.at> Message-ID: <20050308091222.GC20886@wsr.ac.at> On 2005-03-07 22:25:51 +0100, Peter J. Holzer wrote: > On 2005-03-07 21:46:37 +0100, Thomas Klausner wrote: > > * Button > > > > Ein 'Powered by Perl' Button waere natuerlich auch recht nett. Hat jemand > > Lust, endlosen Ruhm zu erlangen, indem er/sie sowas zeichnet? Ich bin da > > leider ein wenig unbegabt.. > > > > ein neues Perl-Logo ausgedacht: eine Zwiebel > > > > (von wegen 'state of the onion' und so) > > Powered by Perlzwieberl? > > > Also wenn jemand was Logo/Button/Artiges machen mag, koennte das ev > > mitgedacht werden. > > Meine kulinarischen Assoziationen zur Zwiebel sind alle graphisch schwer > umsetzbar. Mir ist doch noch was zur Zwiebel eingefallen: http://www.hjp.at/programming/perl/powered-by-onion-g.png Kann man die Assoziation, die ich hatte, nachvollziehen? Anyway, auf Buttongr??e verkleinert: http://www.hjp.at/programming/perl/powered-by-onion-g-48.png ist das gar nicht mehr zu erkennen, und schaut eher aus wie eine Christbaumkugel. > Das Kamel ist da irgendwie ein dankbareres Subjekt. Aber f?r mein eingerostetes Zeichentalent eine ziemliche Herausforderung. Ich habe gestern noch was skizziert - aber erstens habe ich den Zettel daheim vergessen und kann es deshalb nicht einscannen, und zweitens brauchte man eh viel Phantasie, um zu erkennen, was es sein sollte: Ein Kamel, das in einem Hamsterradl galoppiert. hp -- _ | Peter J. Holzer \Beta means "we're down to fixing misspelled comments in |_|_) | Sysadmin WSR \the source, and you might run into a memory leak if | | | hjp@wsr.ac.at \you enable embedded haskell as a loadable module and __/ | http://www.hjp.at/ \write your plugins upside-down in lisp". --ae@op5.se -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 388 bytes Desc: not available Url : http://mail.pm.org/pipermail/vienna-pm/attachments/20050308/75fcae56/attachment.bin From hjp-vienna-pm-list at hjp.at Tue Mar 8 03:51:44 2005 From: hjp-vienna-pm-list at hjp.at (Peter J. Holzer) Date: Tue Mar 8 03:51:54 2005 Subject: [Vienna-pm] Pointer-Arithmetik in Perl :-) Message-ID: <20050308115144.GA14435@teal.hjp.at> Hallo, ich habe mich gerade gewundert, warum ein Script von mir (ohne Warnungen) keinen Output produziert. Eine kurze Session im Debugger hat's gezeigt: DB<2> p $prop->{'S:ds_start'} / 1000 152303.036 DB<3> p $prop->{'S:ds_ends'} / 1000 152302.928 DB<4> p $prop->{'S:ds_start'} HASH(0x913f5bc) DB<5> p $prop->{'S:ds_ends'} HASH(0x913f550) Tja, vielleicht sollte ich doch nicht Hash-References zu dividieren versuchen. Aber ich bin etwas verwundert, dass mich Perl das trotz use strict und use warnings widerspruchslos machen l?sst. hp -- _ | Peter J. Holzer | Weil wir die materielle Welt nicht so |_|_) | Sysadmin WSR | wahrnehmen, wie sie ist, sind Sachen wie | | | hjp@hjp.at | JPEG, MP3 usw. m?glich. __/ | http://www.hjp.at/ | -- Heiko Schlenker in drsm. -------------- 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/20050308/02c5c3cc/attachment-0001.bin From e_horn at fh-bingen.de Tue Mar 8 04:37:06 2005 From: e_horn at fh-bingen.de (e_horn@fh-bingen.de) Date: Tue Mar 8 04:37:18 2005 Subject: [Vienna-pm] datei zeilenweise einlesen in arrays Message-ID: <1110285426.422d9c72f3e42@webmail.fh-bingen.de> Hallo! Kann mir jemand sagen wie ich eine solche datei zeilenweise speichern kann in ein array? das ich habe array VAL B 212 -2.882 24.626 111.287 array VAL B 212 -3.542 25.442 110.620 array VAL B 212 -1.026 24.015 109.761 usw... ATOM 3085 C VAL B 212 -2.882 24.626 111.287 1.00 23.12 C ATOM 3086 O VAL B 212 -3.542 25.442 110.620 1.00 22.42 O ATOM 3087 CB VAL B 212 -1.026 24.015 109.761 1.00 23.40 C ATOM 3088 CG1 VAL B 212 -0.032 24.644 110.725 1.00 22.89 C ATOM 3089 CG2 VAL B 212 -0.369 22.913 108.945 1.00 24.23 C ATOM 3090 OXT VAL B 212 -2.701 24.727 112.521 1.00 24.52 N ---------------------------------------------------------------- This message was sent using IMP, the Internet Messaging Program. From pilsl at goldfisch.at Tue Mar 8 04:45:28 2005 From: pilsl at goldfisch.at (peter pilsl) Date: Tue Mar 8 04:46:26 2005 Subject: [Vienna-pm] datei zeilenweise einlesen in arrays In-Reply-To: <1110285426.422d9c72f3e42@webmail.fh-bingen.de> References: <1110285426.422d9c72f3e42@webmail.fh-bingen.de> Message-ID: <422D9E68.1020200@goldfisch.at> e_horn@fh-bingen.de wrote: > Hallo! > Kann mir jemand sagen wie ich eine solche datei zeilenweise speichern kann in > ein array? > das ich habe array VAL B 212 -2.882 24.626 111.287 > array VAL B 212 -3.542 25.442 110.620 > array VAL B 212 -1.026 24.015 109.761 usw... > > ATOM 3085 C VAL B 212 -2.882 24.626 111.287 1.00 23.12 C > ATOM 3086 O VAL B 212 -3.542 25.442 110.620 1.00 22.42 O > ATOM 3087 CB VAL B 212 -1.026 24.015 109.761 1.00 23.40 C > ATOM 3088 CG1 VAL B 212 -0.032 24.644 110.725 1.00 22.89 C > ATOM 3089 CG2 VAL B 212 -0.369 22.913 108.945 1.00 24.23 C > ATOM 3090 OXT VAL B 212 -2.701 24.727 112.521 1.00 24.52 N > ich checks nicht ganz, wie dein datenformat ist und was du damit genau willst, aber ein beispiel zum verarbeiten deiner daten w?re in etwa (untested) my $p=[]; while () { push(@$p,[split(/\s+/)]); } mit split trennst du deine daten ?berall dort wo deine daten leerzeichen oder tabs oder so haben (whitespaces = \s) das ergebnis von split ist ein array, das du wieder in einem array speicherst. Du erh?ltst also ein array von arrays. Die eckigen Klammern zeigen, dass es sich dabei um sogenannte "anonyme" arrays handelt, das sind zeiger auf arrays. am ende kannst du dann das 4. element in der 7. zeile abfragen: $p->[3]->[6] lgp -- mag. peter pilsl goldfisch.at IT-management tel +43 699 1 3574035 fax +43 699 4 3574035 pilsl@goldfisch.at From rl at brabbel.net Tue Mar 8 04:49:53 2005 From: rl at brabbel.net (Roland Lammel) Date: Tue Mar 8 04:50:11 2005 Subject: [Vienna-pm] datei zeilenweise einlesen in arrays In-Reply-To: <1110285426.422d9c72f3e42@webmail.fh-bingen.de> References: <1110285426.422d9c72f3e42@webmail.fh-bingen.de> Message-ID: <1110286193.5314.6.camel@einstein> Mir ist zwar aus der Angabe nicht klar, was tats?chlich im Array stehen soll aber am einfachsten wie folgt: my @array = (); if (open(FIL,"input.txt")) { while () { chomp; my @tmp = split; # Hier sind die daten der zeile der Reihe nach im array @tmp # mit dem push kommt nun element 4-9 als String ins array push @array,"@tmp[3,4,5,6,7,8]"; } close FIL; } Cheers +rl On Tue, 2005-03-08 at 13:37 +0100, e_horn@fh-bingen.de wrote: > Hallo! > Kann mir jemand sagen wie ich eine solche datei zeilenweise speichern kann in > ein array? > das ich habe array VAL B 212 -2.882 24.626 111.287 > array VAL B 212 -3.542 25.442 110.620 > array VAL B 212 -1.026 24.015 109.761 usw... > > ATOM 3085 C VAL B 212 -2.882 24.626 111.287 1.00 23.12 C > ATOM 3086 O VAL B 212 -3.542 25.442 110.620 1.00 22.42 O > ATOM 3087 CB VAL B 212 -1.026 24.015 109.761 1.00 23.40 C > ATOM 3088 CG1 VAL B 212 -0.032 24.644 110.725 1.00 22.89 C > ATOM 3089 CG2 VAL B 212 -0.369 22.913 108.945 1.00 24.23 C > ATOM 3090 OXT VAL B 212 -2.701 24.727 112.521 1.00 24.52 N > > ---------------------------------------------------------------- > This message was sent using IMP, the Internet Messaging Program. > > _______________________________________________ > Vienna-pm mailing list > Vienna-pm@pm.org > http://mail.pm.org/mailman/listinfo/vienna-pm -- Roland Lammel From domm at zsi.at Tue Mar 8 05:09:09 2005 From: domm at zsi.at (Thomas Klausner) Date: Tue Mar 8 05:37:48 2005 Subject: [Vienna-pm] Pointer-Arithmetik in Perl :-) In-Reply-To: <20050308115144.GA14435@teal.hjp.at> References: <20050308115144.GA14435@teal.hjp.at> Message-ID: <20050308130909.GB11560@domm2.zsi.at> Hi! On Tue, Mar 08, 2005 at 12:51:44PM +0100, Peter J. Holzer wrote: > Tja, vielleicht sollte ich doch nicht Hash-References zu dividieren > versuchen. > > Aber ich bin etwas verwundert, dass mich Perl das trotz use strict und > use warnings widerspruchslos machen l?sst. Hmm, das war unlaengst irgendwo Thema.. Auf jedenfall (allerdings geraten!): Wahrscheinlich kriegst du durch die Division einen String bzw Scalar Kontext, und da wird ein Hash als Bruch dargestellt ("8/2" oder so). Das hat irgendwass mit der Nummer der Eintraege und der Anzahl der Buckets zu tun (wie in jenem oben angesprochenen, aber leider vergessenem Thread besprochen) Und dann wird der Bruch halt durch 1000 dividiert. Vermute ich mal... -- #!/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 Tue Mar 8 06:21:44 2005 From: hjp-vienna-pm-list at hjp.at (Peter J. Holzer) Date: Tue Mar 8 06:21:54 2005 Subject: [Vienna-pm] Pointer-Arithmetik in Perl :-) In-Reply-To: <20050308130909.GB11560@domm2.zsi.at> References: <20050308115144.GA14435@teal.hjp.at> <20050308130909.GB11560@domm2.zsi.at> <20050308115144.GA14435@teal.hjp.at> Message-ID: <20050308142144.GC12110@teal.hjp.at> On 2005-03-08 14:09:09 +0100, Thomas Klausner wrote: > On Tue, Mar 08, 2005 at 12:51:44PM +0100, Peter J. Holzer wrote: > > > Tja, vielleicht sollte ich doch nicht Hash-References zu dividieren > > versuchen. > > > > Aber ich bin etwas verwundert, dass mich Perl das trotz use strict und > > use warnings widerspruchslos machen l?sst. > Wahrscheinlich kriegst du durch die Division einen String bzw Scalar > Kontext, und da wird ein Hash als Bruch dargestellt ("8/2" oder so). Das hat > irgendwass mit der Nummer der Eintraege und der Anzahl der Buckets zu tun > (wie in jenem oben angesprochenen, aber leider vergessenem Thread besprochen) Nein, es ist einfach der Wert, der als Hexzahl dabeisteht (d?rfte wohl die Adresse sein): On 2005-03-08 12:51:44 +0100, Peter J. Holzer wrote: > DB<2> p $prop->{'S:ds_start'} / 1000 > 152303.036 > DB<4> p $prop->{'S:ds_start'} > HASH(0x913f5bc) % perl -e 'print 0x913f5bc / 1000, "\n"' 152303.036 hp -- _ | Peter J. Holzer | Weil wir die materielle Welt nicht so |_|_) | Sysadmin WSR | wahrnehmen, wie sie ist, sind Sachen wie | | | hjp@hjp.at | JPEG, MP3 usw. m?glich. __/ | http://www.hjp.at/ | -- Heiko Schlenker in drsm. -------------- 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/20050308/3ebba63d/attachment.bin From domm at zsi.at Tue Mar 8 06:28:22 2005 From: domm at zsi.at (Thomas Klausner) Date: Tue Mar 8 06:25:33 2005 Subject: [Vienna-pm] Pointer-Arithmetik in Perl :-) In-Reply-To: <20050308142144.GC12110@teal.hjp.at> References: <20050308115144.GA14435@teal.hjp.at> <20050308130909.GB11560@domm2.zsi.at> <20050308115144.GA14435@teal.hjp.at> <20050308142144.GC12110@teal.hjp.at> Message-ID: <20050308142822.GD11560@domm2.zsi.at> Hi! On Tue, Mar 08, 2005 at 03:21:44PM +0100, Peter J. Holzer wrote: > Nein, es ist einfach der Wert, der als Hexzahl dabeisteht (d?rfte wohl > die Adresse sein): > > On 2005-03-08 12:51:44 +0100, Peter J. Holzer wrote: > > DB<2> p $prop->{'S:ds_start'} / 1000 > > 152303.036 > > DB<4> p $prop->{'S:ds_start'} > > HASH(0x913f5bc) > > % perl -e 'print 0x913f5bc / 1000, "\n"' > 152303.036 Funky! Mal schaun, ob sich daraus eine Obfuscation machen laesst :-) -- #!/usr/bin/perl http://domm.zsi.at for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/} From e_horn at fh-bingen.de Tue Mar 8 08:02:52 2005 From: e_horn at fh-bingen.de (e_horn@fh-bingen.de) Date: Tue Mar 8 08:03:02 2005 Subject: [Vienna-pm] (no subject) Message-ID: <1110297772.422dccaca7877@webmail.fh-bingen.de> danke ihr habt mir sehr geholfen! ---------------------------------------------------------------- This message was sent using IMP, the Internet Messaging Program. From Oliver.Baier at lotterien.at Wed Mar 9 07:09:43 2005 From: Oliver.Baier at lotterien.at (Baier Oliver) Date: Wed Mar 9 07:09:53 2005 Subject: [Vienna-pm] DBI-connect auf RDB Message-ID: <204DB1982528124DAB948D996ECC859A4CED16@EXCHCLU1.office.lottery.co.at> Hi, muss mich remote zu einer RDB-Datenbank (unter VMS laufend) verbinden. Leider liefert mir das DBI-Modul staendig folgende Fehlermeldung: (UNKNOWN OCI STATUS 1804) OCIInitialize. Check ORACLE_HOME and NLS settings etc. obwohl ich ORACLE_HOME, ORACLE_BASE, ORACLE_SID (testweise auch TWO_TASK), LD_LIBRARY_PATH und NLS33 korrekt gesetzt habe (auf der shell mit sqlplus klappt's). Habe dann vermutet, dass RDB nicht von DBI unterstuetzt wird und im cpan auch dbd_rdb-1_16 gefunden. Da aber hier ein make auch scheitert (Unable to locate Driver.xst), bin ich mir gar nicht sicher, ob das so passen sollte. Hat jemand von euch schon mal in perl-scripts Verbindungen zu RDB aufgebaut? lg Oliver ===================================================== Die ?bermittelten Informationen sind nur f?r die Organisation/Person bestimmt, an die sie adressiert sind und k?nnen pers?nliches, vertrauliches oder rechtlich gesch?tztes Material enthalten. Andere Personen als der beabsichtigte Empf?nger dieser E-Mail sind nicht dazu befugt, diese Informationen abzurufen, weiterzuleiten, zu reproduzieren oder auf sonstige andere Weise zu verwenden. F?r den Fall, dass Sie diese Nachricht irrt?mlicherweise erhalten haben, wenden Sie sich bitte an den Absender und l?schen Sie diese. HINWEIS: E-Mail-Verkehr ist nicht sicher und es kann nicht garantiert werden, dass Informationen vollst?ndig, unverf?lscht, etc. beim Empf?nger ankommen. ===================================================== The transmitted information is only meant for the addressed organization/person and may contain personal, confidential or legally protected material. Other persons than the intended addressee are not allowed to retrieve, forward, reproduce or use this information in any manner. If you received this message by mistake, please consult the sender and erase it. NOTICE: E-Mail-traffic may not be safe and it can not be assured that the received information is complete, accurate, etc. From glim at mycybernet.net Sat Mar 19 11:49:00 2005 From: glim at mycybernet.net (glim@mycybernet.net) Date: Sat Mar 19 12:16:30 2005 Subject: [Vienna-pm] Yet Another Perl Conference, North America, 2005 Registration now open Message-ID: ----------> Yet Another Perl Conference, North America, 2005 Registration now open. Conference dates: Monday - Wednesday 27 - 29 June 2005 Location: 89 Chestnut Street http://89chestnut.com/ University of Toronto Toronto, Ontario, Canada Info at: http://yapc.org/America Direct registration: http://donate.perlfoundation.org/index.pl?node=registrant%20info&conference_id=423 Full registration fee $85 (USD) Book now for great deals on accommodations and ensure a space for yourself. Speaking slots are still open. If you would like to present at YAPC::NA 2005, see: http://yapc.org/America/cfp-2005.shtml Details of this announcement: http://yapc.org/America/registration-announcement-2005.txt <---------- More Details ============ Registration for YAPC::NA (Yet Another Perl Conference, North America) 2005 in Toronto, Ontario, Canada is now open. The conference registration price is USD$85. This price includes admission to all aspects of the conference, respectable amounts of catering, several activities and a few conference goodies. The YAPC North America 2005 conference features... * Fantastic speakers + most are the core creators of the technology on which they present + many are professional IT authors, trainers and conference speakers * An excellent learning opportunity * A chance to meet Perl professionals from all over North America and the world + YAPC attendees tend to be very involved in Perl and so are another great way to learn more about what the language has to offer beyond just what the speakers have to say * Extra-curricular / after hours activities * A great location in downtown Toronto All this, and the price is more than an order of magnitude cheaper than what commercial conferences can offer. This is because YAPC is a 100% volunteer effort, both from its organizers and its speakers. Quality is *not* sacrificed to achieve this stunning level of affordability. YAPC provides the best value-for-dollar in IT conferences. And it's a ton of fun, too. The dates of the conference are Monday - Wednesday 27-29 June 2005. The location is 89 Chestnut Street in downtown Toronto, Ontario, Canada. (Note that a different date block was previously announced; we moved the conference date to accommodate venue availability.) http://89chestnut.com/ -- a facility within the University of Toronto If you are at all interested in attending the conference... Book now! Book now! Book now! We have room for about 400 attendees and we hope to sell out well in advance of the late June conference date. However, the critical matter is that of hotels. The YAPC::NA 2005 organizers have made group arrangements with several facilities around the city to provide _excellent_ quality accommodations in _very_ convenient locations at _terrific_ prices for the _full_ capacity of conference attendees (around 400 people). (Finding, booking and paying accommodations is the responsibility of the attendees, but we will provide you with a list of the hotels and university dorms to try first based on our group arrangement with them when you register for the conference. Also, see the web site at http://yapc.org/America/accommodations-2005.shtml. More details will be up shortly. The dorm option will be approx. C$55/night, the hotel options will be more like C$90/night, and for slightly different prices there will be options for putting more than 1 person in a room. Exact details and how to book will be emailed directly to people who have registered for the conference as soon as they become available.) *The catch is -- book now!!* The group reservations will expire in early May, at which point in time the group rates will mostly still apply, but the rooms will be given out on an "availability basis". Which means that someone else outside of the YAPC group can book the rooms as well. Make no mistake -- the rooms *will* be sold. Toronto is a very active conference city in the summer and there will be _no_ guarantee of vacancies either at the facilities we made arrangements with or anywhere else in the city if you leave it to within 6 weeks of the conference date. So, if you want to save yourself the likely-fruitless headache of scrambling around looking for accommodations at the last minute, Book now! Book now! Book now! Have any questions? Email na-help@yapc.org for more details. Additionally, we are still welcoming submissions for proposals via: http://yapc.org/America/cfp-2005.shtml The close of the call-for-papers is April 18, 2005 at 11:59 pm (Toronto time). If you have any questions regarding the call-for-papers or speaking at YAPC::NA 2005 please email na-author@yapc.org We would love to hear from potential sponsors. Please contact the organizers at na-sponsor@yapc.org to learn about the benefits of sponsorship. From spaceman at foo.at Mon Mar 21 09:39:03 2005 From: spaceman at foo.at (Stefan Weiss) Date: Mon Mar 21 09:40:57 2005 Subject: [Vienna-pm] apt und perl Message-ID: <423F06B7.8040508@foo.at> Hi. Kann mir das mal jemand erkl?ren? spaceman@akira: ~ $ apt-cache search perlapi perl-base - The Pathologically Eclectic Rubbish Lister spaceman@akira: ~ $ Unversch?mtheit! ;-) stefan From hjp-vienna-pm-list at hjp.at Mon Mar 21 10:16:15 2005 From: hjp-vienna-pm-list at hjp.at (Peter J. Holzer) Date: Mon Mar 21 10:16:25 2005 Subject: [Vienna-pm] apt und perl In-Reply-To: <423F06B7.8040508@foo.at> References: <423F06B7.8040508@foo.at> Message-ID: <20050321181615.GA18473@teal.hjp.at> On 2005-03-21 18:39:03 +0100, Stefan Weiss wrote: > Kann mir das mal jemand erkl?ren? > > spaceman@akira: ~ $ apt-cache search perlapi > perl-base - The Pathologically Eclectic Rubbish Lister > spaceman@akira: ~ $ > > Unversch?mtheit! Der, der die Bezeichnung gepr?gt hat, darf. ;-) hp -- _ | Peter J. Holzer | Weil wir die materielle Welt nicht so |_|_) | Sysadmin WSR | wahrnehmen, wie sie ist, sind Sachen wie | | | hjp@hjp.at | JPEG, MP3 usw. m?glich. __/ | http://www.hjp.at/ | -- Heiko Schlenker in drsm. -------------- 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/20050321/ff720a3d/attachment.bin From stigliz at gmail.com Tue Mar 22 10:05:15 2005 From: stigliz at gmail.com (Amedeo Guffanti) Date: Tue Mar 22 10:05:24 2005 Subject: [Vienna-pm] Reseach on Open Source Developers Message-ID: Hi, I'm Amedeo Guffanti, a 22 years old Italian student at Bocconi university in Milan, I' m doing a research to write a work about Open Source Movement, in particular, about the developers. I try to collect the opinions of developers like you. My little poll is at this page : http://www.alberocavo.com/OSSprojects.asp It takes less then 4 minutes. I hope the Open Source Communities will give me a help for my research. I apologize for taking your time and for my English that I hope it's understandable ^^ Sincerly, Amedeo Guffanti From maros at k-1.com Wed Mar 30 06:49:35 2005 From: maros at k-1.com (=?iso-8859-2?Q?Maros_Koll=E1r?=) Date: Wed Mar 30 06:49:38 2005 Subject: [Vienna-pm] Fragen zu Threads Message-ID: <200503301448.j2UEmbuk012496@www.k-1.com> Hallo, Ich arbeite mich gerade in das Thema Perl mit Threds ein, jedoch bleiben bei mir nach der Lekt?re der Doku und einiger Tutorials Fragen zum Thema Thread Sicherheit und synchronisation von Daten offen. - Wie wird bei threads::shared mit Referenzen umgegangen? - Ist sowas m?glich? my $arrayref: shared = ['wert1','wert2',{'key' => 'value',}]; - Was genau wird bei einem lock gesperrt? Die Referenz oder die referenzierten Werte oder wird die ganze Datenstruktur gesperrt? lock($arrayref); $arrayref->[0] # ist jetzt auch der Wert gelockt? $arrayref->[2]{'key'} # dieser auch? Wenn ja was passiert mit zirkul?ren Referenzen? - Und ist sowas m?glich? my $arrayref = [ {'key' => 'value',}: shared, {'key' => 'value',}, ]; - Gibt es eine M?glichkeit Variablen die nicht 'shared' gesetzt sind irgendwie zu locken? - Gibt es eine M?glichkeit einen Thread von au?en zu stoppen? Z.b. alle Threads t?ten wenn der Haput Thread stirbt. - Wenn ich mehrere Threads habe und ein SIG (z.b: ein 'INT') ausgel?st wird, an welchen Thread geht es dann? - Wenn ich im Haupt Thead ein $SIG{__DIE__} = \&bla; habe und einen neuen Thread starte, was passiert dann mit einem 'die' im neuen Thread? - Kann ich pro Thread einen eigenen Signalhandler initialiseren? - Folgendes Beispiel: Ein Server mit einem Boss- und mehreren Worker Threads. Der Boss lauscht und startet immer einen neuen Worker wenn ein Request von einem Client kommt. Der Worker arbeitet dann den Request ab und kehrt zur?ck. Pro Connection gibt es ein Objekt. Wie stelle ich nun sicher dass immer nur ein Worker auf eine Objektinstanz zugreifen kann. Da die Objekte nicht 'shared' sind kann ich ja kein Lock anwenden. Vielen Dank Maro? Ps.:Bei einigen Fragen kann ich mir eh ungef?hr denken wie das Ganze funktioniert, aber ich frage zur Sicherheit nach, denn bei Perl weichen Glauben und die Realit?t doch oft voreinander ab ;-) -- e-mail: maros@k-1.com web: http://www.k-1.com pgp key: http://www.k-1.com/pgpkey.txt icq: 12281254 _________________________________ "Denn was du f?r Gesetzlosigkeit h?ltst, ist gerade die Quelle der Kraft und der Freiheit des Volkes" - Pseudo-Xenophon, Athener Verfassung From spaceman at foo.at Wed Mar 30 22:33:12 2005 From: spaceman at foo.at (Stefan Weiss) Date: Wed Mar 30 22:24:10 2005 Subject: [Vienna-pm] Entwickler =?iso-8859-15?q?f=FCr_Perl-Projekt_gesucht?= Message-ID: <424B99A8.9010802@foo.at> Hi. Ich darf heute ein Projektangebot weiterleiten: Wenn jemand Interesse hat, an einem Perlprojekt im DB/Web-Bereich mitzuarbeiten, bitte bei Ren? Pfeiffer melden. Es geht um eine Adressdatenbank, die auf die von verschiedenen Seiten mit unterschiedlichen Sicherheitsanforderungen zugegriffen werden soll. Gute Perlkentnisse und Erfahrung im Umgang mit Datenbanken (soweit ich weiss, ist die DB hier MySQL), CGIs und LDAP w?ren w?nschenswert. lg, Stefan Weiss (der leider im Moment selbst keine Zeit daf?r hat) From gooly at gmx.at Thu Mar 31 03:17:20 2005 From: gooly at gmx.at (Carl A. Schreiber) Date: Thu Mar 31 03:17:29 2005 Subject: [Vienna-pm] javascript Message-ID: <200503311317.20489.gooly@gmx.at> Hallo, ich m?chte versch. HTML-Seiten herunterladen. Diese HTML-Seiten aber schicken etwas anderes, wenn javascript nicht aktiviert ist. Weiss jemand wie ich ersteinmal dem Server ( *.asp-Programme) vormachen kann (in Perl) dass Javascript laufen wuerde? Danke schon einmal, Calli From gooly at gmx.at Thu Mar 31 03:35:55 2005 From: gooly at gmx.at (Carl A. Schreiber) Date: Thu Mar 31 03:36:08 2005 Subject: [Vienna-pm] javascript In-Reply-To: <424BDD38.9030408@uptime.at> References: <200503311317.20489.gooly@gmx.at> <424BDD38.9030408@uptime.at> Message-ID: <200503311335.55949.gooly@gmx.at> Danke David, das hatte ich gefunden, aber ich kann's mir nicht vorstellen wie das gehen soll. Die Seite hole ich mir mir zB mit LWP::Simple: $got = get( $url ); Demnach m??te LWP::Simple dem Server die Antwort geben, dass Java bei mir l?uft! Wenn ich alles erhalten habe (und jetzt javascript ausf?hren wollte..) ist es ja bereits zu sp?t. Calli Am Donnerstag, 31. M?rz 2005 13:21 schrieb David H?hn: > -----BEGIN PGP SIGNED MESSAGE----- > Hash: RIPEMD160 > > Carl A. Schreiber wrote: > | Hallo, > | > | ich m?chte versch. HTML-Seiten herunterladen. > | Diese HTML-Seiten aber schicken etwas anderes, wenn javascript nicht > > aktiviert > > | ist. Weiss jemand wie ich ersteinmal dem Server ( *.asp-Programme) > > vormachen > > | kann (in Perl) dass Javascript laufen wuerde? > > http://cpan.uwinnipeg.ca/dist/JavaScript > > - -d > > > - -- > nee anata wo mitsukete soshite nidoto wasurezu > ~ donna ni munega itakutemo soba ni iru no > ~ zutto...zutto...zutto > Key fingerprint = FD77 F0B7 5C65 F546 EB08 A4EC 3CCA 1A32 7E24 291E > -----BEGIN PGP SIGNATURE----- > Version: GnuPG v1.4.0 (Darwin) > > iD8DBQFCS904PMoaMn4kKR4RA3G7AJsH07THUXWBtNUBgxU0BChxfaq4IACcCV/d > TJF3GzJtR2i2va2QjEwd81o= > =+JOB > -----END PGP SIGNATURE----- From mjy at geizhals.at Thu Mar 31 04:34:09 2005 From: mjy at geizhals.at (Marinos Yannikos) Date: Thu Mar 31 04:34:24 2005 Subject: [Vienna-pm] javascript In-Reply-To: <200503311317.20489.gooly@gmx.at> References: <200503311317.20489.gooly@gmx.at> Message-ID: <424BEE41.4000200@geizhals.at> Carl A. Schreiber wrote: > ich m?chte versch. HTML-Seiten herunterladen. > Diese HTML-Seiten aber schicken etwas anderes, wenn javascript nicht aktiviert > ist. Weiss jemand wie ich ersteinmal dem Server ( *.asp-Programme) vormachen > kann (in Perl) dass Javascript laufen wuerde? Ich bezweifle ja stark, da? auf solcherart gebauten Seiten sinnvoller Content zu finden ist, aber: oft wird so eine Sperre mit Hilfe von Javascript-Cookies gel?st. Einfach dem Server vorzumachen, da? JavaScript l?uft, hilft dann nicht - du mu?t das JavaScript auch ausf?hren oder durch Anschauen herausfinden, welcher Cookie wie gesetzt sein mu?, da? der Server dir auch das Gew?nschte liefert... MFG, -mjy From gooly at gmx.at Thu Mar 31 04:41:51 2005 From: gooly at gmx.at (Carl A. Schreiber) Date: Thu Mar 31 04:42:00 2005 Subject: [Vienna-pm] javascript In-Reply-To: <424BEE41.4000200@geizhals.at> References: <200503311317.20489.gooly@gmx.at> <424BEE41.4000200@geizhals.at> Message-ID: <200503311441.51126.gooly@gmx.at> Naja, Cookies sind recht einfach zu 'enablen': LWP::Simple::Cookies aber das war's nicht. Calli Am Donnerstag, 31. M?rz 2005 14:34 schrieb Marinos Yannikos: > Carl A. Schreiber wrote: > > ich m?chte versch. HTML-Seiten herunterladen. > > Diese HTML-Seiten aber schicken etwas anderes, wenn javascript nicht > > aktiviert ist. Weiss jemand wie ich ersteinmal dem Server ( > > *.asp-Programme) vormachen kann (in Perl) dass Javascript laufen wuerde? > > Ich bezweifle ja stark, da? auf solcherart gebauten Seiten sinnvoller > Content zu finden ist, aber: oft wird so eine Sperre mit Hilfe von > Javascript-Cookies gel?st. Einfach dem Server vorzumachen, da? > JavaScript l?uft, hilft dann nicht - du mu?t das JavaScript auch > ausf?hren oder durch Anschauen herausfinden, welcher Cookie wie gesetzt > sein mu?, da? der Server dir auch das Gew?nschte liefert... > > MFG, > -mjy From mjy at geizhals.at Thu Mar 31 04:46:17 2005 From: mjy at geizhals.at (Marinos Yannikos) Date: Thu Mar 31 04:46:32 2005 Subject: [Vienna-pm] javascript In-Reply-To: <200503311441.51126.gooly@gmx.at> References: <200503311317.20489.gooly@gmx.at> <424BEE41.4000200@geizhals.at> <200503311441.51126.gooly@gmx.at> Message-ID: <424BF119.1000305@geizhals.at> Carl A. Schreiber wrote: > Naja, > > Cookies sind recht einfach zu 'enablen': > LWP::Simple::Cookies > aber das war's nicht. > Am Donnerstag, 31. M?rz 2005 14:34 schrieb Marinos Yannikos: > >>Javascript-Cookies gel?st. Einfach dem Server vorzumachen, da? Javascript-Cookies: Cookies, die mittels Javascript gesetzt werden. http://webreference.com/js/column8/property.html Wenn man den Javascript-Code nicht ausf?hrt, werden sie nicht gesetzt und beim n?chsten Zugriff auch nicht an den Server geschickt. Da hilft es nicht, diese einfach ?ber LWP zu aktivieren. -mjy From gooly at gmx.at Thu Mar 31 08:57:28 2005 From: gooly at gmx.at (Carl A. Schreiber) Date: Thu Mar 31 08:57:42 2005 Subject: AW: [Vienna-pm] javascript In-Reply-To: References: Message-ID: <200503311857.28230.gooly@gmx.at> Hmm, ack, und was w?rdest Du emp?fehlen sollte man hier einetrage: my $ua = LWP::UserAgent->new; $ua->agent('Mozilla/5.0'); # so? Am Donnerstag, 31. M?rz 2005 17:45 schrieb Lammel Roland: > Vielleicht hilfts... > > den korrekten User-Agent pr?fen und auf jeden Fall einen mitschicken (nicht > den den LWP bei default nimmt). > > Meistens unterscheiden die Server anhand das User-Agents welcher Content > geschickt wird. Und besonders bei Sites, die auch Mobile Devices > unterst?tzen, wird auf einen anderen (kompakteren) Content umgeschalten. > > Cheers > > +rl > > -----Urspr?ngliche Nachricht----- > Von: vienna-pm-bounces@pm.org [mailto:vienna-pm-bounces@pm.org] Im Auftrag > von Carl A. Schreiber Gesendet: Donnerstag, 31. M?rz 2005 14:42 > An: vienna-pm@mail.pm.org > Betreff: Re: [Vienna-pm] javascript > > Naja, > > Cookies sind recht einfach zu 'enablen': > LWP::Simple::Cookies > aber das war's nicht. > Calli > > Am Donnerstag, 31. M?rz 2005 14:34 schrieb Marinos Yannikos: > > Carl A. Schreiber wrote: > > > ich m?chte versch. HTML-Seiten herunterladen. > > > Diese HTML-Seiten aber schicken etwas anderes, wenn javascript nicht > > > aktiviert ist. Weiss jemand wie ich ersteinmal dem Server ( > > > *.asp-Programme) vormachen kann (in Perl) dass Javascript laufen > > > wuerde? > > > > Ich bezweifle ja stark, da? auf solcherart gebauten Seiten sinnvoller > > Content zu finden ist, aber: oft wird so eine Sperre mit Hilfe von > > Javascript-Cookies gel?st. Einfach dem Server vorzumachen, da? > > JavaScript l?uft, hilft dann nicht - du mu?t das JavaScript auch > > ausf?hren oder durch Anschauen herausfinden, welcher Cookie wie gesetzt > > sein mu?, da? der Server dir auch das Gew?nschte liefert... > > > > MFG, > > -mjy > > _______________________________________________ > Vienna-pm mailing list > Vienna-pm@pm.org > http://mail.pm.org/mailman/listinfo/vienna-pm From kh at dartbase.com Thu Mar 31 12:56:03 2005 From: kh at dartbase.com (Karlheinz Zoechling) Date: Thu Mar 31 12:52:33 2005 Subject: [Vienna-pm] javascript In-Reply-To: <200503311317.20489.gooly@gmx.at> Message-ID: <20050331205220.JWPX7053.viefep14-int.chello.at@xxx-xlhpeyhmjii> hi, vielleicht findest du was brauchbares in WWW::Mechanize::* http://search.cpan.org/~petdance/WWW-Mechanize-1.12/lib/WWW/Mechanize.pm bzw. falls win32 eine option ist in Win32::IE::Mechanize http://search.cpan.org/~abeltje/Win32-IE-Mechanize-0.008/lib/Win32/IE/Mechanize.pm lg kh On Thu, 31 Mar 2005 13:17:20 +0200, Carl A. Schreiber wrote: >Hallo, > >ich m?chte versch. HTML-Seiten herunterladen. >Diese HTML-Seiten aber schicken etwas anderes, wenn javascript nicht aktiviert >ist. Weiss jemand wie ich ersteinmal dem Server ( *.asp-Programme) vormachen >kann (in Perl) dass Javascript laufen wuerde? > >Danke schon einmal, >Calli >_______________________________________________ >Vienna-pm mailing list >Vienna-pm@pm.org >http://mail.pm.org/mailman/listinfo/vienna-pm >