From largest at largest.org Tue Sep 4 21:16:28 2001 From: largest at largest.org (Joel Grow) Date: Wed Aug 4 00:08:16 2004 Subject: SPUG: UW Perl Class Message-ID: Hi, I'm writing again to put in a brief, final plug for the upcoming UW Perl certificate classes and let you know there will be a free information meeting this Thursday Septermber 6 from noon-1 PM at the downtown Seattle UW Extension location (1325 4th Ave, suite 400). This 3-course program meets once/week, with 10 sessions per course. This year the program is offered both in the new UW laptop computer lab at the aforementioned downtown Seattle location starting October 1 (the courses run fall/winter/spring), and at the Bellevue location starting January 9 (winter/spring/summer). The 3 courses are Beginning Perl, Advanced/OO Perl, and Perl and the WWW. We start at the beginning (a very good place to start) and go in-depth on many Perl topics, including data types, regular expressions, I/O, complex data structures, object oriented Perl, database access, CGI programming, and lots more. More information is available at http://www.outreach.washington.edu/extinfo/certprog/per/per_main.asp Email me if you'd like references from students from previous year's classes, or with any questions. thanks! Joel __END__ - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From joshlanza at hotmail.com Wed Sep 5 11:43:30 2001 From: joshlanza at hotmail.com (Joshua Lanza) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: Source for HTML::Parser In-Reply-To: Message-ID: <000501c13629$e52faaf0$0d01a8c0@vorsite.local> Hi, I wanted to take a look at the source for HTML::Parser and tried http://www.cpan.org/modules/00modlist.long.html#ID15_WorldWideW -- it looks like the links to the modules aren't working. Is this part of CPAN usually up? I clicked on a link to http://search.cpan.org/search?module=HTML::Parser and got an internal server error. Does anyone suggest an alternate place to look for module source code? Thanks, Josh - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From tleffler at u.washington.edu Wed Sep 5 13:15:21 2001 From: tleffler at u.washington.edu (Trevor Leffler) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: Source for HTML::Parser References: <000501c13629$e52faaf0$0d01a8c0@vorsite.local> Message-ID: <3B966BB9.3C802187@u.washington.edu> Josh, All those other links on cpan.org will work for you, esp. under the "Browsing" category. Here's one of a few URLs that will work for getting the source: http://www.cpan.org/authors/id/G/GA/GAAS/ -- Trevor Leffler, Software Developer PETTT / Ed-Tech Development Group University of Washington (206) 616-3406 / OUGL 230, Box 353080 Joshua Lanza wrote: > > Hi, > > I wanted to take a look at the source for HTML::Parser and tried > http://www.cpan.org/modules/00modlist.long.html#ID15_WorldWideW -- it > looks like the links to the modules aren't working. Is this part of CPAN > usually up? I clicked on a link to > http://search.cpan.org/search?module=HTML::Parser and got an internal > server error. > > Does anyone suggest an alternate place to look for module source code? > > Thanks, Josh > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org > Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL > Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address > For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest > Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From jay at Scherrer.com Thu Sep 6 09:28:18 2001 From: jay at Scherrer.com (Jay Scherrer) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: Source for HTML::Parser References: <000501c13629$e52faaf0$0d01a8c0@vorsite.local> Message-ID: <3B978801.80FEBE76@scherrer.com> Your right, I tried going to www.Perl.com. First I got my cached version of thier web, then after using thier search all I get is a blank page except for banners. Jay Joshua Lanza wrote: > Hi, > > I wanted to take a look at the source for HTML::Parser and tried > http://www.cpan.org/modules/00modlist.long.html#ID15_WorldWideW -- it > looks like the links to the modules aren't working. Is this part of CPAN > usually up? I clicked on a link to > http://search.cpan.org/search?module=HTML::Parser and got an internal > server error. > > Does anyone suggest an alternate place to look for module source code? > > Thanks, Josh > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org > Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL > Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address > For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest > Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From Showell30 at aol.com Thu Sep 6 10:44:31 2001 From: Showell30 at aol.com (Showell30@aol.com) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: need recommendation on local ISP Message-ID: <8c.c421252.28c8f3df@aol.com> I know this issue comes up way too often on this mailing list, but once again, can folks please send out recommendations on local ISPs? I would be connecting with a 56k modem. I run Win98 now, but I intend to get Linux or FreeBSD installed one of these days. Thoughts on good email clients are welcome. I saw an ad for www.oo.net, and everything on their site seems reasonable. Does anyone use them? Thanks, Steve Howell P.S. Any Linux/FreeBSD advocates are welcome to send me recommendations too. My box is an HP Pavilion, and I also need to use my backpack cd-rewriter. I find myself running more and more Unix software on my Win98 box, so it's really getting absurd to put up with the win98 nuisances. I am going to miss my editor, EditPlus, though. Are there any incompatibilities between CD formats in the OSes? -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/archives/spug-list/attachments/20010906/c6171672/attachment.htm From leary at nwlink.com Thu Sep 6 12:21:18 2001 From: leary at nwlink.com (Michael Leary) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: need recommendation on local ISP In-Reply-To: <8c.c421252.28c8f3df@aol.com>; from Showell30@aol.com on Thu, Sep 06, 2001 at 11:44:31AM -0400 References: <8c.c421252.28c8f3df@aol.com> Message-ID: <20010906102118.B1190@ip178.usw22.rb1.bel.nwlink.com> This came up very recently on the Seattle Linux List. I can send you a mailfile on it if you like. On Thu, Sep 06, 2001 at 11:44:31AM -0400, Showell30@aol.com wrote: > I know this issue comes up way too often on this mailing list, but once > again, can folks please send out recommendations on local ISPs? > > I would be connecting with a 56k modem. I run Win98 now, but I intend to get > Linux or FreeBSD installed one of these days. Thoughts on good email clients > are welcome. > > I saw an ad for www.oo.net, and everything on their site seems reasonable. > Does anyone use them? > > Thanks, > > Steve Howell > > P.S. Any Linux/FreeBSD advocates are welcome to send me recommendations too. > My box is an HP Pavilion, and I also need to use my backpack cd-rewriter. I > find myself running more and more Unix software on my Win98 box, so it's > really getting absurd to put up with the win98 nuisances. I am going to miss > my editor, EditPlus, though. Are there any incompatibilities between CD > formats in the OSes? > -- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From john.brittingham at attws.com Thu Sep 6 13:16:27 2001 From: john.brittingham at attws.com (Brittingham, John) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: & causing problems with Parser.pm Message-ID: <23F6FCBAA611D511A74A00508BCFBE40025E1ECD@WA-MSG06> Help.. When I try to process an XML file using XML::Twig that has an "&" anywhere in it I get this message. undefined entity at line 23, column 79, byte 1331 at /usr/lib/perl5/site_perl/5.6.0/i386-linux/XML/Parser.pm line 185 One of the affending XML lines is "
  • Equipment issues log". The error is happening here "my $s_name = $module->first_child( 'FIX'); # get the elements $subproc_xml = $s_name->child($n, 'SUBPROC')->sprint || print "FIX not Found\n"; # get their text" What can I do to fix this? -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/archives/spug-list/attachments/20010906/10693f2f/attachment.htm From Richard.Anderson at raycosoft.com Thu Sep 6 14:07:29 2001 From: Richard.Anderson at raycosoft.com (Richard Anderson) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: Re: need recommendation on local ISP References: <8c.c421252.28c8f3df@aol.com> Message-ID: <005f01c13707$2e0e1c60$3988ddd1@aciwin> I and several other SPUGers use Zipcon (www.zipcon.net ) and I can recommend them highly. The owner/manager, Daniel, is highly knowledgeable about Linux, Apache, Perl and security issues. I can send him an e-mail requesting that he install a CPAN module at 7 p.m. and two hours later get a reply that it's done. He offers telnet access to a Linux server, 20 MB of storage with the base package, DSL support and reasonable prices for business-related services (unlike other ISPs, that charge excessive "what-the-market-will-bear" rates for domain name hosting and other business services). I had no trouble setting dial-up connections from Windows NT and Caldera Linux. I recommend Outlook Express and Pine as e-mail clients. Dan has Pine installed on his Linux telnet server, so it is easy to read your mail while travelling. I would happily pay Zipcon double for the service I am getting (but please don't tell Dan!). Richard Anderson, Ph.D www.raycosoft.com Richard.Anderson@raycosoft.com Seattle, WA ----- Original Message ----- From: To: Sent: Thursday, September 06, 2001 8:44 AM Subject: SPUG: need recommendation on local ISP > I know this issue comes up way too often on this mailing list, but once > again, can folks please send out recommendations on local ISPs? > > I would be connecting with a 56k modem. I run Win98 now, but I intend to get > Linux or FreeBSD installed one of these days. Thoughts on good email clients > are welcome. > > I saw an ad for www.oo.net, and everything on their site seems reasonable. > Does anyone use them? > > Thanks, > > Steve Howell > > P.S. Any Linux/FreeBSD advocates are welcome to send me recommendations too. > My box is an HP Pavilion, and I also need to use my backpack cd-rewriter. I > find myself running more and more Unix software on my Win98 box, so it's > really getting absurd to put up with the win98 nuisances. I am going to miss > my editor, EditPlus, though. Are there any incompatibilities between CD > formats in the OSes? > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From christopher at cavnor.com Thu Sep 6 08:54:55 2001 From: christopher at cavnor.com (Christopher Cavnor) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: & causing problems with Parser.pm Message-ID: <200109061354.f86Dso707680@localhost.localdomain> Try encoding the incoming text as so: my $offensive_lang = "this & that"; HTML::Entities::encode_entities($offensive_lang); print $offensive_lang; #yields: "this & that" XML chokes on certain entities (&,<,>) - best to replace them in unqualified input. Cheers; Chris The following message was sent by "Brittingham, John" on Thu, 6 Sep 2001 11:16:27 -0700 . > Help.. > > When I try to process an XML file using XML::Twig that has an "&" anywhere > in it I get this message. > > undefined entity at line 23, column 79, byte 1331 at > /usr/lib/perl5/site_perl/5.6.0/i386-linux/XML/Parser.pm line 185 > > One of the affending XML lines is "
  • HREF="http://knowissue.entp.attws.com:6668/servlet/IsuEngine?view=detail&id; > =2815">Equipment issues log". > > The error is happening here "my $s_name = $module->first_child( > 'FIX'); # get the elements > $subproc_xml = > $s_name->child($n, 'SUBPROC')->sprint || print "FIX not Found\n"; # get > their text" > > What can I do to fix this? > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From asa.martin at attws.com Thu Sep 6 18:55:43 2001 From: asa.martin at attws.com (Martin, Asa) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: Net::Telnet Message-ID: <67FC0E2A32D0D31194500008C7CF2E6F05528DC8@wa-msg09.entp.attws.com> Hi, I have a question that pertains to Net::Telnet, but it is really a general object oriented question. When I create a new Net::Telnet object, I store the result in a variable (i.e. my $t = Net::Telnet->new('myhost.com'); I want to put the creation of the object in a subroutine and have the subroutine return the $t object. Then pass that object to other subroutines to do other things to it. Here's an example: sub new_object { my ($host,$timeout,$pass,$priv) = @_; my $t = Net::Telnet->new(Host=>$host, Timeout=>$timeout); # do some $t->prints and $t->waitfors, etc... return $t; } sub change_pass { my ($t,$newpass,$newpriv) = @_; # use the $t object and $newpass and $newpriv to do more $t->prints and $t->waitfors.. } # and it is called like this in the main section: my $t = new_object('host', 10, 'password', 'secret'); change_pass($t,'newpassword','verysecret'); This doesn't work. It says: "Can't call method 'print' without a package or object reference." And the line number is the first $t->print line in the change_pass subroutine. Is this possible? Does this make sense? Thanks, Asa Martin -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/archives/spug-list/attachments/20010906/9368c833/attachment.htm From bjturner at mac.com Thu Sep 6 19:28:28 2001 From: bjturner at mac.com (Benjamin John Turner) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: Net::Telnet In-Reply-To: <67FC0E2A32D0D31194500008C7CF2E6F05528DC8@wa-msg09.entp.attws.com> References: <67FC0E2A32D0D31194500008C7CF2E6F05528DC8@wa-msg09.entp.attws.com> Message-ID: At 4:55 PM -0700 9/6/2001, Martin, Asa wrote: >I have a question that pertains to Net::Telnet, but it is really a >general object oriented question. When I create a new Net::Telnet >object, I store the result in a variable (i.e. my $t = >Net::Telnet->new('myhost.com'); > >I want to put the creation of the object in a subroutine and have >the subroutine return the $t object. Then pass that object to other >subroutines to do other things to it. It sounds like what you really want to do is subclass Net::Telnet. That way you could say things like: my $t = new Net::Telnet::Subclass( 'host', 10, 'password', 'secret' ); $t->change_password( 'newpassword','verysecret '); # etc., etc. That would be the object-oriented way to do things, anyway. It might also help you find your bug, since it's highly likely that you'd trigger an error earlier and closer in the code to the actual problem. >This doesn't work. It says: "Can't call method 'print' without a >package or object reference." And the line number is the first >$t->print line in the change_pass subroutine. > >Is this possible? Does this make sense? It should work as you described it, which probably means there's a bug in your code. I'd walk through this code in the perl debugger and make sure that you are getting a object back from your call to Net::Telnet and that that object is being correctly passed along to the other functions you've defined. Benjamin Turner -- Benjamin John Turner | bjturner@bigfoot.com http://www.usfca.edu/turner/ | bjturner@whowhere.com "The happiest of people don't necessarily have the best of everything; they just make the most of everything that comes along their way." - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From cmeyer at helvella.org Thu Sep 6 20:07:23 2001 From: cmeyer at helvella.org (Colin Meyer) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: Re: need recommendation on local ISP In-Reply-To: <005f01c13707$2e0e1c60$3988ddd1@aciwin> References: <8c.c421252.28c8f3df@aol.com> <005f01c13707$2e0e1c60$3988ddd1@aciwin> Message-ID: <20010906180723.B11792@hobart.helvella.org> I'll second everything that Richard has said. Zipcon has been my isp for more than four years, and I have no complaints. Dan respects his customers with conscientious business practices, such as not taking on new dial in customers until sufficient phone lines have been installed to handle the load, and giving refunds when dialup access was unavailable due to screw-ups by the phone company. He also donates the webspace for SPUG's homepage: http://zipcon.net/spug Have fun, -C. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From warner at oz.net Thu Sep 6 20:09:30 2001 From: warner at oz.net (Marion Scott Warner) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: ISP not to use Message-ID: <3B981E4A.72BCC6D2@oz.net> Well, I am with oz.net which was OK until some Company called TheRiver took over. My monthly bill has doubled since. I'm now being charged for 4 static IP addresses. When it was just oz.net there was a one time set up fee for a block of static addresses. I now pay 25 per month for the 4 in addition to the normal 25 per month charge + QWEST DSL line. I hate to change my email after so many years, but? Thanks for the info on Zipcon. Scott W. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From jason at strangelight.com Fri Sep 7 13:25:07 2001 From: jason at strangelight.com (Jason Lamport) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: Net::Telnet In-Reply-To: References: <67FC0E2A32D0D31194500008C7CF2E6F05528DC8@wa-msg09.entp.attws.com> Message-ID: At 5:28 PM -0700 9/6/01, Benjamin John Turner wrote: > > >>This doesn't work. It says: "Can't call method 'print' without a >>package or object reference." And the line number is the first >>$t->print line in the change_pass subroutine. >> >>Is this possible? Does this make sense? > > It should work as you described it, which probably means >there's a bug in your code. I'd walk through this code in the perl >debugger and make sure that you are getting a object back from your >call to Net::Telnet and that that object is being correctly passed >along to the other functions you've defined. Or, if you're like me and hate using the Perl debugger, you could insert a debugging line like this at strategic places in your code (such as just before/after each subroutine call using $t, just before the return $t statement, etc.): print( "\$t == $t (". ref( $t ) . ") at line __WHATEVER__\n"); It sounds like somewhere or other you're losing your reference to the object, at which point $t no longer contains what you think it does. -jason - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From john.brittingham at attws.com Fri Sep 7 13:33:15 2001 From: john.brittingham at attws.com (Brittingham, John) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: RegEx Message-ID: <23F6FCBAA611D511A74A00508BCFBE40025E1ED7@WA-MSG06> I am trying to replace a white space that lies between an number and a capital letter without changing either the number or the letter. I can't find any examples on this.. Can anyone tell me how to do this? example: 6-2 Dual Mode Selection...... separating out Dual Mode Selection from 6-2 Thanks jb -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/archives/spug-list/attachments/20010907/22be2dc1/attachment.htm From cmeyer at helvella.org Fri Sep 7 14:31:14 2001 From: cmeyer at helvella.org (cmeyer@helvella.org) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: RegEx In-Reply-To: <23F6FCBAA611D511A74A00508BCFBE40025E1ED7@WA-MSG06> Message-ID: <20010907193114.A60DF7065@hobart.helvella.org> At Fri, 7 Sep 2001 11:33:15 -0700 , "Brittingham, John" wrote: > >I am trying to replace a white space that lies between an number and a >capital letter without changing either the number or the letter. I can't >find any examples on this.. Can anyone tell me how to do this? > >example: >6-2 Dual Mode Selection...... separating out Dual Mode Selection from 6-2 You might try something like: $string =~ s/([0-9])\s+([A-Z])/$1$2/; Parenthesis within a regex capture text that the containing subexpression matches. These can be used withing the replacement string, accessed as $1 $2 ... $n, with n being which parenthetical pare, counted in the order that the opening parenthesis occur. Have fun, -C. > >Thanks jb > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From Ryan.Parr at wwireless.com Fri Sep 7 14:39:17 2001 From: Ryan.Parr at wwireless.com (Parr, Ryan) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: RegEx Message-ID: <6D6F0541E2B1D411A75B0002A513016D0280007A@wacorpml03.wwireless.com> $var = '6-2 Dual Mode Selection'; my($chapter,$title) = $var =~ m/(\d+-\d+)\s+([\w\s]+)$/ will capture the info... I'm sure there's (another|better) way to do it though, as this requires definate markers of data all on the same line. -- Ryan -----Original Message----- From: Brittingham, John [mailto:john.brittingham@attws.com] Sent: Friday, September 07, 2001 11:33 AM To: spug-list@pm.org Subject: SPUG: RegEx I am trying to replace a white space that lies between an number and a capital letter without changing either the number or the letter. I can't find any examples on this.. Can anyone tell me how to do this? example: 6-2 Dual Mode Selection...... separating out Dual Mode Selection from 6-2 Thanks jb -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/archives/spug-list/attachments/20010907/72fd6281/attachment.htm From mathin at mathin.com Fri Sep 7 14:44:42 2001 From: mathin at mathin.com (Dan Ebert) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: RegEx In-Reply-To: <23F6FCBAA611D511A74A00508BCFBE40025E1ED7@WA-MSG06> Message-ID: Would something like this do the trick? #!/usr/bin/perl use strict; my $string = '6-2 Dual Mode Selection'; print $string,"\n"; $string =~ s/(\d)\s+([A-Z])/$1replacement$2/g; print $string,"\n"; ----------------------------------------------------- Lewis's Law of Travel: The first piece of luggage out of the chute doesn't belong to anyone, ever. ----------------------------------------------------- On Fri, 7 Sep 2001, Brittingham, John wrote: > > I am trying to replace a white space that lies between an number and a > capital letter without changing either the number or the letter. I can't > find any examples on this.. Can anyone tell me how to do this? > > example: > 6-2 Dual Mode Selection...... separating out Dual Mode Selection from 6-2 > > Thanks jb > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From dcd at tc.fluke.com Fri Sep 7 14:54:30 2001 From: dcd at tc.fluke.com (David Dyck) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: Net::Telnet In-Reply-To: Message-ID: On Fri, 7 Sep 2001, Jason Lamport wrote: > print( "\$t == $t (". ref( $t ) . ") at line __WHATEVER__\n"); Perl can insert the correct line number when you use __LINE__ print( "\$t == $t (". ref( $t ) . ") at ".__FILE__." line ".__LINE__."\n"); see perldata.pod The special literals __FILE__, __LINE__, and __PACKAGE__ represent the current filename, line number, and package name at that point in your program. They may be used only as separate tokens; they will not be interpolated into strings. If there is no current package (due to an empty C directive), __PACKAGE__ is the undefined value. or if you don't mind your debug data to going to STDERR try warn( "\$t == $t (". ref( $t ) . ") ); and perl will add the file name and You may also want to look at the Carp module. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From james at banshee.com Fri Sep 7 15:28:26 2001 From: james at banshee.com (James Moore) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: RegEx References: <23F6FCBAA611D511A74A00508BCFBE40025E1ED7@WA-MSG06> Message-ID: <3B992DEA.7000203@banshee.com> You may be interested in "Mastering Regular Expressions" by Jeffrey Friedl, published by O'Reilly. Handy book. - James Moore - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From aaron at activox.com Fri Sep 7 15:55:41 2001 From: aaron at activox.com (Aaron Salo) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: RegEx In-Reply-To: <3B992DEA.7000203@banshee.com> References: <23F6FCBAA611D511A74A00508BCFBE40025E1ED7@WA-MSG06> Message-ID: <3.0.5.32.20010907135541.028324a0@pop3.norton.antivirus> Indeed. Nice 'valid e-mail address syntax' regex on the very last page, as I recall. ~!a At 01:28 PM 9/7/01 -0700, James Moore wrote: >You may be interested in "Mastering Regular Expressions" by Jeffrey >Friedl, published by O'Reilly. Handy book. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From jason at strangelight.com Fri Sep 7 16:18:02 2001 From: jason at strangelight.com (Jason Lamport) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: debugging (was: Net::Telnet) In-Reply-To: References: Message-ID: At 12:54 PM -0700 9/7/01, David Dyck wrote: >On Fri, 7 Sep 2001, Jason Lamport wrote: > >> print( "\$t == $t (". ref( $t ) . ") at line __WHATEVER__\n"); > >Perl can insert the correct line number when you use __LINE__ > print( "\$t == $t (". ref( $t ) . ") at ".__FILE__." line ".__LINE__."\n"); > >see perldata.pod > The special literals __FILE__, __LINE__, and __PACKAGE__ > represent the current filename, line number, and package name at that > point in your program. They may be used only as separate tokens; they > will not be interpolated into strings. If there is no current package > (due to an empty C directive), __PACKAGE__ is the undefined > value. Thanks. I knew there was something like that available, but was feeling too lazy to look it up. Personally, I use a separate function for debugging, which uses caller() to do a partial stack trace. Generally, in any program of any complexity, I'll define a subroutine something like this: sub debug { ... # pretty-print @_, caller(), caller(1), caller(2), etc. } And then I can insert debugging probes like this: debug( $whatever, $variables, $I, $want ); This also makes it very easy to remove the probes later, since I can just do a text search for "debug". I find this approach -- inserting probes directly into the code -- far more useful than using an interactive debugger, for several reasons: * The debugger tends to force you into doing a linear search for bugs, whereas with probes it's easier to do a binary (or N-ary) search for the problem. * The debugger can only be run from the shell, which can be problematic for scripts (such as CGI scripts) that don't expect to be run from the shell. Probes generally work in any environment. (The debug routine may need to be modified to print to something other than STDOUT -- a log file for example -- but that's usually trivial.) * Besides, back when *I* was learning to code, we didn't have these fancy new-fangled interactive debuggers and compiler type-checking and what-not. By golly, we had to find our *own* bugs! We also had to code everything in octal. Uphill. Both ways. In the snow. And we *liked* it... Anyway... that's my $0.02 on debugging. Hope it's helpful to someone. -jason P.S. I was joking about coding in octal. I'm not *that* old! ;) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From rvjeep at rvjeep.co.kr Tue Sep 11 03:01:37 2001 From: rvjeep at rvjeep.co.kr (=?ks_c_5601-1987?B?x9HDpL/B?=) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: =?ks_c_5601-1987?B?W7GksO1dIHNwdWctbGlzdLTUIL7Is+fHz73KtM+x7j8=?= Message-ID: <200109110758.f8B7wCw04585@gocho.pm.org> 9? ??? ') i++; if (i ') i++; } dest += src.substring(mark, i); if (i >= src.length) break; dest += ''; mark = i; while (i '; wordi++; } el.innerHTML = dest; el.posLeft = 0; el.style.visibility = 'visible'; list[index] = namosw_new_animation_object(el.name+'word1', el.startCondObj, el.startCondTime, el.startXPos, el.startYPos, el.pathType, false, el.zoom, el.stepNum); for (i = 1; i 0) { el.countDown = (0 0 ? -1:1)); cosv = Math.cos(Math.PI*el.step/el.stepNum); newx = ((cosv*(el.sx-x) - sinv*(el.sy-y) + x) + linex) / 2; newy = ((sinv*(el.sx-x) + cosv*(el.sy-y) + y) + liney) / 2; } else if (el.pathType == 'spiral') { sinv = Math.sin(2*Math.PI*el.step/el.stepNum); cosv = Math.cos(2*Math.PI*el.step/el.stepNum); r = (el.stepNum-el.step)/el.stepNum; newx = el.ex + (cosv*(el.sx-el.ex) - sinv*(el.sy-el.ey))*r; newy = el.ey + (sinv*(el.sx-el.ex) + cosv*(el.sy-el.ey))*r; } if (el.style) { if (el.zoom == 'zoomin') el.style.fontSize = 50+50*el.step/el.stepNum + '%'; else if (el.zoom == 'zoomout') el.style.fontSize = 200-100*el.step/el.stepNum + '%'; } namosw_set_pos(el, newx, newy); namosw_set_visible(el, true); if (el.step++ == el.stepNum) { namosw_set_pos(el, el.ex, el.ey); el.step = 0; el.countDown = -1; // trigger other object(self can be trigger) for (var j = 0; j 0) window.setTimeout("namosw_animate();", 10);}function namosw_init_animation(){ var i = 0; var list = new Array; list[i++] = namosw_new_animation_object('alayer1', null, 0, 'right', 'bottom', 'spiral', false, null, 70); document.NamoAnimationObjects = list; var length = list.length; for (i = 0; i ??? ??? ?? ????? ????? ?? ???. document.write(month + "?"); document.write( myweekday + "?" + day); ????? ???? | ??????? | ?? ???? | ??????? ???? ?? ?? ?????? ????????? ?? ??? ???? ????? ?? ??? ????? ???? ???????. ????? JEEPRV?? 1,000??? ??? ???????. ?? ?? ?????? ???? ?? ? ???? ?.? ?? ??? ? ??? ???????. ??? ?????? ???? ??? ???? ??? ?? ?? ????? ??? ????? ?? ?????. ????? ?? ??? ????? ??? ??? ??? ??? ??? ?????. ?? ????? ?????? ???????? ??? ????? ?? ?? ?? ????? ????. ?? ?????? ?? ????? ??? ?? ??? ????. 1. ???? ???? 10% ?? ??? ?? 2. ????? ???? ??? ??? ?? 3. ???? ??? 10~20% ?? 4. ??? ???? ?????? ?? ???? ??? ??? 20,000?? ????~! ??? ??? 20,000?? ????~! ??? [??RV????]? ???? ?? ??? ?? ?? ? ? [?? ??]? ?? ??? ??? ?? ? ?? ?? ? ?? ?? ???? ???? ??? ??? ?~?~??????. ???? ???? ???? ???? ??? ???? ???? ???? (?????) ??? ???? ??? ???? ???? ??? ????, ??, (?? ??) ???, ??, ???,????? ??? ???? ??? ???? ???(EGR)???? ??? ??? ???? ??? ???? ????? ???? | ??????? | ?? ???? | ??????? ? ???? ???????. ????? ?? ??? ??? ?? ?? ??? ???? ?? ????? ?????? ???? ??? ????? ???? ??????. Copyright 2001 by ??????. All right reserved. Tel. 031-962-7651 -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/archives/spug-list/attachments/20010911/16e62060/attachment.htm From asim_jalis at hp.com Tue Sep 11 11:50:37 2001 From: asim_jalis at hp.com (JALIS,ASIM (HP-FtCollins,ex1)) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: XP Talk (Thu Sept 13) Automated Testing Using File System Mock Ob jects Message-ID: The next XP Group meeting is this Thursday, September 13. Here are the details. EXTREME PROGRAMMING MEETING TOPIC Lance Kind (Hewlett-Packard) will talk about concrete applications of the mock object pattern and how to use this pattern. Here is his description: This talk is centered around writing automated unit tests that test file system activities. The problems that come up when doing this is that the automated tests can end up having dependencies on: * file system layout * drive letters * IO race conditions between the JVM and the test In this talk, I will present and demonstrate a strategy for using mock objects in place of file system objects using the Extender tool (AKA Guard Generator) which Asim presented in an earlier session. Lance also presented this talk at XP Universe this summer. DATE AND SCHEDULE Thu, Sept 13, 2001 (second Thu of the month). 6.30 pm - 7.00 pm : Pizza + Networking. 7.00 pm - 9.00 pm : Presentations and Q&A. LOCATION Suite 100, Lante's Main Conference Room 3180 139th Avenue SE Bellevue, WA 98005 425.564.8800 (main desk) DIRECTIONS I have refactored the directions into two parts. First, how to get to 139th Ave SE (which depends on which interstate you use) and then how to get to 3180 which should be same for all cases: STEP 1: How to get to 139th Ave SE From I-405 South (going towards I-90) from Bellevue, Redmond. - Take exit 10 for Coal Creek Parkway and turn LEFT at the light as you get off the ramp onto Coal Creek Parkway. - Turn LEFT at Factoria Blvd (128th Av SE). - You will cross I-90 by going under it. - Turn RIGHT onto Eastgate Way SE, immediately after crossing I-90. - Take a LEFT at the light onto 139th Ave SE. From I-405 North (going towards I-90) from Renton. - Take exit 10 for Coal Creek Parkway and turn RIGHT at the light as you get off the ramp onto Coal Creek Parkway. - Turn LEFT at Factoria Blvd (128th Av SE). - You will cross I-90 by going under it. - Turn RIGHT onto Eastgate Way SE, immediately after crossing I-90. - Take a LEFT at the light onto 139th Ave SE From I-90 West (going towards I-405) from Bellevue, Issaquah, Redmond. - Take the 161st Ave SE/156th Ave SE/150th Ave SE exit (exit 11). - Keep LEFT at the fork in the ramp. - Keep RIGHT at the fork in the ramp. - Turn LEFT onto SE Eastgate Way. - Turn RIGHT onto 139th Ave SE. From I-90 East (going towards I-405) from Seattle, Mercer Island. - Take the Richards Road exit (exit 10). - Take a LEFT at the light off the exit ramp onto Richards Rd. - You will drive under I-90 crossing it. - Take the first RIGHT onto SE Eastgate Way. - Take a LEFT at the light onto 139th Ave SE STEP 2: How to find 3180 on 139th Ave SE - Drive past the turn for SE 32nd St. - 3180 will be the first building on your RIGHT. - You will notice a parking entrance into the building on your RIGHT. - Drive into it and then drive up the parking garage to the top (the 4th floor) which has uncovered parking. - Park anywhere (parking is free). - The building entrance should be straight ahead and there will be signs pointing to the XP meeting. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From MichaelRunningWolf at att.net Tue Sep 11 21:13:36 2001 From: MichaelRunningWolf at att.net (Michael R. Wolf) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: Who/What is a Perl User? Message-ID: <009f01c13b30$c6e5c320$cab74e0c@default> If you're reading this message, you self-identify as a "perl user". What does that mean to you? What do you do? How does Perl affect your life? I have two levels of interest for sparking this discussion: self-interest -- Although I am a perl-loving job hunter, I do not want programming to be my sole focus on my next position. Your answers will help *me* to pursue other possibilities. community-interest -- I see this list, and Perl at large, as a community. Your answers will help *us* to understand who we are, what our core interests and values are, and how we interact. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From john.brittingham at attws.com Wed Sep 12 14:20:33 2001 From: john.brittingham at attws.com (Brittingham, John) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: insert Clob problems Message-ID: <23F6FCBAA611D511A74A00508BCFBE40025E1EEA@WA-MSG06> I get the following error when I try to insert a CLOB using DBI: Not a CODE reference at extract_ccml__to_oracle_db_testing.pl line 381, line 1. What am I doing wrong? 380 $sth = $dbh->prepare(qq{INSERT INTO t_opr_instr ( TITLE,DSCR,ORDER_SEQ,PRD_MODEL_SPEC_ITEM_ID ) VALUES (?, ?, ?, ?) }); 381 $sth->( 1, $subproc_heading[$n]); 382 $sth->( 2, $dscr, SQL_LONGVARCHAR); 383 $sth->( 3, $ord_seq); 384 $sth->( 4, $prd_model_spec_item_id); 385 $sth->execute ; -----Original Message----- From: Ruchi Varma [mailto:ruchi@synopsys.COM] Sent: Wednesday, September 12, 2001 11:08 AM To: dbi-users@perl.org Subject: dynamic loading... hello, I had previously sent a message, regarding dynamic loading, on this newsgroup since i had problems installing DBD on my Solaris Box. I hence used the perl executable, created by the DBI installation in the dir /remote/tools/ruchi/perl5/site_perl/5.005/DBI-1.20/, to install DBD and it worked. But now when i run my cgi script using the DBI and DBD i have installed, it gives me the same error concerning Dynamic Loading. I have attached my script to this message ..Please look at it and give me some comments on how to solve this problem. ---------------------------------------------------------------------------- ---------------------------- #!/remote/tools/ruchi/perl5/site_perl/5.005/DBI-1.20/perl -- -*-perl-*- # I also tried using /usr/local/bin/perl5.6 ..but no luck... use lib qw(/remote/tools/ruchi/perl5 /remote/tools/mysql /remote/tools/ruchi/perl5/site_perl); use DBI; use CGI; use CGI::Carp qw(fatalsToBrowser); $driver = "mysql"; $dsn = "DBI:$driver:database = ASSETLOCATOR"; $dbUserName = "root"; $dbPassword = "blah"; $dataIn = new CGI; $dataIn->header(); $requestType = $dataIn->param('requestType'); $sql = $dataIn->param('sql'); if ($sql eq "") { &printSearchForm(); exit; } else { $dbh = &connectToDB(); $dataObject = executeSQLStatement($sql); @dbRows = &getDBRows($dataObject); if ($sql =~ /^SELECT/i) { print qq! SQL Statement results
    !; foreach $rowReference (@dbRows) { foreach $columnReference (@$rowReference) { print qq!!; foreach $column (@$columnReference) { print qq!\n!; } print qq!!; } } print qq!
    $column
    !; exit; } else { print "Your SQL Query has been processed, please hit the back button and submit a SELECT to see the changes!"; } } sub connectToDB { return (DBI->connect($dsn, $dbUserName, $dbPassword)); } sub executeSQLStatement { my ($sql) = shift; $dataObject = $dbh->prepare($sql); $dataObject->execute(); return $dataObject; } sub getDBRows { my ($dataObject) = shift; return $dataObject->fetchall_arrayref(); } sub printSearchForm { print qq! Enter SQL
    Enter SQL Query
    !; } ---------------------------------------------------------------------------- --------------------- the dir /remote/tools/mysql has mysql installed the dir /remote/tools/ruchi/perl5/site_perl/5.005 has both DBD and DBI installed The error i get is Can't load module DBI, dynamic loading not available in this perl. (You may need to build a new perl executable which either supports dynamic loading or has the DBI module statically linked into it.) at /remote/tools/ruchi/perl5/site_perl/DBI.pm line 189 BEGIN failed--compilation aborted at /remote/tools/ruchi/perl5/site_perl/DBI.pm line 189. Compilation failed in require at query.cgi line 6. BEGIN failed--compilation aborted at query.cgi line 6. Since the problem appears due to the perl version i am using, which perl version should i use? As far as i know perl versions from 5.004 onwards support dynamic loading. But i am using version 5.6...and it still does not seem to work..:( kindly help.. thanks Ruchi -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/archives/spug-list/attachments/20010912/e1200738/attachment.htm From john.brittingham at attws.com Wed Sep 12 14:55:29 2001 From: john.brittingham at attws.com (Brittingham, John) Date: Wed Aug 4 00:08:17 2004 Subject: SPUG: Not a CODE reference Message-ID: <23F6FCBAA611D511A74A00508BCFBE40025E1EEB@WA-MSG06> I keep getting an error stating that Not a CODE reference at extract_ccml__to_oracle_db_testing.pl line 384. Anyone have any suggestions? 379 $title ="$subproc_heading[$n]"; 380 $dscr ="$subproc_xml_var2[$n]"; 381 $dbh->{LongReadLen} = 2**20; # 1 MB max message size 382 $dbh->{LongTruncOk} = 0; 383 $sth = $dbh->prepare(qq{INSERT INTO t_opr_instr ( TITLE,DSCR,ORDER_SEQ,PRD_MODEL_SPEC_ITEM_ID ) VALUES (?, ?, ?, ?) }); 384 $sth->( 1, $title); 385 $sth->( 2, $dscr, {ora_type => ORA_CLOB} ); 386 $sth->( 3, $ord_seq); 387 $sth->( 4, $prd_model_spec_item_id); 388 $sth->execute ; -----Original Message----- From: Brittingham, John [mailto:john.brittingham@attws.com] Sent: Wednesday, September 12, 2001 12:21 PM To: dbi-users@perl.org; spug-list@pm.org Subject: insert Clob problems I get the following error when I try to insert a CLOB using DBI: Not a CODE reference at extract_ccml__to_oracle_db_testing.pl line 381, line 1. What am I doing wrong? 380 $sth = $dbh->prepare(qq{INSERT INTO t_opr_instr ( TITLE,DSCR,ORDER_SEQ,PRD_MODEL_SPEC_ITEM_ID ) VALUES (?, ?, ?, ?) }); 381 $sth->( 1, $subproc_heading[$n]); 382 $sth->( 2, $dscr, SQL_LONGVARCHAR); 383 $sth->( 3, $ord_seq); 384 $sth->( 4, $prd_model_spec_item_id); 385 $sth->execute ; -----Original Message----- From: Ruchi Varma [mailto:ruchi@synopsys.COM] Sent: Wednesday, September 12, 2001 11:08 AM To: dbi-users@perl.org Subject: dynamic loading... hello, I had previously sent a message, regarding dynamic loading, on this newsgroup since i had problems installing DBD on my Solaris Box. I hence used the perl executable, created by the DBI installation in the dir /remote/tools/ruchi/perl5/site_perl/5.005/DBI-1.20/, to install DBD and it worked. But now when i run my cgi script using the DBI and DBD i have installed, it gives me the same error concerning Dynamic Loading. I have attached my script to this message ..Please look at it and give me some comments on how to solve this problem. ---------------------------------------------------------------------------- ---------------------------- #!/remote/tools/ruchi/perl5/site_perl/5.005/DBI-1.20/perl -- -*-perl-*- # I also tried using /usr/local/bin/perl5.6 ..but no luck... use lib qw(/remote/tools/ruchi/perl5 /remote/tools/mysql /remote/tools/ruchi/perl5/site_perl); use DBI; use CGI; use CGI::Carp qw(fatalsToBrowser); $driver = "mysql"; $dsn = "DBI:$driver:database = ASSETLOCATOR"; $dbUserName = "root"; $dbPassword = "blah"; $dataIn = new CGI; $dataIn->header(); $requestType = $dataIn->param('requestType'); $sql = $dataIn->param('sql'); if ($sql eq "") { &printSearchForm(); exit; } else { $dbh = &connectToDB(); $dataObject = executeSQLStatement($sql); @dbRows = &getDBRows($dataObject); if ($sql =~ /^SELECT/i) { print qq! SQL Statement results
    !; foreach $rowReference (@dbRows) { foreach $columnReference (@$rowReference) { print qq!!; foreach $column (@$columnReference) { print qq!\n!; } print qq!!; } } print qq!
    $column
    !; exit; } else { print "Your SQL Query has been processed, please hit the back button and submit a SELECT to see the changes!"; } } sub connectToDB { return (DBI->connect($dsn, $dbUserName, $dbPassword)); } sub executeSQLStatement { my ($sql) = shift; $dataObject = $dbh->prepare($sql); $dataObject->execute(); return $dataObject; } sub getDBRows { my ($dataObject) = shift; return $dataObject->fetchall_arrayref(); } sub printSearchForm { print qq! Enter SQL
    Enter SQL Query
    !; } ---------------------------------------------------------------------------- --------------------- the dir /remote/tools/mysql has mysql installed the dir /remote/tools/ruchi/perl5/site_perl/5.005 has both DBD and DBI installed The error i get is Can't load module DBI, dynamic loading not available in this perl. (You may need to build a new perl executable which either supports dynamic loading or has the DBI module statically linked into it.) at /remote/tools/ruchi/perl5/site_perl/DBI.pm line 189 BEGIN failed--compilation aborted at /remote/tools/ruchi/perl5/site_perl/DBI.pm line 189. Compilation failed in require at query.cgi line 6. BEGIN failed--compilation aborted at query.cgi line 6. Since the problem appears due to the perl version i am using, which perl version should i use? As far as i know perl versions from 5.004 onwards support dynamic loading. But i am using version 5.6...and it still does not seem to work..:( kindly help.. thanks Ruchi -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/archives/spug-list/attachments/20010912/3cf80915/attachment.htm From cmeyer at helvella.org Wed Sep 12 15:05:31 2001 From: cmeyer at helvella.org (Colin Meyer) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: insert Clob problems In-Reply-To: <23F6FCBAA611D511A74A00508BCFBE40025E1EEA@WA-MSG06> References: <23F6FCBAA611D511A74A00508BCFBE40025E1EEA@WA-MSG06> Message-ID: <20010912130531.I5095@hobart.helvella.org> Hi, John, On Wed, Sep 12, 2001 at 12:20:33PM -0700, Brittingham, John wrote: > I get the following error when I try to insert a CLOB using DBI: Not a CODE > reference at extract_ccml__to_oracle_db_testing.pl line 381, > line 1. What am I doing wrong? > > 380 $sth = $dbh->prepare(qq{INSERT INTO t_opr_instr ( > TITLE,DSCR,ORDER_SEQ,PRD_MODEL_SPEC_ITEM_ID ) VALUES (?, ?, ?, ?) }); > 381 $sth->( 1, $subproc_heading[$n]); > 382 $sth->( 2, $dscr, SQL_LONGVARCHAR); > 383 $sth->( 3, $ord_seq); > 384 $sth->( 4, $prd_model_spec_item_id); > 385 $sth->execute ; You want to use the bind_param() method of the statement handle: $sth->bind_param(1, $subproc_heading[$n]); # ... If you are interested in learning a lot about DBI programming, then you may be interested in my course, Database Programming with Perl: http://www.consultix-inc.com/dbi.html hth, -C. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From john.brittingham at attws.com Wed Sep 12 16:09:44 2001 From: john.brittingham at attws.com (Brittingham, John) Date: Wed Aug 4 00:08:18 2004 Subject: Fixed Was-RE: SPUG: insert Clob problems Message-ID: <23F6FCBAA611D511A74A00508BCFBE40025E1EEF@WA-MSG06> Thanks for the assistance both issues are fixed and was mostly due to my misinterpreting the examples I was working from. -----Original Message----- From: Colin Meyer [mailto:cmeyer@helvella.org] Sent: Wednesday, September 12, 2001 1:06 PM To: Brittingham, John Cc: dbi-users@perl.org; spug-list@pm.org Subject: Re: SPUG: insert Clob problems Hi, John, On Wed, Sep 12, 2001 at 12:20:33PM -0700, Brittingham, John wrote: > I get the following error when I try to insert a CLOB using DBI: Not a CODE > reference at extract_ccml__to_oracle_db_testing.pl line 381, > line 1. What am I doing wrong? > > 380 $sth = $dbh->prepare(qq{INSERT INTO t_opr_instr ( > TITLE,DSCR,ORDER_SEQ,PRD_MODEL_SPEC_ITEM_ID ) VALUES (?, ?, ?, ?) }); > 381 $sth->( 1, $subproc_heading[$n]); > 382 $sth->( 2, $dscr, SQL_LONGVARCHAR); > 383 $sth->( 3, $ord_seq); > 384 $sth->( 4, $prd_model_spec_item_id); > 385 $sth->execute ; You want to use the bind_param() method of the statement handle: $sth->bind_param(1, $subproc_heading[$n]); # ... If you are interested in learning a lot about DBI programming, then you may be interested in my course, Database Programming with Perl: http://www.consultix-inc.com/dbi.html hth, -C. -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/archives/spug-list/attachments/20010912/4ec7c25e/attachment.htm From tim at consultix-inc.com Wed Sep 12 17:41:33 2001 From: tim at consultix-inc.com (Tim Maher/CONSULTIX) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: Sept. Meeting: Lightning Strikes SPUG! Message-ID: <20010912154133.B3632@timji.consultix.wa.com> SPUGsters, Starting with next week's meeting, I'd like to experiment with adding the "lightning rounds" format to our monthly agenda. For those who don't know, these are 5-minute talks that are easy to prepare, and even if some are boring, the spectators know that in 5 minutes or less the topic will definitely change. This format originated at one of the YAPCs, and it has since migrated to TPC where it has been very popular. I encourage all who plan to attend to think about talking briefly about something Perlish (favorite module, pet peeve, job situation, book/magazine, web-site, is there a Module so bizarre that even Damian couldn't write it, etc.), and to bounce your ideas off the list subscribers first to get useful feedback. If we allow 10 minutes for announcements, 50 minutes for the speaker (Jim Flanagan), and 10 minutes for a break, we'll theoretically have time for about 10 5-minute talks. If we get fewer volunteers, we could let each have more time. I'll need to coordinate with Andy to confirm this, but I'm thinking that any supporting (digital) materials would need to be in text, HTML, PostScript, or PDF format, either emailed to somebody first (andy?) or brought on a 3.5" FAT or VFAT -format diskette or perhaps a CD. So who wants to pitch the first idea? -Tim ======================================================== | Tim Maher, Ph.D. Tel: (206) 781-UNIX | | SPUG Founder & Leader Email: spug@halcyon.com | | Seattle Perl Users Group HTTP: seattleperl.com | ======================================================== P.S. I've got some empty seats in my Minimal Perl class that's taking place next Monday (http://www.consultix-inc.com/minperl.html); any SPUGsters interested in attending at a discounted price please get in touch with me. *=========================================================================* | Dr. Tim Maher, CEO, Consultix (206) 781-UNIX/8649; ask for FAX# | | Email: tim@consultix-inc.com Web: http://www.consultix-inc.com | | TIM MAHER: Unix/Perl DAMIAN CONWAY: OO Perl BRIAN INGERSON: Inline.pm | | CLASSES->Perl 9/18; Shell/Utilities 10/8; Int. Perl 10/22; Inline 11/6 | *=========================================================================* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From Richard.Anderson at raycosoft.com Wed Sep 12 22:31:11 2001 From: Richard.Anderson at raycosoft.com (Richard Anderson) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: Re: Sept. Meeting: Lightning Strikes SPUG! References: <20010912154133.B3632@timji.consultix.wa.com> Message-ID: <032501c13c04$da0c00c0$2188ddd1@aciwin> I can jawbone about my CPAN module HTTP::WebTest, which tests remote URLs or local web files. Actually, I could talk about it for 10-15 minutes, but I like the discipline of having to present the essential concepts behind the module in 300 seconds. Richard Anderson, Ph.D www.raycosoft.com Richard.Anderson@raycosoft.com Seattle, WA ----- Original Message ----- From: "Tim Maher/CONSULTIX" To: Sent: Wednesday, September 12, 2001 3:41 PM Subject: SPUG: Sept. Meeting: Lightning Strikes SPUG! > SPUGsters, > > Starting with next week's meeting, I'd like to experiment with > adding the "lightning rounds" format to our monthly agenda. > For those who don't know, these are 5-minute talks that are easy > to prepare, and even if some are boring, the spectators know > that in 5 minutes or less the topic will definitely change. > This format originated at one of the YAPCs, and it has since > migrated to TPC where it has been very popular. > > I encourage all who plan to attend to think about talking briefly > about something Perlish (favorite module, pet peeve, job situation, > book/magazine, web-site, is there a Module so bizarre that even > Damian couldn't write it, etc.), and to bounce your ideas off the > list subscribers first to get useful feedback. > > If we allow 10 minutes for announcements, 50 minutes for the > speaker (Jim Flanagan), and 10 minutes for a break, we'll > theoretically have time for about 10 5-minute talks. If we > get fewer volunteers, we could let each have more time. > > I'll need to coordinate with Andy to confirm this, but I'm thinking > that any supporting (digital) materials would need to be in text, > HTML, PostScript, or PDF format, either emailed to somebody first > (andy?) or brought on a 3.5" FAT or VFAT -format diskette or > perhaps a CD. > > So who wants to pitch the first idea? > > -Tim > ======================================================== > | Tim Maher, Ph.D. Tel: (206) 781-UNIX | > | SPUG Founder & Leader Email: spug@halcyon.com | > | Seattle Perl Users Group HTTP: seattleperl.com | > ======================================================== > > P.S. I've got some empty seats in my Minimal Perl class that's taking > place next Monday (http://www.consultix-inc.com/minperl.html); any > SPUGsters interested in attending at a discounted price please get in > touch with me. > *=========================================================================* > | Dr. Tim Maher, CEO, Consultix (206) 781-UNIX/8649; ask for FAX# | > | Email: tim@consultix-inc.com Web: http://www.consultix-inc.com | > | TIM MAHER: Unix/Perl DAMIAN CONWAY: OO Perl BRIAN INGERSON: Inline.pm | > | CLASSES->Perl 9/18; Shell/Utilities 10/8; Int. Perl 10/22; Inline 11/6 | > *=========================================================================* > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org > Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL > Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address > For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest > Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ > > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From andrew at sweger.net Thu Sep 13 00:06:11 2001 From: andrew at sweger.net (Andrew Sweger) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: Sept. Meeting: Lightning Strikes SPUG! In-Reply-To: <20010912154133.B3632@timji.consultix.wa.com> Message-ID: On Wed, 12 Sep 2001, Tim Maher/CONSULTIX wrote: > I'll need to coordinate with Andy to confirm this, but I'm thinking > that any supporting (digital) materials would need to be in text, > HTML, PostScript, or PDF format, either emailed to somebody first > (andy?) or brought on a 3.5" FAT or VFAT -format diskette or > perhaps a CD. If I can tear myself away from the TV for a few minutes, I'll try to get organized and get back to you all (sometime before the stock markets open, ha ha). -- Andrew B. Sweger -- The great thing about multitasking is that several things can go wrong at once. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From rvjeep at rvjeep.co.kr Thu Sep 13 02:03:00 2001 From: rvjeep at rvjeep.co.kr (=?ks_c_5601-1987?B?x9HDpL/B?=) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: =?ks_c_5601-1987?B?W7GksO1dIHNwdWctbGlzdLTUIL7Is+fHz73KtM+x7j8=?= Message-ID: <200109130659.f8D6xuw15747@gocho.pm.org> 9? ??? ') i++; if (i ') i++; } dest += src.substring(mark, i); if (i >= src.length) break; dest += ''; mark = i; while (i '; wordi++; } el.innerHTML = dest; el.posLeft = 0; el.style.visibility = 'visible'; list[index] = namosw_new_animation_object(el.name+'word1', el.startCondObj, el.startCondTime, el.startXPos, el.startYPos, el.pathType, false, el.zoom, el.stepNum); for (i = 1; i 0) { el.countDown = (0 0 ? -1:1)); cosv = Math.cos(Math.PI*el.step/el.stepNum); newx = ((cosv*(el.sx-x) - sinv*(el.sy-y) + x) + linex) / 2; newy = ((sinv*(el.sx-x) + cosv*(el.sy-y) + y) + liney) / 2; } else if (el.pathType == 'spiral') { sinv = Math.sin(2*Math.PI*el.step/el.stepNum); cosv = Math.cos(2*Math.PI*el.step/el.stepNum); r = (el.stepNum-el.step)/el.stepNum; newx = el.ex + (cosv*(el.sx-el.ex) - sinv*(el.sy-el.ey))*r; newy = el.ey + (sinv*(el.sx-el.ex) + cosv*(el.sy-el.ey))*r; } if (el.style) { if (el.zoom == 'zoomin') el.style.fontSize = 50+50*el.step/el.stepNum + '%'; else if (el.zoom == 'zoomout') el.style.fontSize = 200-100*el.step/el.stepNum + '%'; } namosw_set_pos(el, newx, newy); namosw_set_visible(el, true); if (el.step++ == el.stepNum) { namosw_set_pos(el, el.ex, el.ey); el.step = 0; el.countDown = -1; // trigger other object(self can be trigger) for (var j = 0; j 0) window.setTimeout("namosw_animate();", 10);}function namosw_init_animation(){ var i = 0; var list = new Array; list[i++] = namosw_new_animation_object('alayer1', null, 0, 'right', 'bottom', 'spiral', false, null, 70); document.NamoAnimationObjects = list; var length = list.length; for (i = 0; i ??? ??? ?? ????? ????? ?? ???. document.write(month + "?"); document.write( myweekday + "?" + day); ????? ???? | ??????? | ?? ???? | ??????? ???? ?? ?? ?????? ????????? ?? ??? ???? ????? ?? ??? ????? ???? ???????. ????? JEEPRV?? 1,000??? ??? ???????. ?? ?? ?????? ???? ?? ? ???? ?.? ?? ??? ? ??? ???????. ??? ?????? ???? ??? ???? ??? ?? ?? ????? ??? ????? ?? ?????. ????? ?? ??? ????? ??? ??? ??? ??? ??? ?????. ?? ????? ?????? ???????? ??? ????? ?? ?? ?? ????? ????. ?? ?????? ?? ????? ??? ?? ??? ????. 1. ???? ???? 10% ?? ??? ?? 2. ????? ???? ??? ??? ?? 3. ???? ??? 10~20% ?? 4. ??? ???? ?????? ?? ???? ??? ??? 20,000?? ????~! ??? ??? 20,000?? ????~! ??? [??RV????]? ???? ?? ??? ?? ?? ? ? [?? ??]? ?? ??? ??? ?? ? ?? ?? ? ?? ?? ???? ???? ??? ??? ?~?~??????. ???? ???? ???? ???? ??? ???? ???? ???? (?????) ??? ???? ??? ???? ???? ??? ????, ??, (?? ??) ???, ??, ???,????? ??? ???? ??? ???? ???(EGR)???? ??? ??? ???? ??? ???? ????? ???? | ??????? | ?? ???? | ??????? ? ???? ???????. ????? ?? ??? ??? ?? ?? ??? ???? ?? ????? ?????? ???? ??? ????? ???? ??????. Copyright 2001 by ??????. All right reserved. Tel. 031-962-7651 -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/archives/spug-list/attachments/20010913/bfa93501/attachment.htm From tim at consultix-inc.com Thu Sep 13 13:59:08 2001 From: tim at consultix-inc.com (Tim Maher/CONSULTIX) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: Re: SPUG 9/18, room, AV, and Andy In-Reply-To: ; from Andrew Sweger on Thu, Sep 13, 2001 at 11:44:20AM -0700 References: Message-ID: <20010913115908.B11626@timji.consultix.wa.com> On Thu, Sep 13, 2001 at 11:44:20AM -0700, Andrew Sweger wrote: > Okay, I'm starting to get my wits back. I figured out that I have promised > my services to my mom next week to help her move (and do a bit of work on > her new place) over in Port Townsend. So, what will this mean for SPUG? I > won't be in Seattle. The room is reserved, the guard on the first floor > will have an entry in his calendar that says we have the room (either as > N2H2, Andrew Sweger, or Perl group) and should unlock the doors for > someone. On the AV side of things, I don't know of anyone at N2H2 that > would be available to get the equipment (I'm the only Perl nut left I > think). So, there is a very, very low likelihood of having any > presentation equipment available. I volunteer to provide the computer projector, and my laptop, configured to project PDF, HTML, and PostScript and import form 3.5" floppies. I won't be bringing any rolling tables or long extension cords like Andy has done, but we'll figure out some way to hook things up. > Sorry for the late notice. And I was getting all excited reading the > meeting announcement. Looking forward to Jim's presentation. I was also > planning on talking to you next week about the future of N2H2 (or the > future of Andrew Sweger or the lack thereof). My plans are unclear. But I > will try to keep you informed as things develop. Yikes! Is SPUG on the verge of losing our last ally in N2H2, and perhaps our meeting place too? Anybody have an alternate meeting location they can offer, starting perhaps next Tuesday? ======================================================== | Tim Maher, Ph.D. Tel: (206) 781-UNIX | | SPUG Founder & Leader Email: spug@halcyon.com | | Seattle Perl Users Group HTTP: seattleperl.com | ======================================================== - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From andrew at sweger.net Thu Sep 13 14:43:33 2001 From: andrew at sweger.net (Andrew Sweger) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: Re: SPUG 9/18, room, AV, and Andy In-Reply-To: <20010913115908.B11626@timji.consultix.wa.com> Message-ID: On Thu, 13 Sep 2001, Tim Maher/CONSULTIX wrote: > Yikes! Is SPUG on the verge of losing our last ally in N2H2, and perhaps > our meeting place too? Anybody have an alternate meeting location they > can offer, starting perhaps next Tuesday? Double yikes! I forgot that sending a personal (direct) email to Tim usually ends up being sent to the spug-list in some form. Welcome to my life, all you strangers (and strangests) out there. :P The meeting place for next Tuesday is still reserved at the UBoC. I will not be able to attend for personal reasons (let me know if you need further details). Y'all just have to get the guard to open the conference room doors yourselves. -- Andrew B. Sweger -- The great thing about multitasking is that several things can go wrong at once. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From tim at consultix-inc.com Thu Sep 13 15:06:58 2001 From: tim at consultix-inc.com (Tim Maher/CONSULTIX) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: Re: SPUG 9/18, room, AV, and Andy In-Reply-To: ; from Andrew Sweger on Thu, Sep 13, 2001 at 12:43:33PM -0700 References: <20010913115908.B11626@timji.consultix.wa.com> Message-ID: <20010913130658.A12116@timji.consultix.wa.com> On Thu, Sep 13, 2001 at 12:43:33PM -0700, Andrew Sweger wrote: > On Thu, 13 Sep 2001, Tim Maher/CONSULTIX wrote: > > > Yikes! Is SPUG on the verge of losing our last ally in N2H2, and perhaps > > Double yikes! I forgot that sending a personal (direct) email to Tim > usually ends up being sent to the spug-list in some form. Welcome to my Well, I wouldn't say "usually", but it can happen when I mistakenly believe that the message was directed to the spug-list in the first place (sorry for my inadvertent breach of etiquette!) And let that be a warning to the rest of you too; make it easy for me to know if your message is personal 8-} > life, all you strangers (and strangests) out there. :P > > The meeting place for next Tuesday is still reserved at the UBoC. I will > not be able to attend for personal reasons (let me know if you need > further details). Y'all just have to get the guard to open the conference > room doors yourselves. The meeting will take place as planned, and those wishing to present "lightning talks" please let me know, and either email me your stuff in advance or else bring your files on a FAT/VFAT (i.e., DOS/Windoze) 3.5" diskette in PDF, HTML, or PostScript format. ======================================================== | Tim Maher, Ph.D. Tel: (206) 781-UNIX | | SPUG Founder & Leader Email: spug@halcyon.com | | Seattle Perl Users Group HTTP: seattleperl.com | ======================================================== - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From Richard.Anderson at raycosoft.com Thu Sep 13 15:21:42 2001 From: Richard.Anderson at raycosoft.com (Richard Anderson) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: Re: Re: SPUG 9/18, room, AV, and Andy References: <20010913115908.B11626@timji.consultix.wa.com> Message-ID: <002301c13c91$b7f84470$2788ddd1@aciwin> ----- Original Message ----- From: "Tim Maher/CONSULTIX" To: "Andrew Sweger" Cc: Sent: Thursday, September 13, 2001 11:59 AM Subject: SPUG: Re: SPUG 9/18, room, AV, and Andy > Yikes! Is SPUG on the verge of losing our last ally in N2H2, and perhaps > our meeting place too? Anybody have an alternate meeting location they > can offer, starting perhaps next Tuesday? I'd suggest contacting the Seattle Vocational Institute on First Hill ( http://sviweb.sccd.ctc.edu/ ). Randy Bentson has a contact there. They are hosting SeaSlug and seem to be interested in hosting computer user groups. They have plenty of space. Richard Anderson, Ph.D www.raycosoft.com Richard.Anderson@raycosoft.com Seattle, WA - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From jay at Scherrer.com Fri Sep 14 09:18:48 2001 From: jay at Scherrer.com (Jay Scherrer) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: Re: Re: SPUG 9/18, room, AV, and Andy References: <20010913115908.B11626@timji.consultix.wa.com> <002301c13c91$b7f84470$2788ddd1@aciwin> Message-ID: <3BA211C8.7010506@scherrer.com> Earlier, I had sent a notice to Spug: Phinney Neighborhood Center opening up a new technology center. Maybe they will allow Spug to be held there some times? Plenty of parking, Large rooms. Jay Richard Anderson wrote: >----- Original Message ----- >From: "Tim Maher/CONSULTIX" >To: "Andrew Sweger" >Cc: >Sent: Thursday, September 13, 2001 11:59 AM >Subject: SPUG: Re: SPUG 9/18, room, AV, and Andy > >>Yikes! Is SPUG on the verge of losing our last ally in N2H2, and perhaps >>our meeting place too? Anybody have an alternate meeting location they >>can offer, starting perhaps next Tuesday? >> > >I'd suggest contacting the Seattle Vocational Institute on First Hill ( >http://sviweb.sccd.ctc.edu/ ). Randy Bentson has a contact there. They are >hosting SeaSlug and seem to be interested in hosting computer user groups. >They have plenty of space. > >Richard Anderson, Ph.D >www.raycosoft.com >Richard.Anderson@raycosoft.com >Seattle, WA > > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org > Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL > Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address > For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest > Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ > > > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From tim at consultix-inc.com Fri Sep 14 09:51:02 2001 From: tim at consultix-inc.com (Tim Maher/CONSULTIX) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: Looking for New Meeting Place In-Reply-To: <3BA211C8.7010506@scherrer.com>; from Jay Scherrer on Fri, Sep 14, 2001 at 07:18:48AM -0700 References: <20010913115908.B11626@timji.consultix.wa.com> <002301c13c91$b7f84470$2788ddd1@aciwin> <3BA211C8.7010506@scherrer.com> Message-ID: <20010914075102.A19062@timji.consultix.wa.com> On Fri, Sep 14, 2001 at 07:18:48AM -0700, Jay Scherrer wrote: > Earlier, I had sent a notice to Spug: Phinney Neighborhood Center That message bounced back to me (due to a bad word in the Subject), and after I talked to those guys I decided not to forward the message to the group. > opening up a new technology center. Maybe they will allow Spug to be > held there some times? Plenty of parking, Large rooms. > Jay > When I talked to them, they said they weren't ready to accept any "lodgers" yet, and that their rooms were very tiny (but maybe they were talking about different rooms than you?) But more importantly they're too far from highway access, IMHO, to be a suitable site for SPUG. But thanks for keeping your eyes open! -Tim > Richard Anderson wrote: > > > >I'd suggest contacting the Seattle Vocational Institute on First Hill ( > >http://sviweb.sccd.ctc.edu/ ). Randy Bentson has a contact there. They are > >hosting SeaSlug and seem to be interested in hosting computer user groups. > >They have plenty of space. I sent them an Email, and am waiting for a reply. -- *=========================================================================* | Dr. Tim Maher, CEO, Consultix (206) 781-UNIX/8649; ask for FAX# | | Email: tim@consultix-inc.com Web: http://www.consultix-inc.com | | TIM MAHER: Unix/Perl DAMIAN CONWAY: OO Perl BRIAN INGERSON: Inline.pm | | CLASSES->Perl 9/18; Shell/Utilities 10/8; Int. Perl 10/22; Inline 11/6 | *=========================================================================* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From jope-spug at jope.net Fri Sep 14 12:17:59 2001 From: jope-spug at jope.net (El JoPe Magnifico) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: Looking for New Meeting Place In-Reply-To: <20010914075102.A19062@timji.consultix.wa.com> Message-ID: Too far from highway access? I debate both the validity of that statement, and its validity as a reason. As long as Metro goes near it, that should be sufficient. Can we get list of arbitrary restrictions _before_ suggestions get sat upon, please? Did they give an idea when they would be ready for "lodgers"? I too would love that location, from a geographic standpoint. Are there any options on UW's campus? -jp On Fri, 14 Sep 2001, Tim Maher/CONSULTIX wrote: > On Fri, Sep 14, 2001 at 07:18:48AM -0700, Jay Scherrer wrote: >> Earlier, I had sent a notice to Spug: Phinney Neighborhood Center >> opening up a new technology center. Maybe they will allow Spug to be >> held there some times? Plenty of parking, Large rooms. > > When I talked to them, they said they weren't ready to accept any > "lodgers" yet, and that their rooms were very tiny (but maybe they were > talking about different rooms than you?) But more importantly they're > too far from highway access, IMHO, to be a suitable site for SPUG. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From tim at consultix-inc.com Fri Sep 14 12:54:01 2001 From: tim at consultix-inc.com (Tim Maher/CONSULTIX) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: Looking for New Meeting Place In-Reply-To: ; from El JoPe Magnifico on Fri, Sep 14, 2001 at 10:17:59AM -0700 References: <20010914075102.A19062@timji.consultix.wa.com> Message-ID: <20010914105401.A20418@timji.consultix.wa.com> On Fri, Sep 14, 2001 at 10:17:59AM -0700, El JoPe Magnifico wrote: > Too far from highway access? I debate both the validity of that > statement, and its validity as a reason. As long as Metro goes > near it, that should be sufficient. Can we get list of arbitrary > restrictions _before_ suggestions get sat upon, please? > -jp We've been through several relocations in our 3 year history, and easy highway access was always listed by the members as an important consideration. (Sadly, all SPUGsters aren't willing to ride their bikes or take three buses to get to our meetings. 8-}) So there was nothing arbitrary about my focus on this factor, despite my coy phrasing of it as an "IMHO" factor. FYI, I'm attaching a copy of the "venues desiderata" file assembled through a member survey last time we went through a relocation. > Are there any options on UW's campus? Perhaps; can somebody with connections there look into this? -Tim ======================================================== | Tim Maher, Ph.D. Tel: (206) 781-UNIX | | SPUG Founder & Leader Email: spug@halcyon.com | | Seattle Perl Users Group HTTP: zipcon.net/spug | ======================================================== -------------- next part -------------- SPUG-HOME DESIDERATA Minimum Requirements: easy highway access accommodation for up to 25 persons central to high-tech work locations (Seattle, Bellevue/Kirkland, or Mercer Island) near restaurants/bars for post-meeting meetings Better: free and ample parking free access to meeting room (no escorts) Overhead Projector & screen White-Boards telephone line access (for laptop/Internet connectivity) low charge ($$) to use facility Even Better: computer with Internet access (via DSL, etc.) Data Projector (for computer screen) comfy chairs NO charge ($$) to use facility From tim at consultix-inc.com Fri Sep 14 16:22:17 2001 From: tim at consultix-inc.com (Tim Maher/CONSULTIX) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: Reboot Washington Announcement Message-ID: <20010914142217.A21792@timji.consultix.wa.com> Here's an announcement from the Washington Software Association that I've approved for distribution to this list, because of the unusually large number of current job seekers. -Tim * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * Reboot Washington: Re-energize your Tech Career Workshop Tuesday, September 25, 2001 Seattle Center, Northwest Rooms Have you or do you know someone in the tech industry who has recently been laid off and is having a difficult time finding a new job? Understanding that the job market has substantially changed and that tech industry professionals are facing new challenges in finding their next opportunity, the WSA and Seattlejobs.org have created a FREE one day workshop to assist Washington's unemployed technology workers in conducting an effective job search and creating a plan for career longevity. The Reboot Washington Workshop will feature: -Skill building sessions on resume development, interviewing techniques, career options, and how to evaluate opportunities -Information about how to reassess your career options vs. getting a job -Tools to help you through your job search SPACE IS LIMITED TO THE FIRST 1,000 PEOPLE. PRE-REGISTRATION IS REQUIRED TO ATTEND. For more information and to register visit: www.wsa.org/events/rebootwa **PLEASE FORWARD TO OTHERS WHO MIGHT BENEFIT FROM THIS EVENT** WSA -- www.wsa.org "Connecting Washington's Technology Leaders" Seattlejobs.org -- www.seattlejobs.org High Tech Jobs Network: "Real Companies, Real Jobs, All HighTech" ____________________ Please join the WSA in supporting the relief efforts by considering a donation to the American Red Cross www.seattleredcross.org or by donating blood at the Puget Sound Blood Center www.psbc.org. ========== - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From jason at strangelight.com Fri Sep 14 23:48:53 2001 From: jason at strangelight.com (Jason Lamport) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: can't die() from XML::Parser handlers? Message-ID: I've discovered what I consider very strange behaviour in XML::Parser: I'm using the 'Subs' style of parsing, like this: use XML::Parser; # .... my $parser = new XML::Parser( Style => 'Subs', Pkg => 'my_Handlers', ); $parser->parsefile( $SOME_XML_FILE ); #.... package my_Handlers; sub table { my $table_id; # ... some stuff to find the "id" attribute die( "table must have an id attribute" ) unless defined $table_id; # ... more stuff } __END__ Now, it turned out that due to an error in the XML file, $table_id was in fact undef inside table(). The weird thing is that the die() call isn't causing the program to die: it just exits the handler but keeps on going parsing the XML file as if nothing had happened. I can only assume that XML::Parser is calling the handlers from inside an eval block (which would make sense) and then ignoring the error messages (which doesn't make any sense at all). I don't get it. Is this a bug or some sort of feature that I'm understanding? How can I get the handlers to raise a fatal exception? (Of course I can think of plenty of kludgey work-arounds, but nothing elegant.) -jason - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From john.brittingham at attws.com Wed Sep 12 16:09:44 2001 From: john.brittingham at attws.com (Brittingham, John) Date: Wed Aug 4 00:08:18 2004 Subject: Fixed Was-RE: SPUG: insert Clob problems Message-ID: <23F6FCBAA611D511A74A00508BCFBE40025E1EEF@WA-MSG06> Thanks for the assistance both issues are fixed and was mostly due to my misinterpreting the examples I was working from. -----Original Message----- From: Colin Meyer [mailto:cmeyer@helvella.org] Sent: Wednesday, September 12, 2001 1:06 PM To: Brittingham, John Cc: dbi-users@perl.org; spug-list@pm.org Subject: Re: SPUG: insert Clob problems Hi, John, On Wed, Sep 12, 2001 at 12:20:33PM -0700, Brittingham, John wrote: > I get the following error when I try to insert a CLOB using DBI: Not a CODE > reference at extract_ccml__to_oracle_db_testing.pl line 381, > line 1. What am I doing wrong? > > 380 $sth = $dbh->prepare(qq{INSERT INTO t_opr_instr ( > TITLE,DSCR,ORDER_SEQ,PRD_MODEL_SPEC_ITEM_ID ) VALUES (?, ?, ?, ?) }); > 381 $sth->( 1, $subproc_heading[$n]); > 382 $sth->( 2, $dscr, SQL_LONGVARCHAR); > 383 $sth->( 3, $ord_seq); > 384 $sth->( 4, $prd_model_spec_item_id); > 385 $sth->execute ; You want to use the bind_param() method of the statement handle: $sth->bind_param(1, $subproc_heading[$n]); # ... If you are interested in learning a lot about DBI programming, then you may be interested in my course, Database Programming with Perl: http://www.consultix-inc.com/dbi.html hth, -C. From cmeyer at helvella.org Wed Sep 12 15:05:31 2001 From: cmeyer at helvella.org (Colin Meyer) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: insert Clob problems In-Reply-To: <23F6FCBAA611D511A74A00508BCFBE40025E1EEA@WA-MSG06> References: <23F6FCBAA611D511A74A00508BCFBE40025E1EEA@WA-MSG06> Message-ID: <20010912130531.I5095@hobart.helvella.org> Hi, John, On Wed, Sep 12, 2001 at 12:20:33PM -0700, Brittingham, John wrote: > I get the following error when I try to insert a CLOB using DBI: Not a CODE > reference at extract_ccml__to_oracle_db_testing.pl line 381, > line 1. What am I doing wrong? > > 380 $sth = $dbh->prepare(qq{INSERT INTO t_opr_instr ( > TITLE,DSCR,ORDER_SEQ,PRD_MODEL_SPEC_ITEM_ID ) VALUES (?, ?, ?, ?) }); > 381 $sth->( 1, $subproc_heading[$n]); > 382 $sth->( 2, $dscr, SQL_LONGVARCHAR); > 383 $sth->( 3, $ord_seq); > 384 $sth->( 4, $prd_model_spec_item_id); > 385 $sth->execute ; You want to use the bind_param() method of the statement handle: $sth->bind_param(1, $subproc_heading[$n]); # ... If you are interested in learning a lot about DBI programming, then you may be interested in my course, Database Programming with Perl: http://www.consultix-inc.com/dbi.html hth, -C. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From phillipneal at hotmail.com Sat Sep 15 08:02:34 2001 From: phillipneal at hotmail.com (Phillip Neal) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: Who/What is a Perl User? Message-ID: Yo dude, >If you're reading this message, you self-identify as a "perl user". What >does that mean to you? What do you do? How does Perl affect your life? > It means : 1. I know a good thing when I see it. 2. I'm too old to change from procedural programming to object oriented programming, which as far as I can tell OO means full employment for anal-retents. 3. I believe that doing something in 30 minutes in Perl with a big internal organization fight as opposed to 30 days in Java and some slime ball greasing around saying how cool everything is is worth it. 4. I am to lazy to learn Java. And what does it do for me anyway ? 5. >I have two levels of interest for sparking this discussion: > > self-interest -- Although I am a perl-loving job hunter, I do not want >programming to be my sole focus on my next position. Your answers will >help >*me* to pursue other possibilities. > > community-interest -- I see this list, and Perl at large, as a >community. Your answers will help *us* to understand who we are, what our >core interests and values are, and how we interact. > To paraphrase Hermann Goering ' when I hear the word "us" I reach for my rifle ' Ciao for now, Phil Neal > > > > > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org > Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL > Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address > For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest > Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ > > _________________________________________________________________ Get your FREE download of MSN Explorer at http://explorer.msn.com/intl.asp - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From asimjalis at yahoo.com Sat Sep 15 15:28:36 2001 From: asimjalis at yahoo.com (Asim Jalis) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: Who/What is a Perl User? In-Reply-To: Message-ID: <20010915202836.32167.qmail@web14207.mail.yahoo.com> Phillip Neal wrote: > > If you're reading this message, you > > self-identify as a "perl user". What does > > that mean to you? What do you do? How does > > Perl affect your life? > > It means : > > 1. I know a good thing when I see it. > > 2. I'm too old to change from procedural > programming to object oriented programming, > which as far as I can tell OO means full > employment for anal-retents. > > 3. I believe that doing something in 30 > minutes in Perl with a big internal > organization fight as opposed to 30 days in > Java and some slime ball greasing around > saying how cool everything is is worth it. > > 4. I am to lazy to learn Java. And what does > it do for me anyway ? Here are some more reasons for my being a perl-head: 5. CPAN 6. Damian's whacky talks Asim __________________________________________________ Terrorist Attacks on U.S. - How can you help? Donate cash, emergency relief information http://dailynews.yahoo.com/fc/US/Emergency_Information/ - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From cmeyer at helvella.org Sat Sep 15 18:04:09 2001 From: cmeyer at helvella.org (Colin Meyer) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: can't die() from XML::Parser handlers? In-Reply-To: References: Message-ID: <20010915160409.E18281@hobart.helvella.org> Hi, Jason, On Fri, Sep 14, 2001 at 09:48:53PM -0700, Jason Lamport wrote: > I've discovered what I consider very strange behaviour in XML::Parser: > > I'm using the 'Subs' style of parsing, like this: [ snipped some code ... ] > > sub table { > my $table_id; > > # ... some stuff to find the "id" attribute > > die( "table must have an id attribute" ) unless defined $table_id; > > # ... more stuff > } > > __END__ > > Now, it turned out that due to an error in the XML file, $table_id > was in fact undef inside table(). The weird thing is that the die() > call isn't causing the program to die: it just exits the handler but > keeps on going parsing the XML file as if nothing had happened. I > can only assume that XML::Parser is calling the handlers from inside > an eval block (which would make sense) and then ignoring the error > messages (which doesn't make any sense at all). Your guess is correct. Here's an excerpt of the XML::Parser code that shows it ignoring any error in your sub: ################################################################### package XML::Parser::Subs; $XML::Parser::Built_In_Styles{Subs} = 1; sub Start { no strict 'refs'; my $expat = shift; my $tag = shift; my $sub = $expat->{Pkg} . "::$tag"; eval { &$sub($expat, $tag, @_) }; } ################################################################### I am not sure if there is a reasonable explanation of why the error is being trapped and ignored. Errors seem to propagate in most other areas of that code. Perhaps you should provide the one or two line patch to Clark Cooper to fix this up. Personally I find it much easier to use one of the CPAN modules that provides a higher level of abstraction from the parsing for dealing with xml documents. For data extraction from xml, I find myself leaning towards XML::XPath. XPath, part of the XSLT specification, provides a regular-expression like wildcard language for extracting specific pieces of data from an xml document. For xml transformations, or filtering, I have been using XPathScript, or Template-Toolkit with XML::XPath. These CPAN modules typically provide decent error handling. There are many other great xml modules on the CPAN, for building dom or dom-style data structures, for wrapping database query returns in xml, and just about anything you can imagine to do with xml. Modules that support the SAX interface can be chained together in a pipeline fashion to create very complex xml transforms. Have fun, -C. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From jason at strangelight.com Sat Sep 15 19:20:17 2001 From: jason at strangelight.com (Jason Lamport) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: can't die() from XML::Parser handlers? In-Reply-To: <20010915160409.E18281@hobart.helvella.org> References: <20010915160409.E18281@hobart.helvella.org> Message-ID: At 4:04 PM -0700 9/15/01, Colin Meyer wrote: > >Your guess is correct. Here's an excerpt of the XML::Parser code that >shows it ignoring any error in your sub: > >################################################################### > >package XML::Parser::Subs; >$XML::Parser::Built_In_Styles{Subs} = 1; > >sub Start { > no strict 'refs'; > my $expat = shift; > my $tag = shift; > my $sub = $expat->{Pkg} . "::$tag"; > eval { &$sub($expat, $tag, @_) }; >} > >################################################################### Thanks for looking into it. That's an annoying feature, but at least now that I know about it, I can get down to devising the least-kludgey work-around. > >I am not sure if there is a reasonable explanation of why the error >is being trapped and ignored. The only thing I can think of is if Perl's "subroutine not found" error messages aren't standard (or standard enough) across different platforms, making it difficult or impossible to recognize that particular error in all cases. Ignoring the error when the subroutine simply doesn't exist makes sense, since you'll usually just want to ignore elements for which you haven't defined specific handlers. But if possible, the code really ought to make sure that this is in fact why the subroutine call failed. OTOH, if it's not possible to determine whether the call failed because of a non-defined subroutine, or for some other reason, then it seems like the Correct Thing To Do would be to let the error propagate: the user can always define an AUTOLOAD routine if they want to catch those subroutine calls. -jason - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From jason at strangelight.com Sat Sep 15 21:28:07 2001 From: jason at strangelight.com (Jason Lamport) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: XML::Parser empty vs. "empty" tags Message-ID: Yet another XML::Parser question. Is there any way, using XML::Parser, to differentiate between these two constructs: and ? Both generate Start and End events. I would have thought that the former construction would also generate a Char event (with the String argument set to '', i.e. the empty string) but it doesn't. In fact, I can't find *any* difference in the way XML::Parser processes the two different cases. This is a problem for me because my XML application, like Perl itself, makes a distinction between empty strings and null (or undef) values. It seems logical to me to make refer to the empty string and to make refer to an undefined value, but I can't do that if I have no way of differentiating between the two cases. -jason - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From james at banshee.com Sat Sep 15 21:54:47 2001 From: james at banshee.com (James Moore) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: XML::Parser empty vs. "empty" tags References: Message-ID: <3BA41477.7040108@banshee.com> I won't claim to be an XML expert, but what you're saying doesn't really fit with what I know. My understanding is that the two cases are supposed to be identical, and trying to distinguish between the two isn't the right way to go. Putting "xml represent null value" into Google came up with lots of hits, the most promising of which seemed to be (after only a few seconds of reading, so I could easily be off base): http://www.adodb.com/xml_result.asp?xml_id=32 Jason Lamport wrote: > Yet another XML::Parser question. Is there any way, using > XML::Parser, to differentiate between these two constructs: > > > > and > > > > ? > > James Moore james@banshee.com - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From cmeyer at helvella.org Sat Sep 15 21:58:19 2001 From: cmeyer at helvella.org (Colin Meyer) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: XML::Parser empty vs. "empty" tags In-Reply-To: References: Message-ID: <20010915195819.H18281@hobart.helvella.org> On Sat, Sep 15, 2001 at 07:28:07PM -0700, Jason Lamport wrote: > Yet another XML::Parser question. Is there any way, using > XML::Parser, to differentiate between these two constructs: > > > > and > > > > ? Simple answer: no. and are semantically equivalent according to the xml standard. However, I've seen some Perl module (XML::Simple?) that allowed to be preserved instead of being flattened. Have fun, -C. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From jason at strangelight.com Sat Sep 15 23:39:03 2001 From: jason at strangelight.com (Jason Lamport) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: XML::Parser empty vs. "empty" tags In-Reply-To: <20010915195819.H18281@hobart.helvella.org> References: <20010915195819.H18281@hobart.helvella.org> Message-ID: At 7:58 PM -0700 9/15/01, Colin Meyer wrote: > >Simple answer: no. and are semantically equivalent >according to the xml standard. Hmmm... do you (or anyone else following this thread) have a reference for where in the XML standard it says that and are semantically equivalent? That seems like the sort of thing that would be left up to the particular application. I don't recall the issue ever being mentioned in the O'Reilly book (which is where I generally go for my information on XML). At 7:54 PM -0700 9/15/01, James Moore wrote: >I won't claim to be an XML expert, but what you're saying doesn't >really fit with what I know. My understanding is that the two cases >are supposed to be identical, and trying to distinguish between the >two isn't the right way to go. Putting "xml represent null value" >into Google came up with lots of hits, the most promising of which >seemed to be (after only a few seconds of reading, so I could easily >be off base): > >http://www.adodb.com/xml_result.asp?xml_id=32 > The technique advocated here is to use an attribute, such as to represent null values. I had thought of that, of course. The reason I don't like this approach is that it makes possible constructions which are semantically ambiguous and/or contradictory: some text How should my application deal with this? The attribute says that the tag is null, but there's some text inside. Should it ignore the text and treat the tag as null (semantically equivalent to )? Should it accept the text and ignore the "null" attribute? Should it consider such a construction illegal? How should it enforce this rule? I would prefer to use my approach because it makes these contradictory cases syntactically impossible. -jason - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From ryanparr at nwlink.com Sun Sep 16 00:17:16 2001 From: ryanparr at nwlink.com (Ryan Parr) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: XML::Parser empty vs. "empty" tags In-Reply-To: Message-ID: <000401c13e6e$d9e1c0a0$159fcacf@jezebel> > The technique advocated here is to use an attribute, such as null="true"/> to represent null values. I had thought of that, of > course. The reason I don't > like this approach is that it makes possible constructions which are > semantically ambiguous and/or contradictory: > > some text > > How should my application deal with this? The attribute says that > the tag is null, but there's some text inside. Should it ignore the > text and treat the tag as null (semantically equivalent to null="true"/> )? Should it accept the text and ignore the "null" > attribute? Should it consider such a construction illegal? How > should it enforce this rule? You could simply *allow* the tag to be null, but not enforce it. If the tag contains text, then it's not null. If it doesn't then it is. There must certainly exist cases where the outputting application would need to put text into a tag that is usually null, otherwise you would always know what the null tags are going to be, and be able to deal accordingly. On the other hand, if the outputting application will know when a tag is null to output or when it should be an empty string as then the ambiguous constructs could safely be ignored, and you could always treat blah as a null. If there exists possible issues with expecting the application to always be right, then you would experience the same issue no matter how you do it. This extent of extra effort does, though, raise a question about the need for a difference between an empty string and a null value. -- Ryan Parr -----Original Message----- From: owner-spug-list@pm.org [mailto:owner-spug-list@pm.org]On Behalf Of Jason Lamport Sent: Saturday, September 15, 2001 9:39 PM To: Seattle Perl Users Group Subject: Re: SPUG: XML::Parser empty vs. "empty" tags At 7:58 PM -0700 9/15/01, Colin Meyer wrote: > >Simple answer: no. and are semantically equivalent >according to the xml standard. Hmmm... do you (or anyone else following this thread) have a reference for where in the XML standard it says that and are semantically equivalent? That seems like the sort of thing that would be left up to the particular application. I don't recall the issue ever being mentioned in the O'Reilly book (which is where I generally go for my information on XML). At 7:54 PM -0700 9/15/01, James Moore wrote: >I won't claim to be an XML expert, but what you're saying doesn't >really fit with what I know. My understanding is that the two cases >are supposed to be identical, and trying to distinguish between the >two isn't the right way to go. Putting "xml represent null value" >into Google came up with lots of hits, the most promising of which >seemed to be (after only a few seconds of reading, so I could easily >be off base): > >http://www.adodb.com/xml_result.asp?xml_id=32 > The technique advocated here is to use an attribute, such as to represent null values. I had thought of that, of course. The reason I don't like this approach is that it makes possible constructions which are semantically ambiguous and/or contradictory: some text How should my application deal with this? The attribute says that the tag is null, but there's some text inside. Should it ignore the text and treat the tag as null (semantically equivalent to )? Should it accept the text and ignore the "null" attribute? Should it consider such a construction illegal? How should it enforce this rule? I would prefer to use my approach because it makes these contradictory cases syntactically impossible. -jason - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From cmeyer at helvella.org Sun Sep 16 02:46:35 2001 From: cmeyer at helvella.org (Colin Meyer) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: XML::Parser empty vs. "empty" tags In-Reply-To: References: <20010915195819.H18281@hobart.helvella.org> Message-ID: <20010916004635.A19269@hobart.helvella.org> Hi, Jason, On Sat, Sep 15, 2001 at 09:39:03PM -0700, Jason Lamport wrote: > At 7:58 PM -0700 9/15/01, Colin Meyer wrote: > > > >Simple answer: no. and are semantically equivalent > >according to the xml standard. > > Hmmm... do you (or anyone else following this thread) have a > reference for where in the XML standard it says that and > are semantically equivalent? That seems like the sort of > thing that would be left up to the particular application. I don't > recall the issue ever being mentioned in the O'Reilly book (which is > where I generally go for my information on XML). Sure, the W3C recommended specification for XML 1.0, most easily viewable at: http://www.xml.com/axml/axml.html See section 3.1, the bit about Empty-Element Tags. Empty-element tags may be used for any element which has no content, whether or not it is declared using the keyword EMPTY. Because the two forms are semantically equivalent, it is up to the application to decide on what to do with them. Hence, you are at the mercy of whatever application you are using at the moment. There is the "interoperability recommendation" that the syntax only be used for tags that are declared in the DTD to have content type of EMPTY. This is a nice, but not required for xml applications. Maybe this discussion would be better on an xml list rather than SPUG, since we have left the realm of Perl. Have fun, -C. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From tim at consultix-inc.com Sun Sep 16 16:03:18 2001 From: tim at consultix-inc.com (Tim Maher/CONSULTIX) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: Cheap Perl Training, tomorrow! Message-ID: <20010916140318.A9567@timji.consultix.wa.com> SPUGsters, I've just had a last-minute cancellation for my "Minimal Perl" class running tomorrow in Kirkland, and since I've already done the materials repro and ordered the catering for that person, somebody else might as well consume those resources! (see http://www.consultix-inc.com/minperl.html) So I'll randomly pick one lucky contestant from those who respond to this email with their home phone number, and notify you by 11pm tonight (at the very latest) if you've been chosen. Full details of time, location, etc. will be provided to the lucky winner. However, there's one catch: you have to give me your credit card number, and agree to a charge of $25 (which is a very small percentage of the $330 charge that the others have paid, so no boasting about your discount in class). I levy this charge because I've found that many people getting completely free seats in such a class won't even bother to show up, and we end up with wasted seats that somebody else might have enjoyed; but amazingly enough, those who pay something *always* do show up! -Tim *=========================================================================* | Dr. Tim Maher, CEO, Consultix (206) 781-UNIX/8649; ask for FAX# | | Email: tim@consultix-inc.com Web: http://www.consultix-inc.com | | TIM MAHER: Unix/Perl DAMIAN CONWAY: OO Perl BRIAN INGERSON: Inline.pm | | CLASSES->Perl 9/18; Shell/Utilities 10/8; Int. Perl 10/22; Inline 11/6 | *=========================================================================* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From tim at consultix-inc.com Sun Sep 16 18:11:53 2001 From: tim at consultix-inc.com (Tim Maher/CONSULTIX) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: Cheap Perl Training, tomorrow! In-Reply-To: <20010916140318.A9567@timji.consultix.wa.com>; from Tim Maher/CONSULTIX on Sun, Sep 16, 2001 at 02:03:18PM -0700 References: <20010916140318.A9567@timji.consultix.wa.com> Message-ID: <20010916161153.D10473@timji.consultix.wa.com> On Sun, Sep 16, 2001 at 02:03:18PM -0700, Tim Maher/CONSULTIX wrote: > SPUGsters, > > I've just had a last-minute cancellation for my "Minimal Perl" > class running tomorrow in Kirkland, and since I've already done > the materials repro and ordered the catering for that person, > somebody else might as well consume those resources! > (see http://www.consultix-inc.com/minperl.html) One more point, for those of you too anxious to "enter the contest" to even read the prerequisites on the Web page: you've got to be handy with UNIX, and comfortable using vi, pico, or emacs for text editing. The hours are 9-4:30, near Bellevue Way and 520. -Tim *=========================================================================* | Dr. Tim Maher, CEO, Consultix (206) 781-UNIX/8649; ask for FAX# | | Email: tim@consultix-inc.com Web: http://www.consultix-inc.com | | TIM MAHER: Unix/Perl DAMIAN CONWAY: OO Perl BRIAN INGERSON: Inline.pm | | CLASSES->Perl 9/18; Shell/Utilities 10/8; Int. Perl 10/22; Inline 11/6 | *=========================================================================* > > So I'll randomly pick one lucky contestant from those who respond > to this email with their home phone number, and notify you by 11pm > tonight (at the very latest) if you've been chosen. Full details of > time, location, etc. will be provided to the lucky winner. > > However, there's one catch: you have to give me your credit > card number, and agree to a charge of $25 (which is a very small > percentage of the $330 charge that the others have paid, so no > boasting about your discount in class). I levy this charge because > I've found that many people getting completely free seats in such > a class won't even bother to show up, and we end up with wasted > seats that somebody else might have enjoyed; but amazingly enough, > those who pay something *always* do show up! > > -Tim > > *=========================================================================* > | Dr. Tim Maher, CEO, Consultix (206) 781-UNIX/8649; ask for FAX# | > | Email: tim@consultix-inc.com Web: http://www.consultix-inc.com | > | TIM MAHER: Unix/Perl DAMIAN CONWAY: OO Perl BRIAN INGERSON: Inline.pm | > | CLASSES->Perl 9/18; Shell/Utilities 10/8; Int. Perl 10/22; Inline 11/6 | > *=========================================================================* > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org > Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL > Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address > For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest > Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ > > -- *=========================================================================* | Dr. Tim Maher, CEO, Consultix (206) 781-UNIX/8649; ask for FAX# | | Email: tim@consultix-inc.com Web: http://www.consultix-inc.com | | TIM MAHER: Unix/Perl DAMIAN CONWAY: OO Perl BRIAN INGERSON: Inline.pm | | CLASSES->Perl 9/18; Shell/Utilities 10/8; Int. Perl 10/22; Inline 11/6 | *=========================================================================* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From MichaelRunningWolf at att.net Sun Sep 16 19:57:50 2001 From: MichaelRunningWolf at att.net (Michael R. Wolf) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: Re: Sept. Meeting: Lightning Strikes SPUG! Message-ID: <000501c13f19$2566a220$d4984e0c@default> -----Original Message----- From: Richard Anderson > but I >like the discipline of having to present the essential concepts behind the >module in 300 seconds. Me, too!! I think Benjamin Franklin once closed a letter with "Sorry this is so long, I didn't have time to make it shorter." As a Perl Trainer, and also as a Perl developer, I often use the "less is better" standard for my explainations or code. Michael - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From ced at carios2.ca.boeing.com Mon Sep 17 12:44:19 2001 From: ced at carios2.ca.boeing.com (ced@carios2.ca.boeing.com) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: can't die() from XML::Parser handlers? Message-ID: <200109171744.KAA10503@carios2.ca.boeing.com> I don't know XML and haven't tried either interface. However, if you're not heavily invested in XML::Parser, I do recall Dan Brian at Open Source discouraged writing directly to the XML::Parser API. He recommended XML::LibXML, a newer, reportedly faster interface based on the gnome libxml2 library. Rgds, -- Charles DeRykus > I've discovered what I consider very strange behaviour in XML::Parser: > > I'm using the 'Subs' style of parsing, like this: > > > use XML::Parser; > > # .... > > my $parser = new XML::Parser( > Style => 'Subs', > Pkg => 'my_Handlers', > ); > $parser->parsefile( $SOME_XML_FILE ); > #.... > > package my_Handlers; > > sub table { > my $table_id; > > # ... some stuff to find the "id" attribute > > die( "table must have an id attribute" ) unless defined $table_id; > > # ... more stuff > } > > __END__ > > Now, it turned out that due to an error in the XML file, $table_id > was in fact undef inside table(). The weird thing is that the die() > call isn't causing the program to die: it just exits the handler but > keeps on going parsing the XML file as if nothing had happened. I > can only assume that XML::Parser is calling the handlers from inside > an eval block (which would make sense) and then ignoring the error > messages (which doesn't make any sense at all). > > I don't get it. Is this a bug or some sort of feature that I'm > understanding? How can I get the handlers to raise a fatal > exception? (Of course I can think of plenty of kludgey work-arounds, > but nothing elegant.) > > > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From dcd at tc.fluke.com Mon Sep 17 15:17:13 2001 From: dcd at tc.fluke.com (David Dyck) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: Re: Sept. Meeting: Lightning Strikes SPUG! In-Reply-To: <000501c13f19$2566a220$d4984e0c@default> Message-ID: On Sun, 16 Sep 2001, Michael R. Wolf wrote: > I think Benjamin Franklin once closed a letter with "Sorry this is so long, > I didn't have time to make it shorter." http://www.cyberquotations.com/quotes8.htm. I have made this letter longer than usual because I lack the time to make it shorter.--Blaise Pascal or Blaise Pascal Je n'ai fait plus longue que parce que je n'ai par eu le loisir de la faire plus courte. variously translated, including I have made this letter longer than usual, only because I have not had the time to make it shorter. and I am sorry for the length of my letter, but I had not the time to write a short one. -- Lettres provinciales, letter 16 (1657) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From dleonard at dleonard.net Mon Sep 17 17:35:05 2001 From: dleonard at dleonard.net (Douglas Leonard) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: can't die() from XML::Parser handlers? In-Reply-To: <20010915160409.E18281@hobart.helvella.org> Message-ID: I'd recommend moving towards XML::LibXML rather than something such as XML::XPath if you are looking for reasonable speed of execution. I used XPath on my last project and have been regretting it ever since because it is so slow. The reiterative manner in which it builds relationships can severely impact performance on even relatively small datasets. -- On Sat, 15 Sep 2001, Colin Meyer wrote: > Personally I find it much easier to use one of the CPAN modules that > provides a higher level of abstraction from the parsing for dealing with > xml documents. For data extraction from xml, I find myself leaning > towards XML::XPath. XPath, part of the XSLT specification, provides a > regular-expression like wildcard language for extracting specific pieces > of data from an xml document. For xml transformations, or filtering, I > have been using XPathScript, or Template-Toolkit with XML::XPath. These > CPAN modules typically provide decent error handling. > > There are many other great xml modules on the CPAN, for building dom or > dom-style data structures, for wrapping database query returns in xml, > and just about anything you can imagine to do with xml. Modules that > support the SAX interface can be chained together in a pipeline fashion > to create very complex xml transforms. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From ih92 at columbia.edu Mon Sep 17 17:40:22 2001 From: ih92 at columbia.edu (Isabelle @ school) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: Re: Sept. Meeting: Lightning Strikes SPUG! References: Message-ID: <001a01c13fc9$bfa3e450$8f1ff7a5@PHLAIRS> Quoth David Dyck: > > Blaise Pascal > > Je n'ai fait plus longue que parce que je n'ai par eu le loisir de > la faire plus courte. Howdy all North-Westerners! Sorry about the nitpicking, but the above quotation does not mean much in French as it stands. Perhaps you meant: "J'ai ?crit une longue lettre parce que je n'ai pas eu le loisir de la faire plus courte." or: "Je vous ?cris une longue lettre parce que je n'ai pas le temps d'en ?crire une courte." Again, i don't mean to be a pedantic jerk-ess, but mister Pascal was a wonderful philosopher, one of our all-time national treasures, and I would hate for him to sound so inarticulate... ;) -isabelle missing my twin friends here in nyc - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From humbaba9 at yahoo.com Mon Sep 17 18:00:28 2001 From: humbaba9 at yahoo.com (Meryll Larkin) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: Reevaluation of Email Subject In-Reply-To: Message-ID: <20010917230028.46786.qmail@web12806.mail.yahoo.com> 9/17/01 I get lots of email, and I know you do, too because you are on this same list. I like to sort my email by subject so that I can follow threads, particularly when information about meetings or pieces of code is being passed around. I would like to request that when we are posting a response to a side comment rather than the main topic of an email, that we reevaluate the subject heading of that email, and send it with an appropriate subject for the contents of the email. If we want to help our comrade SPUGsters find the original reference, we can note the thread heading within the email for example: Subject was: Re: Sept. Meeting: Lightning Strikes SPUG! --- David Dyck wrote: > On Sun, 16 Sep 2001, Michael R. Wolf wrote: > > > I think Benjamin Franklin once closed a letter > with "Sorry this is so long, > > I didn't have time to make it shorter." > > http://www.cyberquotations.com/quotes8.htm. > I have made this letter longer than usual because I > lack the time to > make it shorter.--Blaise Pascal > > or > > > > Blaise Pascal > > Je n'ai fait plus longue que parce que je n'ai > par eu le loisir de > la faire plus courte. > > variously translated, including > > I have made this letter longer than usual, > only because I have > not had the time to make it shorter. > > and > > I am sorry for the length of my letter, but > I had not the time > to write a short one. > > -- Lettres provinciales, letter 16 (1657) > > __________________________________________________ Terrorist Attacks on U.S. - How can you help? Donate cash, emergency relief information http://dailynews.yahoo.com/fc/US/Emergency_Information/ - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From dcd at tc.fluke.com Mon Sep 17 18:01:36 2001 From: dcd at tc.fluke.com (David Dyck) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: Re: Sept. Meeting: Lightning Strikes SPUG! In-Reply-To: <001a01c13fc9$bfa3e450$8f1ff7a5@PHLAIRS> Message-ID: On Mon, 17 Sep 2001, Isabelle @ school wrote: > Quoth David Dyck: > > > > Blaise Pascal > > > > Je n'ai fait plus longue que parce que je n'ai par eu le loisir de > > la faire plus courte. I forgot to credit the web page where I copied this quote from http://public.logica.com/~stepneys/cyc/q/quotes.htm#p I don't know where they got the French text from. > Sorry about the nitpicking, but the above quotation does not mean much in > French as it stands. > Perhaps you meant: > "J'ai ?crit une longue lettre parce que je n'ai pas eu le loisir de la faire > plus courte." > or: > "Je vous ?cris une longue lettre parce que je n'ai pas le temps d'en ?crire > une courte." I must admit that the translations you provide seem to translate better using http://babel.altavista.com/tr - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From bill at celestial.com Mon Sep 17 18:56:59 2001 From: bill at celestial.com (Bill Campbell) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: Reevaluation of Email Subject In-Reply-To: <20010917230028.46786.qmail@web12806.mail.yahoo.com>; from humbaba9@yahoo.com on Mon, Sep 17, 2001 at 04:00:28PM -0700 References: <20010917230028.46786.qmail@web12806.mail.yahoo.com> Message-ID: <20010917165659.B20933@barryg.mi.celestial.com> On Mon, Sep 17, 2001 at 04:00:28PM -0700, Meryll Larkin wrote: >9/17/01 > >I get lots of email, and I know you do, too because >you are on this same list. > >I like to sort my email by subject so that I can >follow threads, particularly when information about >meetings or pieces of code is being passed around. Use mutt. It sorts nicely on threads. Bill -- INTERNET: bill@Celestial.COM Bill Campbell; Celestial Software LLC UUCP: camco!bill PO Box 820; 6641 E. Mercer Way FAX: (206) 232-9186 Mercer Island, WA 98040-0820; (206) 236-1676 URL: http://www.celestial.com/ ``Anyone who thinks Microsoft never does anything truly innovative isn't paying attention to the part of the company that pushes the state of its art: Microsoft's legal department.'' --Ed Foster, InfoWorld Gripe Line columnist - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From cmeyer at helvella.org Mon Sep 17 20:04:13 2001 From: cmeyer at helvella.org (Colin Meyer) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: XML::XPath, LibXML Re: [was can't die() ...] In-Reply-To: References: <20010915160409.E18281@hobart.helvella.org> Message-ID: <20010917180413.E23063@hobart.helvella.org> Hi, Douglas, On Mon, Sep 17, 2001 at 03:35:05PM -0700, Douglas Leonard wrote: > I'd recommend moving towards XML::LibXML rather than something such as > XML::XPath if you are looking for reasonable speed of execution. I used > XPath on my last project and have been regretting it ever since because it > is so slow. The reiterative manner in which it builds relationships can > severely impact performance on even relatively small datasets. I'd agree that XML::XPath is very slow at what it does. I should have added that I typically have used it for one-time processing, and not for dynamic requests. If your processing is cached with a system like AxKit, that can also help out on dynamic request times. Hmm, upon examining the documentation of XML::LibXML, I see that it supports XPath notation through the findnodes() method. It even seems that Matt Seargent made the API quite similar to XML::XPath, so porting should be easy. I'll have to give it a whirl. The only downside to XML::LibXML that I can see is that it doesn't yet support SAX. It seems that the underlying c library does support SAX. Have fun, -C. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From tuck at whistlingfish.net Mon Sep 17 20:50:16 2001 From: tuck at whistlingfish.net (Matt Tucker) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: Reevaluation of Email Subject In-Reply-To: <20010917165659.B20933@barryg.mi.celestial.com> References: <20010917230028.46786.qmail@web12806.mail.yahoo.com> <20010917165659.B20933@barryg.mi.celestial.com> Message-ID: <132510000.1000777816@benzene> -- Bill Campbell spake thusly: > On Mon, Sep 17, 2001 at 04:00:28PM -0700, Meryll Larkin wrote: >> 9/17/01 >> >> I get lots of email, and I know you do, too because >> you are on this same list. >> >> I like to sort my email by subject so that I can >> follow threads, particularly when information about >> meetings or pieces of code is being passed around. > > Use mutt. It sorts nicely on threads. I think the point was that he'd prefer for responses which branch off from the original topic to have a new subject (reflecting the new topic) so that they don't sort in the same thread. -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 232 bytes Desc: not available Url : http://mail.pm.org/archives/spug-list/attachments/20010917/e04f0510/attachment.bin From tim at consultix-inc.com Tue Sep 18 08:58:51 2001 From: tim at consultix-inc.com (Tim Maher/CONSULTIX) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: Tonight's Meeting: Exceptions and Lightning Message-ID: <20010918065851.A24679@timji.consultix.wa.com> SEPTEMBER SPUG MEETING Topics: Exception Handling, and Lightning Rounds Speaker: Jim Flanagan Collective Technologies http://www.colltech.com jimfl@colltech.com Time: July 17th, 2001 (Third Tuesday), 7pm-9pm Location: Union Bank of Cal., Madison & 5th, 5th Floor Mtg Room Cost: Free! The goals of the talk are to: * TRY to give a concise overview of the various methods and modules for error handling in Perl * THROW out some sample code * CATCH some SPUG'ers napping, and wake them up * FINALLY, describe ways of doing Java/C++ typed exception handling, and using the typed exception as a control structure LIGHTNING ROUNDS After Jim's talk, we'll let people talk for 5 minutes on anything Perlish they want, with a provision for projecting materials they bring on a CD or Windows (FAT/VFAT) formatted 3.5" floppy in PDF, PostScript, HTML, or ASCII form. Everybody should have 5 minutes worth of Perl stuff to share with the group, so all attendees are invited to participate! ======================================================== | Tim Maher, Ph.D. Tel: (206) 781-UNIX | | SPUG Founder & Leader Email: spug@halcyon.com | | Seattle Perl Users Group HTTP: zipcon.net/spug | ======================================================== - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From benjamin at golly.com Tue Sep 18 10:20:39 2001 From: benjamin at golly.com (Benjamin Franks) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: 5.6.1 vs. 5.005 Message-ID: <20010918152039.B3F1B36F9@sitemail.everyone.net> Perhaps this question is outdated, but I recently migrated one of my boxes from Linux2.4.x to FreeBSD4.3. I had been using perl5.6.1 flawlessly for quite some time now, but FreeBSD4.3 still relies on 5.005. My programs and the CPAN modules I use compile fine under 5.005. However, I'm wondering if there are any signficant performance/implementation differences between 5.005 and 5.6.1 that would motivate me to upgrade to 5.6.1. Anyone know if 5.6.1 performs better, uses resources better, or something like that? Thanks, --B. _____________________________________________________________ - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From cmeyer at helvella.org Tue Sep 18 11:41:26 2001 From: cmeyer at helvella.org (Colin Meyer) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: 5.6.1 vs. 5.005 In-Reply-To: <20010918152039.B3F1B36F9@sitemail.everyone.net> References: <20010918152039.B3F1B36F9@sitemail.everyone.net> Message-ID: <20010918094126.C25748@hobart.helvella.org> Hi, Benjamin, On Tue, Sep 18, 2001 at 08:20:39AM -0700, Benjamin Franks wrote: > Perhaps this question is outdated, but I recently migrated one of > my boxes from Linux2.4.x to FreeBSD4.3. I had been using > perl5.6.1 flawlessly for quite some time now, but FreeBSD4.3 > still relies on 5.005. My programs and the CPAN modules I use > compile fine under 5.005. > > However, I'm wondering if there are any signficant > performance/implementation differences between 5.005 and 5.6.1 that > would motivate me to upgrade to 5.6.1. Anyone know if 5.6.1 performs > better, uses resources better, or something like that? There are no significant improvements between Perl 5.005 and 5.6.1. The developers did that work just for fun. Just kidding. perldoc perldelta # for more information There are numerous bug and security fixes in 5.6.1. I'd hardly expect 5.6.1 to be any faster (slower if anything), but the fixes alone are worth it. Also, you'll definitely want to start using lvalue subs in your code. ;-) Have fun, -C. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From tim at consultix-inc.com Tue Sep 18 14:11:11 2001 From: tim at consultix-inc.com (Tim Maher/CONSULTIX) Date: Wed Aug 4 00:08:18 2004 Subject: SPUG: September Meeting, tonight! Message-ID: <20010918121111.A26565@timji.consultix.wa.com> Sorry about the cut-and-paste derived typo; as several sharp-eyed SPUGsters have noted, the September meeting should properly be held in September, not July. The corrected notice follows -Tim SEPTEMBER SPUG MEETING Topics: Exception Handling, and Lightning Rounds Speaker: Jim Flanagan Collective Technologies http://www.colltech.com jimfl@colltech.com Time: Sept. 18th, 2001 (Third Tuesday), 7pm-9pm Location: Union Bank of Cal., Madison & 5th, 5th Floor Mtg Room Cost: Free! The goals of the talk are to: * TRY to give a concise overview of the various methods and modules for error handling in Perl * THROW out some sample code * CATCH some SPUG'ers napping, and wake them up * FINALLY, describe ways of doing Java/C++ typed exception handling, and using the typed exception as a control structure LIGHTNING ROUNDS After Jim's talk, we'll let people talk for 5 minutes on anything Perlish they want, with a provision for projecting materials they bring on a CD or Windows (FAT/VFAT) formatted 3.5" floppy in PDF, PostScript, HTML, or ASCII form. Everybody should have 5 minutes worth of Perl stuff to share with the group, so all attendees are invited to participate! ======================================================== | Tim Maher, Ph.D. Tel: (206) 781-UNIX | | SPUG Founder & Leader Email: spug@halcyon.com | | Seattle Perl Users Group HTTP: zipcon.net/spug | ======================================================== - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From tuck at whistlingfish.net Tue Sep 18 21:15:38 2001 From: tuck at whistlingfish.net (Matt Tucker) Date: Wed Aug 4 00:08:19 2004 Subject: SPUG: 5.6.1 vs. 5.005 In-Reply-To: <20010918152039.B3F1B36F9@sitemail.everyone.net> References: <20010918152039.B3F1B36F9@sitemail.everyone.net> Message-ID: <167710000.1000865738@benzene> -- Benjamin Franks spake thusly: > Perhaps this question is outdated, but I recently migrated one of my > boxes from Linux2.4.x to FreeBSD4.3. I had been using perl5.6.1 > flawlessly for quite some time now, but FreeBSD4.3 still relies on > 5.005. My programs and the CPAN modules I use compile fine under > 5.005. > > However, I'm wondering if there are any signficant > performance/implementation differences between 5.005 and 5.6.1 that > would motivate me to upgrade to 5.6.1. Anyone know if 5.6.1 performs > better, uses resources better, or something like that? One of the biggest incentives for me is that 5.6 handles dying with objects instead of just strings, which allows for true exception handling. -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 232 bytes Desc: not available Url : http://mail.pm.org/archives/spug-list/attachments/20010918/d893abd0/attachment.bin From Alex.Leites at esca.com Wed Sep 19 11:51:46 2001 From: Alex.Leites at esca.com (Alex Leites) Date: Wed Aug 4 00:08:19 2004 Subject: SPUG: 5.6.1 vs. 5.005 In-Reply-To: <7D7B3E4294A7F37088256ACC000CA170.000CA1C688256ACC@test.alstom.com> Message-ID: <002901c1412b$5e181400$5d0916ac@esca.com> > > Perhaps this question is outdated, but I recently migrated one of my > > boxes from Linux2.4.x to FreeBSD4.3. I had been using perl5.6.1 > > flawlessly for quite some time now, but FreeBSD4.3 still relies on > > 5.005. My programs and the CPAN modules I use compile fine under > > 5.005. > > > > However, I'm wondering if there are any signficant > > performance/implementation differences between 5.005 and 5.6.1 that > > would motivate me to upgrade to 5.6.1. Anyone know if 5.6.1 performs > > better, uses resources better, or something like that? > > One of the biggest incentives for me is that 5.6 handles dying with > objects instead of just strings, which allows for true exception > handling. This is not really new in 5.6, 5.005 can do it as well, as experimental feature (thus not documented in 5.005 perlfunc): http://www.perldoc.com/perl5.005/pod/perldelta.html#Extended-support-for-exc eption-handling Another good link for Perl EH: http://perl.apache.org/guide/perl.html#Exception_Handling_for_mod_perl Also, for those interested in circular references etc. have a look at Weak References, experimental in 5.6: http://www.perldoc.com/perl5.6/pod/perldelta.html#Weak-references Alex - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From dleonard at dleonard.net Wed Sep 19 15:27:50 2001 From: dleonard at dleonard.net (Douglas Leonard) Date: Wed Aug 4 00:08:19 2004 Subject: SPUG: Re: XML::XPath, LibXML Re: [was can't die() ...] In-Reply-To: <20010917180413.E23063@hobart.helvella.org> Message-ID: I expect that Matt will have a full SAX implementation using libxml2 in the not so distant future. That guy has just been cranking out the code lately. There was a bunch of talk about it on the perl-xml list recently if I remember correctly. I'm planning on converting my XPath based app to LibXML sometime in the near future now that the XPath support has been added to LibXML. My initial tests showed a minimum of 4x speed increase comparing the two. I'm guessing that the average speed increase is actually even better than that. -- On Mon, 17 Sep 2001, Colin Meyer wrote: > Hi, Douglas, > > On Mon, Sep 17, 2001 at 03:35:05PM -0700, Douglas Leonard wrote: > > I'd recommend moving towards XML::LibXML rather than something such as > > XML::XPath if you are looking for reasonable speed of execution. I used > > XPath on my last project and have been regretting it ever since because it > > is so slow. The reiterative manner in which it builds relationships can > > severely impact performance on even relatively small datasets. > > I'd agree that XML::XPath is very slow at what it does. I should have > added that I typically have used it for one-time processing, and not for > dynamic requests. If your processing is cached with a system like > AxKit, that can also help out on dynamic request times. > > Hmm, upon examining the documentation of XML::LibXML, I see that it > supports XPath notation through the findnodes() method. It even > seems that Matt Seargent made the API quite similar to XML::XPath, > so porting should be easy. I'll have to give it a whirl. > > The only downside to XML::LibXML that I can see is that it doesn't yet > support SAX. It seems that the underlying c library does support SAX. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From tim at consultix-inc.com Sat Sep 22 12:09:59 2001 From: tim at consultix-inc.com (Tim Maher/CONSULTIX) Date: Wed Aug 4 00:08:19 2004 Subject: SPUG: Reminder: Washington JoB Fair Tuesday Message-ID: <20010922100959.C13528@timji.consultix.wa.com> * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * Reboot Washington: Re-energize your Tech Career Workshop Tuesday, September 25, 2001 Seattle Center, Northwest Rooms Have you or do you know someone in the tech industry who has recently been laid off and is having a difficult time finding a new job? Understanding that the job market has substantially changed and that tech industry professionals are facing new challenges in finding their next opportunity, the WSA and Seattlejobs.org have created a FREE one day workshop to assist Washington's unemployed technology workers in conducting an effective job search and creating a plan for career longevity. The Reboot Washington Workshop will feature: -Skill building sessions on resume development, interviewing techniques, career options, and how to evaluate opportunities -Information about how to reassess your career options vs. getting a job -Tools to help you through your job search SPACE IS LIMITED TO THE FIRST 1,000 PEOPLE. PRE-REGISTRATION IS REQUIRED TO ATTEND. For more information and to register visit: www.wsa.org/events/rebootwa **PLEASE FORWARD TO OTHERS WHO MIGHT BENEFIT FROM THIS EVENT** WSA -- www.wsa.org "Connecting Washington's Technology Leaders" Seattlejobs.org -- www.seattlejobs.org High Tech Jobs Network: "Real Companies, Real Jobs, All HighTech" ____________________ Please join the WSA in supporting the relief efforts by considering a donation to the American Red Cross www.seattleredcross.org or by donating blood at the Puget Sound Blood Center www.psbc.org. ========== - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ ----- End forwarded message ----- -- *=========================================================================* | Dr. Tim Maher, CEO, Consultix (206) 781-UNIX/8649; ask for FAX# | | Email: tim@consultix-inc.com Web: http://www.consultix-inc.com | | TIM MAHER: Unix/Perl DAMIAN CONWAY: OO Perl BRIAN INGERSON: Inline.pm | | CLASSES->Perl 9/18; Shell/Utilities 10/8; Int. Perl 10/22; Inline 11/6 | *=========================================================================* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - POST TO: spug-list@pm.org PROBLEMS: owner-spug-list@pm.org Subscriptions; Email to majordomo@pm.org: ACTION LIST EMAIL Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/ From Gina.C at educyber.org Fri Sep 28 08:45:28 2001 From: Gina.C at educyber.org (Gina.C@educyber.org) Date: Wed Aug 4 00:08:19 2004 Subject: SPUG: Conference calls/best quality/$.18 per minute! Message-ID: <1001655999.0707073097@mail.educyber.org> An HTML attachment was scrubbed... URL: http://mail.pm.org/archives/spug-list/attachments/20010928/4911fb54/attachment.htm From john.brittingham at attws.com Wed Sep 12 14:20:33 2001 From: john.brittingham at attws.com (Brittingham, John) Date: Wed Aug 4 00:08:19 2004 Subject: SPUG: insert Clob problems Message-ID: <23F6FCBAA611D511A74A00508BCFBE40025E1EEA@WA-MSG06> I get the following error when I try to insert a CLOB using DBI: Not a CODE reference at extract_ccml__to_oracle_db_testing.pl line 381, line 1. What am I doing wrong? 380 $sth = $dbh->prepare(qq{INSERT INTO t_opr_instr ( TITLE,DSCR,ORDER_SEQ,PRD_MODEL_SPEC_ITEM_ID ) VALUES (?, ?, ?, ?) }); 381 $sth->( 1, $subproc_heading[$n]); 382 $sth->( 2, $dscr, SQL_LONGVARCHAR); 383 $sth->( 3, $ord_seq); 384 $sth->( 4, $prd_model_spec_item_id); 385 $sth->execute ; -----Original Message----- From: Ruchi Varma [mailto:ruchi@synopsys.COM] Sent: Wednesday, September 12, 2001 11:08 AM To: dbi-users@perl.org Subject: dynamic loading... hello, I had previously sent a message, regarding dynamic loading, on this newsgroup since i had problems installing DBD on my Solaris Box. I hence used the perl executable, created by the DBI installation in the dir /remote/tools/ruchi/perl5/site_perl/5.005/DBI-1.20/, to install DBD and it worked. But now when i run my cgi script using the DBI and DBD i have installed, it gives me the same error concerning Dynamic Loading. I have attached my script to this message ..Please look at it and give me some comments on how to solve this problem. ---------------------------------------------------------------------------- ---------------------------- #!/remote/tools/ruchi/perl5/site_perl/5.005/DBI-1.20/perl -- -*-perl-*- # I also tried using /usr/local/bin/perl5.6 ..but no luck... use lib qw(/remote/tools/ruchi/perl5 /remote/tools/mysql /remote/tools/ruchi/perl5/site_perl); use DBI; use CGI; use CGI::Carp qw(fatalsToBrowser); $driver = "mysql"; $dsn = "DBI:$driver:database = ASSETLOCATOR"; $dbUserName = "root"; $dbPassword = "blah"; $dataIn = new CGI; $dataIn->header(); $requestType = $dataIn->param('requestType'); $sql = $dataIn->param('sql'); if ($sql eq "") { &printSearchForm(); exit; } else { $dbh = &connectToDB(); $dataObject = executeSQLStatement($sql); @dbRows = &getDBRows($dataObject); if ($sql =~ /^SELECT/i) { print qq! SQL Statement results
    !; foreach $rowReference (@dbRows) { foreach $columnReference (@$rowReference) { print qq!!; foreach $column (@$columnReference) { print qq!\n!; } print qq!!; } } print qq!
    $column
    !; exit; } else { print "Your SQL Query has been processed, please hit the back button and submit a SELECT to see the changes!"; } } sub connectToDB { return (DBI->connect($dsn, $dbUserName, $dbPassword)); } sub executeSQLStatement { my ($sql) = shift; $dataObject = $dbh->prepare($sql); $dataObject->execute(); return $dataObject; } sub getDBRows { my ($dataObject) = shift; return $dataObject->fetchall_arrayref(); } sub printSearchForm { print qq! Enter SQL
    Enter SQL Query
    !; } ---------------------------------------------------------------------------- --------------------- the dir /remote/tools/mysql has mysql installed the dir /remote/tools/ruchi/perl5/site_perl/5.005 has both DBD and DBI installed The error i get is Can't load module DBI, dynamic loading not available in this perl. (You may need to build a new perl executable which either supports dynamic loading or has the DBI module statically linked into it.) at /remote/tools/ruchi/perl5/site_perl/DBI.pm line 189 BEGIN failed--compilation aborted at /remote/tools/ruchi/perl5/site_perl/DBI.pm line 189. Compilation failed in require at query.cgi line 6. BEGIN failed--compilation aborted at query.cgi line 6. Since the problem appears due to the perl version i am using, which perl version should i use? As far as i know perl versions from 5.004 onwards support dynamic loading. But i am using version 5.6...and it still does not seem to work..:( kindly help.. thanks Ruchi