From Richard.Anderson at raycosoft.com Tue May 15 12:14:21 2001 From: Richard.Anderson at raycosoft.com (Richard Anderson) Date: Wed Aug 4 00:07:55 2004 Subject: SPUG: Segmentation Fault in mod_perl References: <0103121649050C.12751@avatar.cardomain.com> <001101c0ab6a$8fd11020$61affea9@ccokos> Message-ID: <020f01c0dd62$7d5611a0$2f88ddd1@aci2> I've done a bit of work on search engines, and I have a couple of thoughts: John pointed us toward a few potentential minor syntax problems. The out-of-memory problem will pop up quite a bit if you are searching a large internap site like yahoo, yellowpages.com etc. and the search returns a lot of results. Imagine seaching the NYC phonebook for the string Smith! One try might be to use a more memory-efficient XML parser routine. Damian is probably a good resource on this (are you out there, mate?). Another approach is to limit your search to returning the first 50 results you find. If the user wants more results, add a link at the top and bottom of the page that takes him to results 51-100, and so on In future versions, you might consider ranking the results based on some goodness-of-fit criterion based on the search string. Word stemming and language dependencies are some more goodies to add. Richard Anderson, Ph.D. www.unixscripts.com Perl / Oracle / Unix Richard.Anderson@raycosoft.com Raycosoft, LLC Seattle, WA, USA ----- Original Message ----- From: "John Cokos" To: "Jonathan Gardner" ; Sent: Monday, March 12, 2001 8:06 PM Subject: Re: SPUG: Segmentation Fault in mod_perl > You're barking right up my tree here .... I do CGI > work for a living, and work with mod_perl quite > a bit. > > That being said, let me ask you a few preliminary > questions: > > 1. The CGI Script that actually runs: is it mod_perl > compliant, in terms of exit status, "use strict" compatability, > etc? > > 2. How do you have httpd.conf setup to accept mod_perl > programs? > > 3. Sounds like you're going through a lot of machinations > to get XML output. Seems to me that a "from scratch" > solution, or one that's designed from the outset to > work within the confines of mod_perl would be better > suited than to try and shoehorn in something else. > > Generally, coredumps from mod_perl are the result of > "dirty" coding. A few variables out of place, or a bad > exit status can kill it pretty quickly. > > John > > ----- Original Message ----- > From: Jonathan Gardner > To: > Sent: Monday, March 12, 2001 4:16 PM > Subject: SPUG: Segmentation Fault in mod_perl > > > > Okay, run while you still can! > > > > We're running mod_perl on Apache. I am working on a module to > > allow people to search our pages. > > > > I got ht://dig. This is a fine piece of software, and it works great. Ht://dig > > has a program that works as a CGI script, and using the configuration files and > > templates, you can configure almost anything you would like to. > > > > We want to really customize stuff, really really customize it. So I figured > > we'd trick htdig to output XML, and use XML parser to parse it out, and then > > take that and convert it into hashes and arrays and scalars we can use to fully > > customize everything in Perl. > > > > Okay, so I wrote a module that takes the search parameters and returns a hash > > with all the results stored inside. I wrote a test script that runs from the > > command line and everything works beautifully. I am so happy I beam for joy! > > > > I plug it into Apache mod_perl and I get the dreaded segmentation fault. Not > > just once, over and over again, almost every time I try to run it. > > > > The only hint I have is that perhaps it is an out-of-memory problem. This would > > make sense. I have the program that consumes a lot of memory (the search), and > > XML::Parser trying to pack everything into 'Tree' style. But it doesn't fail > > during that - it fails when I start working on the tree with a couple of subs, > > so if it WAS a memory problem shouldn't it fail during the XML parsing or > > during the searching? How do I check to see how much memory the command-line > > script uses? > > > > What do I do to find out the problem, short of putting a "warn" > > between every line of code? How do I use the core dump - if it is useful at > > all? What rotting nuggets of useful knowledge are lodged in the wisdom > > teeth of the gurus, and could they use the toothbrush of the transfer of > > knowledge to reveal those morsels to me? :-) > > > > -- > > Jonathan Gardner > > gardner@sounddomain.com > > (425)820-2244 x123 > > > > > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > > 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://www.halcyon.com/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://www.halcyon.com/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://www.halcyon.com/spug/ From Richard.Anderson at raycosoft.com Tue May 15 12:31:08 2001 From: Richard.Anderson at raycosoft.com (Richard Anderson) Date: Wed Aug 4 00:07:55 2004 Subject: SPUG: Test Message-ID: <024601c0dd64$dbf9e770$2f88ddd1@aci2> - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From Richard.Anderson at raycosoft.com Wed May 16 20:28:44 2001 From: Richard.Anderson at raycosoft.com (Richard Anderson) Date: Wed Aug 4 00:07:56 2004 Subject: SPUG: Fw: Uniq in perl Message-ID: <00e901c0df01$607ed4e0$1b88ddd1@aci2> Does anyone have comments for Mike? Richard Anderson, Ph.D. www.unixscripts.com Perl / Oracle / Unix Richard.Anderson@raycosoft.com Raycosoft, LLC Seattle, WA, USA ----- Original Message ----- From: "Mike" To: "Richard Anderson" Sent: Friday, March 16, 2001 2:12 PM Subject: Uniq in perl > This is something I had sitting around. I didn't write it. Its a subroutine > that uniqs an array. I was just wondering if this is the best way to do it > or if anyone has any thing better. Thanks > > > ## Usage: &uniq( \@ARRAY ); > sub uniq { > my (@uwork, @unew, $uname); > @uwork = @{$_[0]}; > @uwork = sort( @uwork ); > @unew = ( shift @uwork ); > > foreach $uname ( @uwork ) { > @unew=( @unew, $uname) if ( $uname ne $unew[ -1 ] ); > } > > @{$_[0]}=@unew; > } > > :wq > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From Richard.Anderson at raycosoft.com Fri May 18 23:28:17 2001 From: Richard.Anderson at raycosoft.com (Richard Anderson) Date: Wed Aug 4 00:07:56 2004 Subject: SPUG: Re: Happy Birthday to SPUG! References: <20010317122537.A1423@timji.consultix.wa.com> Message-ID: <00fa01c0e01c$269ad000$1f88ddd1@aci2> At the risk of starting a flame war, I would like to differ with Tim's statement that "this is our group". Actually, Tim has veto power over all SPUG decisions, as he controls the web site and mailing list. Tim has exercised his veto power in the past. (I have transgressed his rules twice now and been flamed by him for doing so - details available upon request). I'm not saying that this is a bad thing, as no one is more qualified than Tim in terms of time, expertise and motivation to lead the group. However, if Tim wants others to begin putting significant amounts of effort into running the group, I think he should consider sharing some of the executive authority. Methods for doing this might include bylaws (which would legitimize our nebulous tax-ecempt status), electing a board of directors, etc., etc. This may not be appropriate for the free-wheeling nature of a Perl users group. I recall that the group that originally set up the www.perl.org web site fell apart after too much bickering on process. Perhaps SPUG could adopt the model of the group that spawned it three years ago: the Seattle Unix Users Group: a board of directors that meets once a month or quarterly at a time and place separated from the general meeting. This would keep the general meeting focussed on teaching / learning Perl, which is what the organization is all about, yet create a forum where those (like myself) with beefs can air them without disrupting the general meeting. Richard Anderson, Ph.D. www.unixscripts.com Perl / Java / Oracle / Unix Richard.Anderson@raycosoft.com Raycosoft, LLC Seattle, WA, USA ----- Original Message ----- From: "Tim Maher/CONSULTIX" To: Sent: Saturday, March 17, 2001 1:25 PM Subject: SPUG: Happy Birthday to SPUG! > SPUGsters, > > Just a quick note to commemorate the fact that this group was born > 3 years ago today, at a meeting at a community center in Ballard. > While contemplating my > life atop a smoke-spewing volcano in Java, Indonesia a few weeks > earlier, I had resolved to try to establish a local community > to support those using this fantastic language. I wasn't sure > if anybody would show up to that inaugural meeting, but as it > happened, about two dozen gave up their inalienable rights as > Americans to drink Green Beer and attended this meeting instead > (or perhaps before!). There are hundreds of Perl groups now, but > at the time, SPUG was only the sixth ever formed. (Incidentally, > this is why we've retained the SPUG moniker, despite the fact > that later groups came to be know by "Perl Monger" appellations.) > > Thanks to all those who've participated in making SPUG a success! > (Actually, by all accounts, we're the MOST successful and > productive Perl group on the planet.) In particular, please join > me in thanking Winstar Northwest Nexus, our web-page sponsor, > the folks at N2H2, especially Andy Sweger, who provide our meeting > space, and of course Damian Conway ("The Damian"), who frequently > ventures halfway across the globe to inspire and terrify us with > his strangely deranged yet magical Perl musings. > > For those of you who are interested in contributing to the group, > there are many ways to do so. We are always looking for speakers > for upcoming meetings who can teach us something about the > Perl language or describe interesting Perl applications they've > discovered or written, so if you'd like to make a presentation, > get in touch with me. I'm also looking for volunteers to help > with other tasks, like recruiting speakers, maintaining the web > page, coordinating job-ads, setting up additional internet-based > services, coordinating joint software development activities, etc. > > This is our group, and we can do whatever we want with it, so if > anybody has suggestions about improvements, especially if you're > willing to help implement them, let me know! > > Happy SPUG-Patrick's Day! > > ========================================================== > | Tim Maher, Ph.D. Tel: (206) 781-UNIX | > | SPUG Founder & Leader Email: spug@halcyon.com | > | Seattle Perl Users Group HTTP: www.halcyon.com/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://www.halcyon.com/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://www.halcyon.com/spug/ From tim at consultix-inc.com Wed May 2 14:54:02 2001 From: tim at consultix-inc.com (Tim Maher/CONSULTIX) Date: Wed Aug 4 00:08:01 2004 Subject: SPUG: Damian Classes in Boston,Portland Message-ID: <20010502125402.A13992@timji.consultix.wa.com> ----- Forwarded message from "Randal L. Schwartz" ----- To: groups@lists.panix.com Subject: Re: Damian Conway's Advanced OO Perl Class From: merlyn@stonehenge.com (Randal L. Schwartz) Date: 02 May 2001 12:36:36 -0700 In-Reply-To: <200105021911.PAA00262@home.sysarch.com.> User-Agent: Gnus/5.0808 (Gnus v5.8.8) Emacs/20.3 Precedence: bulk >>>>> "Uri" == Uri Guttman writes: Uri> please forward to your local pm lists. Uri> Advanced Object Oriented Perl Class Uri> in Boston, July 10-11 And if you're closer to the west coast, or need a break around some trees for a few days, see Damian is teaching the same 2-day OOP class the previous week, as well as his 1-day advanced parsing class, with a bundle price for both. And we're $4 cheaper -- "We will not be undersold!". :) -- Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095 ----- End forwarded message ----- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From oUiuCM9eY at home.com Sun May 6 08:22:59 2001 From: oUiuCM9eY at home.com (oUiuCM9eY@home.com) Date: Wed Aug 4 00:08:01 2004 Subject: No subject Message-ID: An HTML attachment was scrubbed... URL: http://mail.pm.org/archives/spug-list/attachments/20010506/361f5380/attachment.htm From ctornquist at dotcast.com Mon May 7 12:09:08 2001 From: ctornquist at dotcast.com (Cheryl Tornquist (Seattle)) Date: Wed Aug 4 00:08:01 2004 Subject: SPUG: Not reading to end of binary file on the PC Message-ID: Hi all, I have a chance to prove the usefulness of PERL in my new company, but I'm stumped on a problem and hope someone else may know the answer. I've written several successful PERL scripts for other companies but cannot find anything to solve this one in the Camel book, the O'reilly cookbook, Learning Perl on Win32, Perl for System Administration, the online docs or several other sources. I'm already using binmode. The script reads a proprietary binary file and gets different results between a sun/solaris environment (PERL ver. 5.6.0) and Windows 2000 environment (ActiveState build 522 and build 623). The code works perfectly on the Unix box (reads in all the file and formats it to a text file) but only part of the binary log file is read when using Win2000 (the required OS). A section of relevant pseudo code is below. When running on the PC, the script reads the 12 fixed bytes until the last line which returns only 11 bytes. This is when it encounts the hex code 001a 4e00 for the first time on all three sample files. 001a are the 11th and 12 bytes. read() returns up to and including the first 00 (ASCII NULL) but doesn't read the 1a as it should (ASCII substitute -- what does a substitute do?). What is happening here and how do I get the script to read the whole file on the Windows platform? Help is greatly appreciated. Cheryl Tornquist Oracle Developer Dotcast, Inc. #!/usr/bin/perl open (LOGENTRY, "< $binlog") or die "Can't open file $binlog -- $!.\n"; binmode (LOGENTRY); $template = "H8 B32 B16 B16"; undef $/; while (read LOGENTRY, $logentry, 12) { # read in the whole file and process unpack read the rest of the entry write to text file } close LOGENTRY; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From mark.johnston at pnl.gov Mon May 7 13:14:42 2001 From: mark.johnston at pnl.gov (Johnston, Mark) Date: Wed Aug 4 00:08:01 2004 Subject: SPUG: Not reading to end of binary file on the PC Message-ID: <228C5EBB26701542946C14D5205AE6D512F264@pnlmse08.pnl.gov> Cheryl, The ASCII character (hex) 1a, i.e. "\cZ", is traditionally the end-of-file marker for text files on the Windows platform. The file argument you are using ("< $binlog") may be forcing standard input to be used as the file handle. As far as I know, standard input and standard output always interpret their streams as text -- never as binary. --Mark -----Original Message----- From: Cheryl Tornquist (Seattle) [mailto:ctornquist@dotcast.com] Sent: Monday, May 07, 2001 10:09 AM To: 'spug-list@pm.org' Subject: SPUG: Not reading to end of binary file on the PC Hi all, I have a chance to prove the usefulness of PERL in my new company, but I'm stumped on a problem and hope someone else may know the answer. I've written several successful PERL scripts for other companies but cannot find anything to solve this one in the Camel book, the O'reilly cookbook, Learning Perl on Win32, Perl for System Administration, the online docs or several other sources. I'm already using binmode. The script reads a proprietary binary file and gets different results between a sun/solaris environment (PERL ver. 5.6.0) and Windows 2000 environment (ActiveState build 522 and build 623). The code works perfectly on the Unix box (reads in all the file and formats it to a text file) but only part of the binary log file is read when using Win2000 (the required OS). A section of relevant pseudo code is below. When running on the PC, the script reads the 12 fixed bytes until the last line which returns only 11 bytes. This is when it encounts the hex code 001a 4e00 for the first time on all three sample files. 001a are the 11th and 12 bytes. read() returns up to and including the first 00 (ASCII NULL) but doesn't read the 1a as it should (ASCII substitute -- what does a substitute do?). What is happening here and how do I get the script to read the whole file on the Windows platform? Help is greatly appreciated. Cheryl Tornquist Oracle Developer Dotcast, Inc. #!/usr/bin/perl open (LOGENTRY, "< $binlog") or die "Can't open file $binlog -- $!.\n"; binmode (LOGENTRY); $template = "H8 B32 B16 B16"; undef $/; while (read LOGENTRY, $logentry, 12) { # read in the whole file and process unpack read the rest of the entry write to text file } close LOGENTRY; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From TimBuckwalter at aol.com Mon May 7 13:31:13 2001 From: TimBuckwalter at aol.com (Tim Buckwalter) Date: Wed Aug 4 00:08:01 2004 Subject: SPUG: Not reading to end of binary file on the PC References: Message-ID: <3AF6E9F0.B760C83C@aol.com> I've also had problems on Windows machines with data containing \x1A -- that's a Ctrl-Z or EOF marker. Sorry, I can't remember how I fixed or avoided this problem: I normaly process only text data so I don't open files in binmode or use other than \n as the default input record delimiter. But I always strip out \x1A from text just to be safe. I remember discovering this problem outside of Perl: I was using "cat" to concatenate a bunch of files and the output file didn't add up. One of the files had an embedded \x1A and "cat" was reading that as an EOF marker. Tim Buckwalter Senior Language Engineer AOL Mobile (formerly Tegic) 1000 Dexter Ave N, Suite 300 Seattle, WA 98109-3574 206.268.7552 phone 206.343.7004 fax 206.343.7001 front desk TimBuckwalter@aol.com www.tegic.com "Cheryl Tornquist (Seattle)" wrote: > Hi all, > > I have a chance to prove the usefulness of PERL in my new company, but I'm > stumped on a problem and hope someone else may know the answer. I've > written several successful PERL scripts for other companies but cannot find > anything to solve this one in the Camel book, the O'reilly cookbook, > Learning Perl on Win32, Perl for System Administration, the online docs or > several other sources. I'm already using binmode. > > The script reads a proprietary binary file and gets different results > between a sun/solaris environment (PERL ver. 5.6.0) and Windows 2000 > environment (ActiveState build 522 and build 623). The code works perfectly > on the Unix box (reads in all the file and formats it to a text file) but > only part of the binary log file is read when using Win2000 (the required > OS). A section of relevant pseudo code is below. When running on the PC, > the script reads the 12 fixed bytes until the last line which returns only > 11 bytes. This is when it encounts the hex code 001a 4e00 for the first > time on all three sample files. 001a are the 11th and 12 bytes. read() > returns up to and including the first 00 (ASCII NULL) but doesn't read the > 1a as it should (ASCII substitute -- what does a substitute do?). > > What is happening here and how do I get the script to read the whole file on > the Windows platform? > > Help is greatly appreciated. > > Cheryl Tornquist > Oracle Developer > Dotcast, Inc. > > #!/usr/bin/perl > open (LOGENTRY, "< $binlog") or die "Can't open file $binlog -- $!.\n"; > binmode (LOGENTRY); > $template = "H8 B32 B16 B16"; > undef $/; > while (read LOGENTRY, $logentry, 12) { # read in the whole file and > process > unpack > read the rest of the entry > write to text file > } > close LOGENTRY; > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > 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://www.halcyon.com/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://www.halcyon.com/spug/ From greg at mccarroll.demon.co.uk Mon May 7 14:57:57 2001 From: greg at mccarroll.demon.co.uk (Greg McCarroll) Date: Wed Aug 4 00:08:01 2004 Subject: SPUG: Not reading to end of binary file on the PC Message-ID: <20010507205757.A15624@mccarroll.demon.co.uk> * Johnston, Mark (mark.johnston@pnl.gov) wrote: > Cheryl, > > you are using ("< $binlog") may be forcing standard input to be used as the file > handle. As far as I know, standard input and standard output always interpret > their streams as text -- never as binary. sorry, i don't have a solution for this as its been years since i did any programming on Win32 (and months since i did any Perl programming), however it sounds like sysread might help you out here, if what Mark says is true. Greg -- Greg McCarroll http://www.mccarroll.uklinux.net - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From creede at penguinsinthenight.com Mon May 7 15:38:19 2001 From: creede at penguinsinthenight.com (Creede Lambard) Date: Wed Aug 4 00:08:01 2004 Subject: SPUG: Not reading to end of binary file on the PC In-Reply-To: <20010507205757.A15624@mccarroll.demon.co.uk> References: <20010507205757.A15624@mccarroll.demon.co.uk> Message-ID: <01050713405900.24396@igor.penguinsinthenight.com> Have you tried using binmode? It's meant to fix problems such as this. open(FOO," * Johnston, Mark (mark.johnston@pnl.gov) wrote: > > Cheryl, > > > > you are using ("< $binlog") may be forcing standard input to be used as the file > > handle. As far as I know, standard input and standard output always interpret > > their streams as text -- never as binary. > > sorry, i don't have a solution for this as its been years since i did > any programming on Win32 (and months since i did any Perl programming), > however it sounds like sysread might help you out here, if what Mark says > is true. > > Greg > > -- > Greg McCarroll http://www.mccarroll.uklinux.net > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > 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://www.halcyon.com/spug/ -- Creede Lambard : Never rush a miracle man. fearless@io.com : You get rotten miracles. creede@penguinsinthenight.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://www.halcyon.com/spug/ From mcglk at artlogix.com Mon May 7 16:10:57 2001 From: mcglk at artlogix.com (Ken McGlothlen) Date: Wed Aug 4 00:08:01 2004 Subject: SPUG: Not reading to end of binary file on the PC In-Reply-To: "Cheryl Tornquist's message of "Mon, 7 May 2001 10:09:08 -0700" References: Message-ID: <87heywj25a.fsf@ralf.artlogix.com> "Cheryl Tornquist (Seattle)" writes: | I have a chance to prove the usefulness of PERL in my new company, but I'm | stumped on a problem and hope someone else may know the answer. [...] I'm | already using binmode. | | The script reads a proprietary binary file and gets different results between | a sun/solaris environment (PERL ver. 5.6.0) and Windows 2000 environment | (ActiveState build 522 and build 623). Well, that's the first problem. Windows has traditionally used ^Z for EOF. I suspect that that bit of cruft is still true in Win2K, and it might not be handled well by ActiveState Perl. (I don't know. I don't code for Windows anymore.) | The code works perfectly on the Unix box (reads in all the file and formats | it to a text file) but only part of the binary log file is read when using | Win2000 (the required OS). A section of relevant pseudo code is below. When | running on the PC, the script reads the 12 fixed bytes until the last line | which returns only 11 bytes. This is when it encounts the hex code 001a 4e00 | for the first time on all three sample files. Yep. \x1A is ^Z. Now, I don't have a Windows machine here to test this out on, but I suspect you need sysopen() and sysread() for this. Instead of: | #!/usr/bin/perl | open (LOGENTRY, "< $binlog") or die "Can't open file $binlog -- $!.\n"; | binmode (LOGENTRY); | $template = "H8 B32 B16 B16"; | undef $/; | while (read LOGENTRY, $logentry, 12) { # read in the whole file and | process | unpack | read the rest of the entry | write to text file | } | close LOGENTRY; you'd have to have something like this: #!/usr/bin/perl sysopen( LOGENTRY, $binlog, 0 ); my $template = "H8 B32 B16 B16"; while( sysread( LOGENTRY, $logentry, 12 ) ) { blah, blah, blah; } close( LOGENTRY ); This *should* work, but I can't guarantee it without a Windows box here to test it out on. Best of luck, though. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From ced at carios2.ca.boeing.com Mon May 7 16:40:27 2001 From: ced at carios2.ca.boeing.com (ced@carios2.ca.boeing.com) Date: Wed Aug 4 00:08:01 2004 Subject: SPUG: Not reading to end of binary file on the PC Message-ID: <200105072140.OAA10769@carios2.ca.boeing.com> > The script reads a proprietary binary file and gets different results > between a sun/solaris environment (PERL ver. 5.6.0) and Windows 2000 > environment (ActiveState build 522 and build 623). The code works perfectly > on the Unix box (reads in all the file and formats it to a text file) but > only part of the binary log file is read when using Win2000 (the required > OS). A section of relevant pseudo code is below. When running on the PC, > the script reads the 12 fixed bytes until the last line which returns only > 11 bytes. This is when it encounts the hex code 001a 4e00 for the first > time on all three sample files. 001a are the 11th and 12 bytes. read() > returns up to and including the first 00 (ASCII NULL) but doesn't read the > 1a as it should (ASCII substitute -- what does a substitute do?). > > What is happening here and how do I get the script to read the whole file on > the Windows platform? 'read' should be OK as long as not mixed with 'sysread' on the same filehandle. Also, make sure STDOUT is set to binmode too. Here's a bit of W2K code that reads past the EOF in "1a 4e00", as expected: #!perl -w use strict; open(B, ">./bin.tmp") or die $!; binmode B; my $packed = pack "I2", 0x001a, 0x4e00; print B $packed; open(B, "./bin.tmp") or die $!; binmode B; read B, my($buf), 12; binmode STDOUT; printf STDOUT "%x %x\n", unpack "I2" => $buf; __END__ hope this helps, -- Charles DeRykus - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From lagaly at eskimo.com Mon May 7 21:41:06 2001 From: lagaly at eskimo.com (Michael LaGaly) Date: Wed Aug 4 00:08:01 2004 Subject: SPUG: Dup'ing STDIN from DATA? References: Message-ID: <030b01c0d768$ca27a3e0$5dbb1840@lagaly01> For the Portability Corner, only the following will work on NT4+Perl 5.005: #! /usr/bin/perl -w *STDIN = *DATA ; # Iterating over <> hangs the script while () { # no arguments provided to script print "Found: $_"; } __DATA__ Stuff here THE FOLLOWING DOES NOT WORK ON NT4/PERL 5.00503: ************************************************ #! /usr/bin/perl -w # won't hang the script, but won't set STDIN as we want it open STDIN, "<&DATA"; #doesn't matter how you deal with iteration over STDIN, <> or while () { # no arguments provided to script print "HERE: $_"; } ************************************************ I'm getting the same results on a Linux SuSE setup with Perl 5.005.03. We're getting two issues: whether <> works on OS X with Perl Y, and which of two ways of setting STDIN to DATA works on OS X with Perl Y. ----- Original Message ----- From: Lauren Smith To: 'Tim Maher/CONSULTIX' ; spug-list@pm.org Sent: Thursday, March 15, 2001 11:20 AM Subject: RE: SPUG: Dup'ing STDIN from DATA? > -----Original Message----- > From: Tim Maher/CONSULTIX [mailto:tim@consultix-inc.com] > Sent: Thursday, March 15, 2001 9:58 AM > To: spug-list@pm.org > Subject: Re: SPUG: Dup'ing STDIN from DATA? > > For those put off by the AWKisness (-n usage) of the above program, > the following one doesn't work any better: > > #! /usr/bin/perl -w > > open STDIN, "<&DATA"; > > while (<>) { # no arguments provided to script > > } > > __DATA__ > Stuff here Works for me: #!perl -w open STDIN, "<&DATA"; while () { # no arguments provided to script s/.*? //; print $_; } __DATA__ Stuff here Output: here Is Perl making a distinction between "<>" and an explicit ""? Lauren - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/archives/spug-list/attachments/20010507/e652cf42/attachment.htm From jay at Scherrer.com Mon May 7 23:30:50 2001 From: jay at Scherrer.com (Jay Scherrer) Date: Wed Aug 4 00:08:01 2004 Subject: SPUG: Not reading to end of binary file on the PC References: Message-ID: <3AF7767A.B87E4982@scherrer.com> I have been using the stable win32 binary version of Perl 5.4 instead of activestate for this reason. So far my although simple parsing works from one machine to another, but I've found them to be totally compatible. Even when I use Perl::Tk. I wish they would update that dist. to Perl 5.6. Jay "Cheryl Tornquist (Seattle)" wrote: > Hi all, > > I have a chance to prove the usefulness of PERL in my new company, but I'm > stumped on a problem and hope someone else may know the answer. I've > written several successful PERL scripts for other companies but cannot find > anything to solve this one in the Camel book, the O'reilly cookbook, > Learning Perl on Win32, Perl for System Administration, the online docs or > several other sources. I'm already using binmode. > > The script reads a proprietary binary file and gets different results > between a sun/solaris environment (PERL ver. 5.6.0) and Windows 2000 > environment (ActiveState build 522 and build 623). The code works perfectly > on the Unix box (reads in all the file and formats it to a text file) but > only part of the binary log file is read when using Win2000 (the required > OS). A section of relevant pseudo code is below. When running on the PC, > the script reads the 12 fixed bytes until the last line which returns only > 11 bytes. This is when it encounts the hex code 001a 4e00 for the first > time on all three sample files. 001a are the 11th and 12 bytes. read() > returns up to and including the first 00 (ASCII NULL) but doesn't read the > 1a as it should (ASCII substitute -- what does a substitute do?). > > What is happening here and how do I get the script to read the whole file on > the Windows platform? > > Help is greatly appreciated. > > Cheryl Tornquist > Oracle Developer > Dotcast, Inc. > > #!/usr/bin/perl > open (LOGENTRY, "< $binlog") or die "Can't open file $binlog -- $!.\n"; > binmode (LOGENTRY); > $template = "H8 B32 B16 B16"; > undef $/; > while (read LOGENTRY, $logentry, 12) { # read in the whole file and > process > unpack > read the rest of the entry > write to text file > } > close LOGENTRY; > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > 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://www.halcyon.com/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://www.halcyon.com/spug/ From tim at consultix-inc.com Wed May 9 03:37:41 2001 From: tim at consultix-inc.com (Tim Maher/CONSULTIX) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: Volunteer for May Meeting? Message-ID: <20010509013741.A27471@timji.consultix.wa.com> SPUGsters, Next week's SPUG meeting (5/15, 7pm) is currently open for volunteer speakers, so anyone who wishes to make a presentation of 20 minutes or more on any Perlistic topic is welcome to submit a proposal to spug@halcyon.com! Possible topics could include: case histories of using Perl to solve interesting problems; discussion of recent Perl Journal articles; discussions of cool Perl Modules; tutorials on basic language features; reviews of Perl books (anybody read Lincoln Stein's "Network Programming" yet?), etc. All reasonable offers will be considered! 8-} Remember, SPUG is an "educational cooperative", which is why we never have salesman pitching products to us at meetings, and correspondingly why we always have to come up with our own entertainment! 8-} -Tim +======================================================+ | Tim Maher Email: Tim.Maher@timji.wa.com | | Slides of the World-> http://www.oz.net/~tmaher | +======================================================+ - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From asim_jalis at hp.com Wed May 9 16:14:41 2001 From: asim_jalis at hp.com (JALIS,ASIM (HP-FtCollins,ex1)) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: Extreme Programming Meeting This Thursday (May 10) Message-ID: EXTREME PROGRAMMING MEETING TOPIC At the next XP meeting Eric Adams (Lante) will moderate an open discussion of these issues: * How to sell XP to upper management. * What are some weaknesses of XP? What situations does XP not work in? * Does XP work better or worse if team members have diverse skill-sets? What if some people are weaker than others? If you have been grappling with these problems alone let the collective XP group brain help you solve them. If you have come up with neat solutions or related ideas share them with the rest of us. It should be a lively and yet content heavy meeting, with an emphasis on real experiences. DATE AND SCHEDULE Thursday, May 10, 2001 (second Thursday 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://www.halcyon.com/spug/ From ericj at cubesearch.com Wed May 9 18:03:14 2001 From: ericj at cubesearch.com (Eric Johanson) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: Extreme Programming Meeting This Thursday (May 10) In-Reply-To: Message-ID: This looks very interesting. It looks like a few of us from lockstream.com are going to crashing in... We are looking forward to meeting some of the folks from the SPUG list. How perl focused will this be? It sounds more like general XP stuff; but I could be wrong. Looks like a great meeting; I wish we had more advanced notice on it. TIA, Eric Johanson On Wed, 9 May 2001, JALIS,ASIM (HP-FtCollins,ex1) wrote: > EXTREME PROGRAMMING MEETING > > TOPIC > > At the next XP meeting Eric Adams (Lante) will moderate > an open discussion of these issues: > > * How to sell XP to upper management. > > * What are some weaknesses of XP? What situations does > XP not work in? > > * Does XP work better or worse if team members have > diverse skill-sets? What if some people are weaker > than others? > > If you have been grappling with these problems alone > let the collective XP group brain help you solve them. If > you have come up with neat solutions or related ideas share > them with the rest of us. > > It should be a lively and yet content heavy meeting, with > an emphasis on real experiences. > > DATE AND SCHEDULE > Thursday, May 10, 2001 (second Thursday 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://www.halcyon.com/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://www.halcyon.com/spug/ From asim_jalis at hp.com Wed May 9 20:14:05 2001 From: asim_jalis at hp.com (JALIS,ASIM (HP-FtCollins,ex1)) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: Extreme Programming Meeting This Thursday (May 10) Message-ID: The meeting should be pretty general and language agnostic. Extreme Programming can be easily practised in Perl using Test::Unit (on CPAN) for example. The issues that Eric is planning to raise for discussion should be relevant to Perl software companies as much as to other languages. So while not Perl-focussed it will be largely language-independent. Sorry about the lack of advance notice. I usually try to get these out sooner but there were some last minute glitches this time. We always meet second Thursday of the month at the same location so you can mark your calendars for future meetings. Also you can subscribe to the local extreme programming mailing-list by sending a blank message to extremeprogramming-seattle-subscribe@yahoogroups.com Looking forward to seeing you there. Asim -----Original Message----- From: Eric Johanson [mailto:ericj@cubesearch.com] Sent: Wednesday, May 09, 2001 4:03 PM To: 'spug-list@pm.org' Subject: Re: SPUG: Extreme Programming Meeting This Thursday (May 10) This looks very interesting. It looks like a few of us from lockstream.com are going to crashing in... We are looking forward to meeting some of the folks from the SPUG list. How perl focused will this be? It sounds more like general XP stuff; but I could be wrong. Looks like a great meeting; I wish we had more advanced notice on it. TIA, Eric Johanson On Wed, 9 May 2001, JALIS,ASIM (HP-FtCollins,ex1) wrote: > EXTREME PROGRAMMING MEETING > > TOPIC > > At the next XP meeting Eric Adams (Lante) will moderate > an open discussion of these issues: > > * How to sell XP to upper management. > > * What are some weaknesses of XP? What situations does > XP not work in? > > * Does XP work better or worse if team members have > diverse skill-sets? What if some people are weaker > than others? > > If you have been grappling with these problems alone > let the collective XP group brain help you solve them. If > you have come up with neat solutions or related ideas share > them with the rest of us. > > It should be a lively and yet content heavy meeting, with > an emphasis on real experiences. > > DATE AND SCHEDULE > Thursday, May 10, 2001 (second Thursday 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://www.halcyon.com/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://www.halcyon.com/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://www.halcyon.com/spug/ From cwilkes at singingfish.com Fri May 11 19:06:26 2001 From: cwilkes at singingfish.com (Chris Wilkes) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: File::Find dumping core Message-ID: I was playing around with File;:Find and wanted to find .cgi files while ignoring those under .snapshot directories. I came up with this simple routine. I hate doing @files as a Main:: variable but didn't see a way around it. It worked w/o the .snapshot ignoring line. When I added that in it does a seg fault. I'm using Perl 5.6. Any ideas on why this is happening? The problem only seems to show up if the pattern match is not the entire string (for some reason putting the entire pathname in for \.snapshot causes it to work). Also if you know of a better way to use File::Find please let me know. Chris #!/usr/bin/perl use File::Find; use strict; my @files; find (\&wanted, "./"); foreach (@files) { print "'$_'\n"; } sub wanted { next if ($File::Find::name =~ /\.snapshot/); -f && /\.cgi$/ && push @files, $File::Find::name; } - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From dpommert at bestnet.com Fri May 11 19:26:55 2001 From: dpommert at bestnet.com (Daniel Pommert) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: File::Find dumping core Message-ID: <8EC7FE6B4722D411848B00A0C9E11CBD8B923C@EXCH02> I believe that you should change next if ... to return if ... -- Daniel Pommert -----Original Message----- From: Chris Wilkes To: spug-list@pm.org Sent: 5/11/01 5:06 PM Subject: SPUG: File::Find dumping core . . . It worked w/o the .snapshot ignoring line. When I added that in it does a seg fault. . . . Chris #!/usr/bin/perl use File::Find; use strict; my @files; find (\&wanted, "./"); foreach (@files) { print "'$_'\n"; } sub wanted { next if ($File::Find::name =~ /\.snapshot/); ^^^^ -f && /\.cgi$/ && push @files, $File::Find::name; } - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/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://www.halcyon.com/spug/ From tim at consultix-inc.com Mon May 14 11:39:28 2001 From: tim at consultix-inc.com (Tim Maher/CONSULTIX) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: May Meeting: Pattern Matching & PerlTidy Message-ID: <20010514093928.A22484@timji.consultix.wa.com> Sorry about the late notice on this; I had hoped to have somebody else lined up for this meeting, but that didn't work out, so I'm pinch-hitting. -Tim - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - MAY SPUG TALK Title: Intermediate Pattern Matching Speaker: Tim Maher, Consultix (tim@consultix-inc.com) Time: May 15th, 2001 (Third Tuesday), 7pm-9pm Location: Union Bank of Cal., Madison & 5th, 5th Floor Mtg Room Cost: Free! ** NOTE: Meeting will start at 7, not 7:30 as in recent months - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - Tim Maher, who teaches classes on Perl, UNIX, and Linux topics through his company "Consultix", will discuss some intermediate-level pattern matching facilities in Perl. Covered topics will include Capturing Parentheses, Minimal and Maximal Matching, the Substitution and split Operators, Fuzzy Matching, Phonetic Matching, and Damian Conway's Text::Balanced module. He'll also demonstrate the capabilities of the new "PerlTidy" beautifier, which successfully uses Perl's pattern matching facilities to parse Perl source code. And that ain't easy! (As Tim knows from grueling personal experience.) ========================================================== | Tim Maher, Ph.D. Tel: (206) 781-UNIX | | SPUG Founder & Leader Email: spug@halcyon.com | | Seattle Perl Users Group HTTP: www.halcyon.com/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://www.halcyon.com/spug/ From briani at activestate.com Mon May 14 12:18:47 2001 From: briani at activestate.com (Brian Ingerson) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: May Meeting: Pattern Matching & PerlTidy References: <20010514093928.A22484@timji.consultix.wa.com> Message-ID: <3B001377.BDD9851F@activestate.com> Tim Maher/CONSULTIX wrote: > He'll also demonstrate the capabilities of the new "PerlTidy" > beautifier, which successfully uses Perl's pattern matching > facilities to parse Perl source code. And that ain't easy! > (As Tim knows from grueling personal experience.) Easy? That ain't even possible! I'm sure you have a very useful approximation though :) BTW, Is this puppy going to be available any time soon? I'd like to play with it. Cheers, Brian -- perl -le 'use Inline C=>q{SV*JAxH(char*x){return newSVpvf ("Just Another %s Hacker",x);}};print JAxH+Perl' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From tim at consultix-inc.com Mon May 14 13:01:44 2001 From: tim at consultix-inc.com (Tim Maher/CONSULTIX) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: May Meeting: Pattern Matching & PerlTidy In-Reply-To: <3B001377.BDD9851F@activestate.com>; from Brian Ingerson on Mon, May 14, 2001 at 10:18:47AM -0700 References: <20010514093928.A22484@timji.consultix.wa.com> <3B001377.BDD9851F@activestate.com> Message-ID: <20010514110144.D22956@timji.consultix.wa.com> On Mon, May 14, 2001 at 10:18:47AM -0700, Brian Ingerson wrote: > Tim Maher/CONSULTIX wrote: > > He'll also demonstrate the capabilities of the new "PerlTidy" > > beautifier, which successfully uses Perl's pattern matching > > facilities to parse Perl source code. And that ain't easy! > > (As Tim knows from grueling personal experience.) > > Easy? That ain't even possible! > > I'm sure you have a very useful approximation though :) > > BTW, Is this puppy going to be available any time soon? I'd like to play > with it. > > Cheers, Brian To clarify, the Perltidy program (http://perltidy.sourceforge.net) by Steve Hancock has been available since March; my program, pbeaut, is not available, and will probably remain in that state given that Perltidy has already become the de facto beautifying application, and is quite good. (I have been slowly reworking pbeaut to do most of its parsing via Text::Balanced methods, but have been too busy to make much headway on that project.) -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: Adv. Perl COLIN MEYER: Perl/DBI | | *We are currently scheduling On-Site Classes on UNIX and Perl topics!* | *==========================================================================* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From mathin at mathin.com Mon May 14 15:07:18 2001 From: mathin at mathin.com (Dan Ebert) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: geting variables from a 'required' file In-Reply-To: <20010514110144.D22956@timji.consultix.wa.com> Message-ID: I am wanting to set some global variables in a required file (so I can use different values on different servers without editing the main script code.) This code works fine with perl 5.6: use strict; our ($var1,$var2); require 'vars.pl'; print $var1, "\t", $var2, "\n"; but not with 5.005 and if I use 'my' instead of 'our' the values of $var1 and $var2 are NULL. Is there a way (with 5.005) to declare the variables so this will work and 'use strict' won't complain? Thanks! Dan. ----------------------------------------------------------- Optimists: the glass is half full. Pessimists: the glass is half empty. Engineers: the glass is twice as big as it needs to be. ----------------------------------------------------------- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From davidpa at avaya.com Mon May 14 15:13:13 2001 From: davidpa at avaya.com (Patterson, David S (Pat)) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: May Meeting: Pattern Matching & PerlTidy Message-ID: Nice tool! I wonder if it can be adapted to beautify C/C++? -Pat To clarify, the Perltidy program (http://perltidy.sourceforge.net) by Steve Hancock has been available since March; my program, pbeaut, is not available, and will probably remain in that state given that Perltidy has already become the de facto beautifying application, and is quite good. (I have been slowly reworking pbeaut to do most of its parsing via Text::Balanced methods, but have been too busy to make much headway on that project.) -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: Adv. Perl COLIN MEYER: Perl/DBI | | *We are currently scheduling On-Site Classes on UNIX and Perl topics!* | *==========================================================================* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/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://www.halcyon.com/spug/ From ced at carios2.ca.boeing.com Mon May 14 15:32:21 2001 From: ced at carios2.ca.boeing.com (ced@carios2.ca.boeing.com) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: geting variables from a 'required' file Message-ID: <200105142032.NAA19439@carios2.ca.boeing.com> >our ($var1,$var2); >require 'vars.pl'; > print $var1, "\t", $var2, "\n"; >but not with 5.005 and if I use 'my' instead of 'our' the values of $var1 >and $var2 are NULL. Is there a way (with 5.005) to declare the variables >so this will work and 'use strict' won't complain? use vars ($var1 $var2); (I think you'll have to use globals because of scoping problems); Hope this helps, -- Charles DeRykus - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From briani at activestate.com Mon May 14 16:00:17 2001 From: briani at activestate.com (Brian Ingerson) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: May Meeting: Pattern Matching & PerlTidy References: Message-ID: <3B004761.B0962325@activestate.com> "Patterson, David S (Pat)" wrote: > > Nice tool! I wonder if it can be adapted to beautify C/C++? Now *there's* an oxymoron :) > > -Pat > > To clarify, the Perltidy program (http://perltidy.sourceforge.net) > by Steve Hancock has been available since March; my program, > pbeaut, is not available, and will probably remain in that state > given that Perltidy has already become the de facto beautifying > application, and is quite good. (I have been slowly reworking > pbeaut to do most of its parsing via Text::Balanced methods, > but have been too busy to make much headway on that project.) > > -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: Adv. Perl COLIN MEYER: Perl/DBI | > | *We are currently scheduling On-Site Classes on UNIX and Perl topics!* | > *==========================================================================* > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > 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://www.halcyon.com/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://www.halcyon.com/spug/ -- perl -le 'use Inline C=>q{SV*JAxH(char*x){return newSVpvf ("Just Another %s Hacker",x);}};print JAxH+Perl' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From briani at activestate.com Mon May 14 16:00:45 2001 From: briani at activestate.com (Brian Ingerson) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: geting variables from a 'required' file References: Message-ID: <3B00477D.53FB96AC@activestate.com> Dan Ebert wrote: > > I am wanting to set some global variables in a required file (so I can use > different values on different servers without editing the main script > code.) This code works fine with perl 5.6: > > use strict; > > our ($var1,$var2); > require 'vars.pl'; > > print $var1, "\t", $var2, "\n"; > > but not with 5.005 and if I use 'my' instead of 'our' the values of $var1 > and $var2 are NULL. Is there a way (with 5.005) to declare the variables > so this will work and 'use strict' won't complain? use vars qw($var1 $var2); In fact, until we can get everyone to finally abandon 5.005 (which is *old*) you pretty much need to avoid using 'our' for shared code. Brian -- perl -le 'use Inline C=>q{SV*JAxH(char*x){return newSVpvf ("Just Another %s Hacker",x);}};print JAxH+Perl' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From benwa at ocentrix.net Mon May 14 16:09:31 2001 From: benwa at ocentrix.net (Ben Burnett) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: geting variables from a 'required' file Message-ID: <200105142109.f4EL9V003425@mail.ocentrix.net> Dan, AFAIK 'our' isn't available pre 5.6. What I do is put a "use vars" statement near the beginning of my scripts. for example: [ben@mail ben]$ cat mainscript.pl #!/usr/bin/perl use strict; use diagnostics; use vars('$ext_var'); # ^-- this creates a placeholder in this script's # (actually this package's) namespace for the variable I'm # bringing in from the requirescript. my $int_var = "I am internal."; require "./requirescript.pl"; print STDOUT "$int_var\n$ext_var\n"; [ben@mail ben]$ cat requirescript.pl $ext_var = "I am external."; # ^-- When you import this variable it should be scoped to # mainscript's name space. As long as you don't declare a # different package before you declare your variables in # this document [ben@mail ben]$ ./mainscript.pl I am internal. I am external. [ben@mail ben]$ This method can get unweildy if you have a bunch of variables that you need to bring in from required code as each variable needs to be added to the "use vars" statement. If I need to do this I usually just require one variable and make it a hash. That way I can move variables from the required file to the main script and back without having to update my "use vars" statement. -Ben ------- Original Copy ------- >Subject: SPUG: geting variables from a 'required' file >Date: 05/14/2001 1:07 PM >From: Dan Ebert >To: spug-list@pm.org > >I am wanting to set some global variables in a required file (so I can use >different values on different servers without editing the main script >code.) This code works fine with perl 5.6: > >use strict; > >our ($var1,$var2); >require 'vars.pl'; > >print $var1, "\t", $var2, "\n"; > >but not with 5.005 and if I use 'my' instead of 'our' the values of $var1 >and $var2 are NULL. Is there a way (with 5.005) to declare the variables >so this will work and 'use strict' won't complain? > >Thanks! > >Dan. >----------------------------------------------------------- >Optimists: the glass is half full. >Pessimists: the glass is half empty. >Engineers: the glass is twice as big as it needs to be. >----------------------------------------------------------- > > > > > > > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > 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://www.halcyon.com/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://www.halcyon.com/spug/ From davidpa at avaya.com Mon May 14 18:11:23 2001 From: davidpa at avaya.com (Patterson, David S (Pat)) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: May Meeting: Pattern Matching & PerlTidy Message-ID: Hmmm, the only reason I even get to write perl code at work is to create C/C++ development tools for our group... Don't suck ALL the oxygen out of the room! ;-) -Pat -----Original Message----- From: Brian Ingerson [mailto:briani@activestate.com] Sent: Monday, May 14, 2001 2:00 PM To: spug-list@pm.org Subject: Re: SPUG: May Meeting: Pattern Matching & PerlTidy "Patterson, David S (Pat)" wrote: > > Nice tool! I wonder if it can be adapted to beautify C/C++? Now *there's* an oxymoron :) > > -Pat > > To clarify, the Perltidy program (http://perltidy.sourceforge.net) > by Steve Hancock has been available since March; my program, > pbeaut, is not available, and will probably remain in that state > given that Perltidy has already become the de facto beautifying > application, and is quite good. (I have been slowly reworking > pbeaut to do most of its parsing via Text::Balanced methods, > but have been too busy to make much headway on that project.) > > -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: Adv. Perl COLIN MEYER: Perl/DBI | > | *We are currently scheduling On-Site Classes on UNIX and Perl topics!* | > *==========================================================================* > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > 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://www.halcyon.com/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://www.halcyon.com/spug/ -- perl -le 'use Inline C=>q{SV*JAxH(char*x){return newSVpvf ("Just Another %s Hacker",x);}};print JAxH+Perl' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/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://www.halcyon.com/spug/ From bobhilt at qwest.net Mon May 14 22:05:18 2001 From: bobhilt at qwest.net (Bob Hiltner) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: Fw: FREE designCorporate logo,web,year end reports r design from Award winning design Firm / monthly payments Message-ID: <003601c0dceb$df352040$4ed2b4d1@computer> This is perfect. A real gem of a recommendation! :-) But I might have to pass this time. So, some diabolical filter bypass? Maybe (he|they) could design a logo for SPUG!!!! ----- Original Message ----- From: reyjiurj@yahoo.com Sent: Monday, May 13, 2002 11:11 PM Subject: re: FREE designCorporate logo,web,year end reports r design from Award winning design Firm / monthly payments Hey, Here is the designers you need, these guy's are amassing, and cheap.They are giving away a free corporate logo design to any one who buys a 10 page website for $ 5,000 us. This could be a savings of up to $ 30,000 Don't worry they have excellent references apparently their a high end firm, six years in the biz ,so call them up and ask them for the free sample design. They won the award last year for best new entry on the internet, and I know for a fact they have a monthly payment plan, like so cheap, totally interest free so call them here's their number. 1-604- 623-4883 bye, Dave - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/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://www.halcyon.com/spug/ From lorraine.johnson at elektrobit.com Tue May 15 13:46:12 2001 From: lorraine.johnson at elektrobit.com (Lorraine Johnson) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: Checking for ASCII files Message-ID: <1CE5392373C4D311BB220008C733F5941E30A0@ebincrd01> Hello, I'm sure this is an old question, but I'm obviously looking in the wrong place for the answer.... We develop under Windows then copy source to an HP-UX box to build. (Long story.) We're writing a Unix Perl script to navigate the directories and convert the Windows newlines to Unix newlines. We know all the pieces but one: What is the best way to determine if a file is ASCII or non-ASCII? Thanks! Lorraine Lorraine Johnson Senior Software Engineer Elektrobit Inc. lorraine.johnson@elektrobit.com www.elektrobit-usa.com v: (425) 445-1898 f: (425) 376-0235 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From james at banshee.com Tue May 15 14:07:00 2001 From: james at banshee.com (James Moore) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: Checking for ASCII files References: <1CE5392373C4D311BB220008C733F5941E30A0@ebincrd01> Message-ID: <3B017E54.7050103@banshee.com> Consider calling the UNIX "file" utility (usually found in /usr/bin/file) from your script. Not a great idea if you've got huge numbers of files (since you're going to be forking and exec'ing too often), but you may find that some of the other facilities offered by file would be useful. James Moore james@banshee.com Lorraine Johnson wrote: > What is the best way to determine if a file > is ASCII or non-ASCII? > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From lorraine.johnson at elektrobit.com Tue May 15 14:16:02 2001 From: lorraine.johnson at elektrobit.com (Lorraine Johnson) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: Checking for ASCII files Message-ID: <1CE5392373C4D311BB220008C733F5941E30A3@ebincrd01> Thanks James, we'll give that a try. Our projects have a quite a few files. On my machine, Perl lists out at 2198 files and 296 folders. We tend to be about that size. Lorraine -----Original Message----- From: James Moore [mailto:james@banshee.com] Sent: Tuesday, May 15, 2001 12:07 PM To: Lorraine Johnson Cc: 'spug-list@pm.org' Subject: Re: SPUG: Checking for ASCII files Consider calling the UNIX "file" utility (usually found in /usr/bin/file) from your script. Not a great idea if you've got huge numbers of files (since you're going to be forking and exec'ing too often), but you may find that some of the other facilities offered by file would be useful. James Moore james@banshee.com Lorraine Johnson wrote: > What is the best way to determine if a file > is ASCII or non-ASCII? > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From cmeyer at helvella.org Tue May 15 14:38:23 2001 From: cmeyer at helvella.org (Colin Meyer) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: Checking for ASCII files In-Reply-To: <1CE5392373C4D311BB220008C733F5941E30A0@ebincrd01> References: <1CE5392373C4D311BB220008C733F5941E30A0@ebincrd01> Message-ID: <20010515123823.B5878@hobart.helvella.org> Lorraine, On Tue, May 15, 2001 at 11:46:12AM -0700, Lorraine Johnson wrote: > Hello, > > I'm sure this is an old question, but I'm obviously looking in the wrong > place for the answer.... We develop under Windows then copy source to an > HP-UX box to build. (Long story.) We're writing a Unix Perl script to > navigate the directories and convert the Windows newlines to Unix newlines. > We know all the pieces but one: What is the best way to determine if a file > is ASCII or non-ASCII? perl -e 'print $_, -T $_ ? " is" : " is not", " a text file\n" for (@ARGV)' The operative is the -T file test. See 'perldoc -f -T' for more info. -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://www.halcyon.com/spug/ From dpommert at bestnet.com Tue May 15 14:22:30 2001 From: dpommert at bestnet.com (Daniel Pommert) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: Checking for ASCII files Message-ID: <8EC7FE6B4722D411848B00A0C9E11CBD8B923E@EXCH02> On Unix, the standard way is with the file command. The file command looks through the file until it is able to come to some decision about what the file type is. If it is presented with a new file type (say, weird binary) it will say it is a text file. However, it uses a file called /etc/magic, which you can modify, to decide what a file is. So, if you have specific binary files and then everything else being text, run all of the binary files through the file command. If it correctly recognizes all of them, well and good. If not, educate the file command by modifying /etc/magic. After you have the file command working correctly, you can run it from Perl to ask whether the file is text or (known) binary. I expect that there are also Perl modules on CPAN that will use /etc/magic to examine and classify a file. However, I don't know the specifics. I hope this helps! -- Daniel Pommert -----Original Message----- From: Lorraine Johnson To: 'spug-list@pm.org' Sent: 5/15/2001 11:46 AM Subject: SPUG: Checking for ASCII files Hello, I'm sure this is an old question, but I'm obviously looking in the wrong place for the answer.... We develop under Windows then copy source to an HP-UX box to build. (Long story.) We're writing a Unix Perl script to navigate the directories and convert the Windows newlines to Unix newlines. We know all the pieces but one: What is the best way to determine if a file is ASCII or non-ASCII? Thanks! Lorraine Lorraine Johnson Senior Software Engineer Elektrobit Inc. lorraine.johnson@elektrobit.com www.elektrobit-usa.com v: (425) 445-1898 f: (425) 376-0235 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/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://www.halcyon.com/spug/ From davidpa at avaya.com Tue May 15 14:29:52 2001 From: davidpa at avaya.com (Patterson, David S (Pat)) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: Checking for ASCII files Message-ID: It couldn't be easier. Use the -t flag. Here's an example: if (-T $FN) # Text processing section: { // Text file; } else { // Non-text file } This works 99.9% of the time (pathological cases excepted)... --- "Stack Overflow: Too many pancakes..." D. S. "Pat" Patterson Software Engineer Avaya, Inc. 6464 185th Ave NE Redmond, WA 98052-6736 425-558-8672 888-501-4835 Pgr davidpa@avaya.com -----Original Message----- From: Lorraine Johnson [mailto:lorraine.johnson@elektrobit.com] Sent: Tuesday, May 15, 2001 11:46 AM To: 'spug-list@pm.org' Subject: SPUG: Checking for ASCII files Hello, I'm sure this is an old question, but I'm obviously looking in the wrong place for the answer.... We develop under Windows then copy source to an HP-UX box to build. (Long story.) We're writing a Unix Perl script to navigate the directories and convert the Windows newlines to Unix newlines. We know all the pieces but one: What is the best way to determine if a file is ASCII or non-ASCII? Thanks! Lorraine Lorraine Johnson Senior Software Engineer Elektrobit Inc. lorraine.johnson@elektrobit.com www.elektrobit-usa.com v: (425) 445-1898 f: (425) 376-0235 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/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://www.halcyon.com/spug/ From james at banshee.com Tue May 15 14:38:38 2001 From: james at banshee.com (James Moore) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: Checking for ASCII files References: <1CE5392373C4D311BB220008C733F5941E30A0@ebincrd01> Message-ID: <3B0185BE.60307@banshee.com> Most UNIX flavors today already have a utility that will convert MSDOS-format files to UNIX. See if your system has dos2unix. (Not that I want to discourage using perl, but don't reinvent the wheel if you don't have to.) Something like: find /where/you/put/files -exec file {} \; | grep text | sed -e "s/:.*//" | xargs dos2unix may solve your problem without needing to write code. James Moore james@banshee.com Lorraine Johnson wrote: > Hello, > > We're writing a Unix Perl script to > navigate the directories and convert the Windows newlines to Unix newlines. > We know all the pieces but one: What is the best way to determine if a file > is ASCII or non-ASCII? - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From daryn at marinated.org Tue May 15 13:40:22 2001 From: daryn at marinated.org (Daryn Nakhuda) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: Checking for ASCII files In-Reply-To: <1CE5392373C4D311BB220008C733F5941E30A0@ebincrd01> Message-ID: you can use the -T file test operator.. if (-T $file) On Tue, 15 May 2001, Lorraine Johnson wrote: > Hello, > > I'm sure this is an old question, but I'm obviously looking in the wrong > place for the answer.... We develop under Windows then copy source to an > HP-UX box to build. (Long story.) We're writing a Unix Perl script to > navigate the directories and convert the Windows newlines to Unix newlines. > We know all the pieces but one: What is the best way to determine if a file > is ASCII or non-ASCII? > > Thanks! > > Lorraine > > Lorraine Johnson > Senior Software Engineer > Elektrobit Inc. > lorraine.johnson@elektrobit.com > www.elektrobit-usa.com > v: (425) 445-1898 > f: (425) 376-0235 > > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > 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://www.halcyon.com/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://www.halcyon.com/spug/ From benwa at ocentrix.net Tue May 15 15:05:45 2001 From: benwa at ocentrix.net (Ben Burnett) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: Checking for ASCII files Message-ID: <200105152005.f4FK5jM16473@mail.ocentrix.net> Lorraine, I think you can user Perl's file test operators to do this. "-T" will tell you if a file is plain ASCII text. for example: ---(isascii.pl)--- #!/usr/bin/perl use strict; my $file = shift; if ( -T $file ) { print "$file is an ascii file.\n"; } else { print "$file is NOT an ascii file.\n"; } ---(/isascii.pl)--- This little script takes one filename as an argument and tells you if it is an ascii file. running it yeilds: [ben@va01 ben]$ perl isascii.pl myfile.txt myfile.txt is an ascii file. [ben@va01 ben]$ perl isascii.pl medup.jpg medup.jpg is NOT an ascii file. [ben@va01 ben]$ "perldoc -f -T" at the command line should tell you all about the file test operators. -Ben ------- Original Copy ------- >Subject: RE: SPUG: Checking for ASCII files >Date: 05/15/2001 12:16 PM >From: Lorraine Johnson >To: "'James Moore'" ,Lorraine Johnson >Cc: "'spug-list@pm.org'" >Thanks James, we'll give that a try. > >Our projects have a quite a few files. On my machine, Perl lists out at >2198 files and 296 folders. We tend to be about that size. > >Lorraine > >-----Original Message----- >From: James Moore [mailto:james@banshee.com] >Sent: Tuesday, May 15, 2001 12:07 PM >To: Lorraine Johnson >Cc: 'spug-list@pm.org' >Subject: Re: SPUG: Checking for ASCII files > > >Consider calling the UNIX "file" utility (usually found in >/usr/bin/file) from your script. Not a great idea if you've got huge >numbers of files (since you're going to be forking and exec'ing too >often), but you may find that some of the other facilities offered by >file would be useful. > >James Moore >james@banshee.com > >Lorraine Johnson wrote: > >> What is the best way to determine if a file >> is ASCII or non-ASCII? >> > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > 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://www.halcyon.com/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://www.halcyon.com/spug/ From tim at consultix-inc.com Tue May 15 16:41:24 2001 From: tim at consultix-inc.com (Tim Maher/CONSULTIX) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: Re: May Meeting on Patterns and Beautifiers Message-ID: <20010515144124.A4899@timji.consultix.wa.com> - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - MAY SPUG TALK Title: Intermediate Pattern Matching Speaker: Tim Maher, Consultix (tim@consultix-inc.com) Time: May 15th, 2001 (Third Tuesday), 7pm-9pm Location: Union Bank of Cal., Madison & 5th, 5th Floor Mtg Room Cost: Free! ** NOTE: Meeting will start at 7, not 7:30 as in recent months - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - Just a quick note: in reviewing the Pattern Matching material, I now realize that I've presented it in a previous SPUG meeting, probably over a year ago. Just thought I should make this clear, in an attempt to fend off complaints from disgruntled spectators upset about the re-run. 8-{ -Tim P.S. I'm still hoping to find some time to prepare a few demos of Perltidy, but so far I've been swamped with other things. If worse comes to worst, I'll just improvise something and cross my fingers. So please be prepared to cut me some slack! P.P.S. I'll be on the Geekcruise "Database Discovery" cruise during our June meeting, so I'm already "taking applications" for June speakers! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From andy at n2h2.com Tue May 15 23:38:40 2001 From: andy at n2h2.com (Andrew Sweger) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: Found: baseball cap at SPUG Message-ID: It looks like someone left a baseball-like cap at SPUG this evening. If that's you, please contact me to discuss terms (easy financing available). ;) -- Andrew B. Sweger | N2H2, Incorporated Manager, ICE Development Dept. | 900 Fourth Avenue, Suite 3600 Operations Division | Seattle WA 98164-1059 v=206.336.2947 f=206.336.1556 | http://www.n2h2.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://www.halcyon.com/spug/ From jeff.saenz at jpl.nasa.gov Wed May 16 13:04:39 2001 From: jeff.saenz at jpl.nasa.gov (Jeff Saenz) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: routine in foreach iterator Message-ID: <3B02C137.1000902@jpl.nasa.gov> can you use a routine that returns a list as the iterator for a loop. for example could i do this foreach (@{sub_call()}) { do something } or would I map the sub_call inside the paren's. jeff - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From asa.martin at attws.com Wed May 16 13:32:26 2001 From: asa.martin at attws.com (Martin, Asa) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: routine in foreach iterator Message-ID: <67FC0E2A32D0D31194500008C7CF2E6F05528C97@wa-msg09.nwest.attws.com> Don't use an @. Just use foreach (sub_call()) and it expands to a list automatically. Assuming sub_call returns a list of some kind. - Asa > ---------- > From: Jeff Saenz[SMTP:jeff.saenz@jpl.nasa.gov] > Sent: Wednesday, May 16, 2001 11:04 AM > To: spug-list > Subject: SPUG: routine in foreach iterator > > can you use a routine that returns a list as the iterator for a loop. > for example could i do this > > foreach (@{sub_call()}) { > do something > } > > or would I map the sub_call inside the paren's. > > jeff > > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > 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://www.halcyon.com/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://www.halcyon.com/spug/ From james at banshee.com Wed May 16 13:35:39 2001 From: james at banshee.com (James Moore) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: routine in foreach iterator References: <3B02C137.1000902@jpl.nasa.gov> Message-ID: <3B02C87B.4070202@banshee.com> Not sure what you mean by "map the sub_call", but this sort of thing is normal: for my $x (foo ()) { print $x; } sub foo { return (1,2,3); } Since foo() is being called in a list context the list that foo returns will be used for the for loop. I'm not sure what you're trying to accomplish with @{}. Braces {} are going to create a reference to an anonymous hash, and adding a @ is going to get you a syntax error. - James Moore Jeff Saenz wrote: > can you use a routine that returns a list as the iterator for a loop. > for example could i do this > > foreach (@{sub_call()}) { > do something > } > > or would I map the sub_call inside the paren's. > > jeff - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From rowdenw at eskimo.com Wed May 16 13:45:05 2001 From: rowdenw at eskimo.com (William Rowden) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: routine in foreach iterator In-Reply-To: <3B02C87B.4070202@banshee.com> Message-ID: Today, James Moore wrote: > I'm not sure what you're trying to accomplish with @{}. If one has an array reference, rather than the array itself, one gets the array via @{$arrayref}. Does the subroutine return an array or a reference to an array? > Jeff Saenz wrote: > > for example could i do this > > > > foreach (@{sub_call()}) { > > do something > > } -- -William PGP key: http://www.eskimo.com/~rowdenw/crypt/pgp/rowdenw.asc Fingerprint: 00C9 6887 F073 A261 CE06 EC88 7D75 13BD 1221 2BA9 I like the way you talk. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From wildwood_players at yahoo.com Thu May 17 11:00:10 2001 From: wildwood_players at yahoo.com (Richard Wood) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: PDF to HTML, or PDF extract Message-ID: <20010517160010.71085.qmail@web11503.mail.yahoo.com> I have a 1248 page pdf file. I am only interested in 740 pages of the file (pp. 142 - 931). These pages contain definitions of roughly 600 alarm messages. The alarms are all bookmarked. I would like to do one of the following: link directly to each specific bookmarked alarm (I know you can link to a specific page by using: somefile.pdf#page=142 but can this be done with bookmarks?) convert the entire document to HTML extract the 740 pages into a smaller pdf file extract each bookmarked section into an individual pdf or html file. It seems to me that the perl world would be amuck with pdf tools since perl is such a wonderful pattern recognition and text manipulation language. But, I have looked on CPAN, Monks, and the internet in general and have not found any tools to do this. I know that adobe has a site where you can convert pdf to html and I have tried it. But there appears to be some file size limitation somewhere either on their site or on my mail server that keeps this from working. The file is roughly 6-Meg. Any ideas? Regards, Rich Wood ===== Richard O. Wood Wildwood IT Consultants, Inc. wildwood_players@yahoo.com 425.941.9437 __________________________________________________ Do You Yahoo!? Yahoo! Auctions - buy the things you want at great prices http://auctions.yahoo.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://www.halcyon.com/spug/ From lorraine.johnson at elektrobit.com Thu May 17 11:46:31 2001 From: lorraine.johnson at elektrobit.com (Lorraine Johnson) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: PDF to HTML, or PDF extract Message-ID: <1CE5392373C4D311BB220008C733F5941E30C1@ebincrd01> (Maybe a stupid question, but...) Can you get the file in its original format? The pdf format is usually an end/output product, not meant to be modified. Other than that, maybe Acrobat (not Acrobat Reader) will allow you to grab text? L -----Original Message----- From: Richard Wood [mailto:wildwood_players@yahoo.com] Sent: Thursday, May 17, 2001 9:00 AM To: Seattle Perl Users Group Subject: SPUG: PDF to HTML, or PDF extract I have a 1248 page pdf file. I am only interested in 740 pages of the file (pp. 142 - 931). These pages contain definitions of roughly 600 alarm messages. The alarms are all bookmarked. I would like to do one of the following: link directly to each specific bookmarked alarm (I know you can link to a specific page by using: somefile.pdf#page=142 but can this be done with bookmarks?) convert the entire document to HTML extract the 740 pages into a smaller pdf file extract each bookmarked section into an individual pdf or html file. It seems to me that the perl world would be amuck with pdf tools since perl is such a wonderful pattern recognition and text manipulation language. But, I have looked on CPAN, Monks, and the internet in general and have not found any tools to do this. I know that adobe has a site where you can convert pdf to html and I have tried it. But there appears to be some file size limitation somewhere either on their site or on my mail server that keeps this from working. The file is roughly 6-Meg. Any ideas? Regards, Rich Wood ===== Richard O. Wood Wildwood IT Consultants, Inc. wildwood_players@yahoo.com 425.941.9437 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From Sean at DigiDot.com Thu May 17 12:38:07 2001 From: Sean at DigiDot.com (Sean Ruddy) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: PDF to HTML, or PDF extract In-Reply-To: <1CE5392373C4D311BB220008C733F5941E30C1@ebincrd01> Message-ID: You can select the text tool from the toolbar and pull them out manually with the reader as long as it is not protected (locked) in which case no tool will be able to easily grab text (some reason it took me a very long time to figure that out). A company that I used to work for http://www.verity.com has a tool called Export which will do a good conversion of a > 6 mg pdf (or 249 other mime types) into html or even XML now. It cost a bunch though... Sean Ruddy 206-369-7188 -----Original Message----- From: owner-spug-list@pm.org [mailto:owner-spug-list@pm.org]On Behalf Of Lorraine Johnson Sent: Thursday, May 17, 2001 9:47 AM To: Seattle Perl Users Group Subject: RE: SPUG: PDF to HTML, or PDF extract (Maybe a stupid question, but...) Can you get the file in its original format? The pdf format is usually an end/output product, not meant to be modified. Other than that, maybe Acrobat (not Acrobat Reader) will allow you to grab text? L -----Original Message----- From: Richard Wood [mailto:wildwood_players@yahoo.com] Sent: Thursday, May 17, 2001 9:00 AM To: Seattle Perl Users Group Subject: SPUG: PDF to HTML, or PDF extract I have a 1248 page pdf file. I am only interested in 740 pages of the file (pp. 142 - 931). These pages contain definitions of roughly 600 alarm messages. The alarms are all bookmarked. I would like to do one of the following: link directly to each specific bookmarked alarm (I know you can link to a specific page by using: somefile.pdf#page=142 but can this be done with bookmarks?) convert the entire document to HTML extract the 740 pages into a smaller pdf file extract each bookmarked section into an individual pdf or html file. It seems to me that the perl world would be amuck with pdf tools since perl is such a wonderful pattern recognition and text manipulation language. But, I have looked on CPAN, Monks, and the internet in general and have not found any tools to do this. I know that adobe has a site where you can convert pdf to html and I have tried it. But there appears to be some file size limitation somewhere either on their site or on my mail server that keeps this from working. The file is roughly 6-Meg. Any ideas? Regards, Rich Wood ===== Richard O. Wood Wildwood IT Consultants, Inc. wildwood_players@yahoo.com 425.941.9437 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/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://www.halcyon.com/spug/ From johnl at meer.net Thu May 17 15:00:48 2001 From: johnl at meer.net (John Labovitz) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: PDF to HTML, or PDF extract In-Reply-To: <20010517160010.71085.qmail@web11503.mail.yahoo.com> Message-ID: <20010517200046.LTJM570.femail13.sdc1.sfba.home.com@localhost> On Thursday, May 17, 2001, at 09:00 AM, Richard Wood wrote: > But, I have looked on CPAN, Monks, and the internet in > general and have not found any tools to do this. Really? I looked for "PDF" on seach.cpan.org, and found lots and lots of stuff. However, it does look rather complex and redundant (many modules do similar things), and I'm not sure whether it would be worthwhile to learn it all in order to be able to do what you're doing (especially if it's a one-off thing). Here's the search URL, just in case: http://search.cpan.org/search?mode=module&query=pdf Best of luck. john - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From wildwood_players at yahoo.com Thu May 17 15:47:20 2001 From: wildwood_players at yahoo.com (Richard Wood) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: PDF to HTML, or PDF extract In-Reply-To: <20010517200046.LTJM570.femail13.sdc1.sfba.home.com@localhost> Message-ID: <20010517204720.98489.qmail@web11508.mail.yahoo.com> It is true that the searches for PDF on the internet and in places like CPAN bring up many hits. But in reading through their documentation, it appears that most (all that I have found) only do things like is_pdf: verify that a file is a pdf file pdf_version: get the pdf version pdf_pages: how many pages but nothing to really do an extract, at least not that I read from the doc on the web. I will pull down the module and see if there is more there than what is documented. There is a reference to a method called "doprint" which sounds like it may have some power. Rich Wood --- John Labovitz wrote: > On Thursday, May 17, 2001, at 09:00 AM, Richard > Wood wrote: > > But, I have looked on CPAN, Monks, and the > internet in > > general and have not found any tools to do this. > > Really? I looked for "PDF" on seach.cpan.org, and > found lots and lots > of stuff. However, it does look rather complex and > redundant (many > modules do similar things), and I'm not sure whether > it would be > worthwhile to learn it all in order to be able to do > what you're doing > (especially if it's a one-off thing). > > Here's the search URL, just in case: > > http://search.cpan.org/search?mode=module&query=pdf > > Best of luck. > > john > > - - - - - - - - - - - - - - - - - - - - - - - - - - > - - - - - - - - - - - > 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://www.halcyon.com/spug/ > > ===== Richard O. Wood Wildwood IT Consultants, Inc. wildwood_players@yahoo.com 425.941.9437 __________________________________________________ Do You Yahoo!? Yahoo! Auctions - buy the things you want at great prices http://auctions.yahoo.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://www.halcyon.com/spug/ From wildwood_players at yahoo.com Thu May 17 15:51:51 2001 From: wildwood_players at yahoo.com (Richard Wood) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: PDF to HTML, or PDF extract In-Reply-To: Message-ID: <20010517205151.4757.qmail@web11501.mail.yahoo.com> Sean, Thanks for the lead on Verity. I took a look at their site. You seem to be correct on the $$, even for a big company it is $$. Also their HTML Export tool doesn't list PDF as a format that it converts, but I think the $$ would make that a mute point anyway. In the meantime, I have copy and pasted the 740 pages into a word processor and converted it to html (Unfortunately it was heavily formatted). Now I just have to process the html to put in the links. Thanks to everyone for their ideas. Regards, Rich Wood --- Sean Ruddy wrote: > You can select the text tool from the toolbar and > pull them out manually > with the reader as long as it is not protected > (locked) in which case no > tool will be able to easily grab text (some reason > it took me a very long > time to figure that out). > > A company that I used to work for > http://www.verity.com has a tool called > Export which will do a good conversion of a > 6 mg > pdf (or 249 other mime > types) into html or even XML now. It cost a bunch > though... > > Sean Ruddy > 206-369-7188 > > -----Original Message----- > From: owner-spug-list@pm.org > [mailto:owner-spug-list@pm.org]On Behalf Of > Lorraine Johnson > Sent: Thursday, May 17, 2001 9:47 AM > To: Seattle Perl Users Group > Subject: RE: SPUG: PDF to HTML, or PDF extract > > > (Maybe a stupid question, but...) Can you get the > file in its original > format? The pdf format is usually an end/output > product, not meant to be > modified. > > Other than that, maybe Acrobat (not Acrobat Reader) > will allow you to grab > text? > > L > > -----Original Message----- > From: Richard Wood > [mailto:wildwood_players@yahoo.com] > Sent: Thursday, May 17, 2001 9:00 AM > To: Seattle Perl Users Group > Subject: SPUG: PDF to HTML, or PDF extract > > > I have a 1248 page pdf file. I am only interested > in > 740 pages of the file (pp. 142 - 931). These pages > contain definitions of roughly 600 alarm messages. > The alarms are all bookmarked. I would like to do > one > of the following: > > link directly to each specific bookmarked alarm > > (I know you can link to a specific page by using: > somefile.pdf#page=142 but can this be done with > bookmarks?) > > convert the entire document to HTML > > extract the 740 pages into a smaller pdf file > > extract each bookmarked section into an individual > pdf > or html file. > > It seems to me that the perl world would be amuck > with > pdf tools since perl is such a wonderful pattern > recognition and text manipulation language. > > But, I have looked on CPAN, Monks, and the internet > in > general and have not found any tools to do this. > > I know that adobe has a site where you can convert > pdf > to html and I have tried it. But there appears to > be > some file size limitation somewhere either on their > site or on my mail server that keeps this from > working. The file is roughly 6-Meg. > > Any ideas? > > Regards, > > Rich Wood > > ===== > Richard O. Wood > Wildwood IT Consultants, Inc. > wildwood_players@yahoo.com > 425.941.9437 > > - - - - - - - - - - - - - - - - - - - - - - - - - - > - - - - - - - - - - - > 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://www.halcyon.com/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://www.halcyon.com/spug/ > > ===== Richard O. Wood Wildwood IT Consultants, Inc. wildwood_players@yahoo.com 425.941.9437 __________________________________________________ Do You Yahoo!? Yahoo! Auctions - buy the things you want at great prices http://auctions.yahoo.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://www.halcyon.com/spug/ From tim at consultix-inc.com Thu May 17 15:58:31 2001 From: tim at consultix-inc.com (Tim Maher/CONSULTIX) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: Tony Bowden Rendezvous, May 25-28 Message-ID: <20010517135831.A27727@timji.consultix.wa.com> SPUGsters, Tony Bowden, of BlackStar.co.uk and Belfast.pm, and also one of Damian's Senior Bosses 8-}, will be visiting Seattle next weekend, and is interested in meeting up for drinks, dinner, and possibly Folklife attendance with members of our group. I'll probably be unable to participate myself, and am currently swamped with other duties, so I'd like some interested person to step forward as "party coordinator" and see what can be arranged to make Tony feel welcome while he's here. I've attached some comments from him that will shed some more light on who he is and what he does. -Tim ======================================================== | Tim Maher, Ph.D. Tel: (206) 781-UNIX | | SPUG Founder & Leader Email: spug@halcyon.com | | Seattle Perl Users Group HTTP: seattleperl.com | ======================================================== > Tell me what evenings or days you'd be available for some kind > of rendezvous, and I'll see what I can arrange. Well, I arrive from Boston around 6:30 Thursday evening, so unless there's no other alternative I'd prefer it not to be that evening. Then I fly out again on Monday at 5:15pm. At the minute any time at all between those is free ;) I was one of the founders of BlackStar.co.uk, Europe's largest on-line video and DVD store, with revenues in excess of $1m per month. Our systems were all developed completely in-house on an open-source platform - Linux, Apache, MySQL and Perl. All systems are home-grown and developed entirely in Perl - the site, stock-control, customer management, fraud-detection etc. Our VCs weren't very into the idea of releasing source code, so we've contributed back to the Perl Universe by sponsorship - being a lead sponsor of YAPC Europe last year, and contributing half the grant for Damian Conway's 'Year of Perl'. We're also active in the 'Perl Quality' world, currently employing Mike Schwern, the Perl QA chair. I'm also the founder of Belfast.pm, which started off being solely BlackStar employees, but has grown considerably over the last few months. I'm currently stepping back from being involved full-time with BlackStar, and trying to use the BlackStar story as an case-study to convince the wider business world of the joys of Open Source! Tony -------------------------------------------------------------------------- Tony Bowden | tony@tmtm.com | http://www.tmtm.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://www.halcyon.com/spug/ From Sean at DigiDot.com Thu May 17 23:24:40 2001 From: Sean at DigiDot.com (Sean Ruddy) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: PDF to HTML, or PDF extract In-Reply-To: <20010517205151.4757.qmail@web11501.mail.yahoo.com> Message-ID: It will do pdf. That is new so may not be GA. I have in fact performed it myself on the laptop I returned :-( Adobe must offer some API but I'm sure they sell it for lots of money to companies like Verity who in turn charge lots of money to large companies. You probably can't get the key's to go under the hood for a cpan module. Might not hurt to ask Adobe though? Sean -----Original Message----- From: owner-spug-list@pm.org [mailto:owner-spug-list@pm.org]On Behalf Of Richard Wood Sent: Thursday, May 17, 2001 1:52 PM To: Sean Ruddy; Seattle Perl Users Group Subject: RE: SPUG: PDF to HTML, or PDF extract Sean, Thanks for the lead on Verity. I took a look at their site. You seem to be correct on the $$, even for a big company it is $$. Also their HTML Export tool doesn't list PDF as a format that it converts, but I think the $$ would make that a mute point anyway. In the meantime, I have copy and pasted the 740 pages into a word processor and converted it to html (Unfortunately it was heavily formatted). Now I just have to process the html to put in the links. Thanks to everyone for their ideas. Regards, Rich Wood --- Sean Ruddy wrote: > You can select the text tool from the toolbar and > pull them out manually > with the reader as long as it is not protected > (locked) in which case no > tool will be able to easily grab text (some reason > it took me a very long > time to figure that out). > > A company that I used to work for > http://www.verity.com has a tool called > Export which will do a good conversion of a > 6 mg > pdf (or 249 other mime > types) into html or even XML now. It cost a bunch > though... > > Sean Ruddy > 206-369-7188 > > -----Original Message----- > From: owner-spug-list@pm.org > [mailto:owner-spug-list@pm.org]On Behalf Of > Lorraine Johnson > Sent: Thursday, May 17, 2001 9:47 AM > To: Seattle Perl Users Group > Subject: RE: SPUG: PDF to HTML, or PDF extract > > > (Maybe a stupid question, but...) Can you get the > file in its original > format? The pdf format is usually an end/output > product, not meant to be > modified. > > Other than that, maybe Acrobat (not Acrobat Reader) > will allow you to grab > text? > > L > > -----Original Message----- > From: Richard Wood > [mailto:wildwood_players@yahoo.com] > Sent: Thursday, May 17, 2001 9:00 AM > To: Seattle Perl Users Group > Subject: SPUG: PDF to HTML, or PDF extract > > > I have a 1248 page pdf file. I am only interested > in > 740 pages of the file (pp. 142 - 931). These pages > contain definitions of roughly 600 alarm messages. > The alarms are all bookmarked. I would like to do > one > of the following: > > link directly to each specific bookmarked alarm > > (I know you can link to a specific page by using: > somefile.pdf#page=142 but can this be done with > bookmarks?) > > convert the entire document to HTML > > extract the 740 pages into a smaller pdf file > > extract each bookmarked section into an individual > pdf > or html file. > > It seems to me that the perl world would be amuck > with > pdf tools since perl is such a wonderful pattern > recognition and text manipulation language. > > But, I have looked on CPAN, Monks, and the internet > in > general and have not found any tools to do this. > > I know that adobe has a site where you can convert > pdf > to html and I have tried it. But there appears to > be > some file size limitation somewhere either on their > site or on my mail server that keeps this from > working. The file is roughly 6-Meg. > > Any ideas? > > Regards, > > Rich Wood > > ===== > Richard O. Wood > Wildwood IT Consultants, Inc. > wildwood_players@yahoo.com > 425.941.9437 > > - - - - - - - - - - - - - - - - - - - - - - - - - - > - - - - - - - - - - - > 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://www.halcyon.com/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://www.halcyon.com/spug/ > > ===== Richard O. Wood Wildwood IT Consultants, Inc. wildwood_players@yahoo.com 425.941.9437 __________________________________________________ Do You Yahoo!? Yahoo! Auctions - buy the things you want at great prices http://auctions.yahoo.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://www.halcyon.com/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://www.halcyon.com/spug/ From dwainef at earthlink.net Thu May 17 23:58:09 2001 From: dwainef at earthlink.net (Dwaine Felch) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: Perl and Connecting to SQL Server. Message-ID: <000001c0df57$22c3cce0$d384fea9@amyrose> Does anyone know a good and dependable want to use Perl and establish a connection To a SQL2000 database and write to it? Your help and expertise is appreciated. Dwaine -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/archives/spug-list/attachments/20010517/0bc8f93b/attachment.htm From creede at penguinsinthenight.com Fri May 18 11:10:18 2001 From: creede at penguinsinthenight.com (Creede Lambard) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: Perl and Connecting to SQL Server. In-Reply-To: <000001c0df57$22c3cce0$d384fea9@amyrose> References: <000001c0df57$22c3cce0$d384fea9@amyrose> Message-ID: <01051809111000.30505@igor.penguinsinthenight.com> If you're on NT (or presumably 9x) you might try Dave Roth's Win32::ODBC module. It works for SQL Server 7 but I've never tried it on SQL2000. There are some ODBC solutions available for Linux but I've never been able to get any of them to work. -- Creede -- Creede Lambard : Never rush a miracle man. fearless@io.com : You get rotten miracles. creede@penguinsinthenight.com : On Thu, 17 May 2001, Dwaine Felch wrote: > > Does anyone know a good and dependable want to use Perl and establish a > connection > To a SQL2000 database and write to it? > Your help and expertise is appreciated. > Dwaine > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From aaron at activox.com Fri May 18 11:46:44 2001 From: aaron at activox.com (Aaron Salo) Date: Wed Aug 4 00:08:02 2004 Subject: SPUG: Perl and Connecting to SQL Server. In-Reply-To: <000001c0df57$22c3cce0$d384fea9@amyrose> Message-ID: <3.0.5.32.20010518094644.01068100@pop3.norton.antivirus> A non-text attachment was scrubbed... Name: not available Type: text/enriched Size: 2071 bytes Desc: not available Url : http://mail.pm.org/archives/spug-list/attachments/20010518/8f7533e3/attachment.bin From jonw at coriolis.net Fri May 18 12:34:20 2001 From: jonw at coriolis.net (jonw@coriolis.net) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Perl and Connecting to SQL Server. In-Reply-To: <000001c0df57$22c3cce0$d384fea9@amyrose> Message-ID: On Thu, 17 May 2001, Dwaine Felch wrote: > Does anyone know a good and dependable want to use Perl and establish a > connection > To a SQL2000 database and write to it? I use DBD::Sybase on Linux and Solaris to connect to a SQL Server 7 server. The DBA had to patch the server with a TDS compatiblity patch. Perhaps a similar patch is available for SQL 2000? Jon - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From tnight at pobox.com Fri May 18 17:25:34 2001 From: tnight at pobox.com (Terry Nightingale) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Perl and Connecting to SQL Server. In-Reply-To: <3.0.5.32.20010518094644.01068100@pop3.norton.antivirus> Message-ID: On Fri, 18 May 2001, Aaron Salo wrote: > If you are initiating a connection from a UNIX box, you have a bit of a > prob. There are some kinky things you can try. SQLServer is really Sybase > under the hood. You can sometimes use DBD::Sybase to connect natively, > but this is a little kinky because you may run into some version specific > cracks. Also, support may (poof) vanish somewhere down the road, if your > app has a life cycle you may be concerned about that. Another option to be explored is using DBD::Proxy and DBI::ProxyServer. Your Unix script uses DBD::Proxy to connect to a DBI::ProxyServer on Win9x/NT/2k, which then uses the native SQL Server driver or an ODBC data source to connect. This has been a very successful approach in a recent major project I was involved in. -- Terry Nightingale +1-425-649-9304(v) / +1-425-643-7112(f) Prediction is very difficult, especially of the future. -Niels Bohr - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From aaron at activox.com Fri May 18 17:45:09 2001 From: aaron at activox.com (Aaron Salo) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Perl and Connecting to SQL Server. In-Reply-To: References: <3.0.5.32.20010518094644.01068100@pop3.norton.antivirus> Message-ID: <3.0.5.32.20010518154509.01095d40@pop3.norton.antivirus> Terry: I haven't done this but I presume there is some performance or overhead hit to running this way? Can you comment based on your experience? The last two times I had to do this kind of thing (connect my app to some godforsaken remote database running MSSybase) running the proxy and proxy server simply wasn't an option due to lack of cooperation on the other end of the wire. While we're fleshing out the full set of options for those keeping score, worth mentioning that although there is no native UN*Xish driver for SQLServer[x], there are UN*Xish ODBC drivers available on a pay-for-play basis from intersolv, openlink, and merant. OpenLink has a free UN*Xish ODBC driver manager called iODBC. I've not used any of them. I don't usually have the luxury of passing substantial licensing costs into my clients' dev budgets. ~!a At 03:25 PM 5/18/01 -0700, Terry N wrote: >Another option to be explored is using DBD::Proxy and DBI::ProxyServer. >Your Unix script uses DBD::Proxy to connect to a DBI::ProxyServer on >Win9x/NT/2k, which then uses the native SQL Server driver or an ODBC >data source to connect. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From schieb at centurytel.net Mon May 21 18:04:07 2001 From: schieb at centurytel.net (Islandman) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Test Shows 99.99% of High School Seniors Can't Read Perl Message-ID: <3B099EE7.F55E011F@centurytel.net> PERL dissed... http://bbspot.com/News/2001/03/perl_test.html - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From dragon at rpgamer.com Tue May 22 00:26:10 2001 From: dragon at rpgamer.com (Mikel Tidwell) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Image resize Message-ID: Hey SPUGers, I have been working on a backend update system for my site. The problem is that I can't find the code I once saw that would allow me to resize images, creating new images at specific sizes. If anyone knows where I could find either source that does this, the module that can help me, or documentation of how to make this work, it would be appreciated. _ - _ - _ - _ - _ - _ - _ - _ - _ - _ - _ - _ - _ - _ - _ - _ - _ - _ -- Mikel Tidwell President: RPGamer -- http://www.rpgamer.com/ ICQ: 9187899 Personal Home Page -- http://dragon.rpgamer.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://www.halcyon.com/spug/ From daryn at marinated.org Tue May 22 00:52:08 2001 From: daryn at marinated.org (Daryn Nakhuda) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Image resize In-Reply-To: Message-ID: search for imagemagick/perlmagick -----Original Message----- From: owner-spug-list@pm.org [mailto:owner-spug-list@pm.org]On Behalf Of Mikel Tidwell Sent: Monday, May 21, 2001 10:26 PM To: spug-list@pm.org Subject: SPUG: Image resize Hey SPUGers, I have been working on a backend update system for my site. The problem is that I can't find the code I once saw that would allow me to resize images, creating new images at specific sizes. If anyone knows where I could find either source that does this, the module that can help me, or documentation of how to make this work, it would be appreciated. _ - _ - _ - _ - _ - _ - _ - _ - _ - _ - _ - _ - _ - _ - _ - _ - _ - _ -- Mikel Tidwell President: RPGamer -- http://www.rpgamer.com/ ICQ: 9187899 Personal Home Page -- http://dragon.rpgamer.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://www.halcyon.com/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://www.halcyon.com/spug/ From chris at chriskate.net Tue May 22 01:00:36 2001 From: chris at chriskate.net (Chris Sutton) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Image resize In-Reply-To: Message-ID: You want Image::Magick. Can be found on search.cpan.org somewhere. On Mon, 21 May 2001, Mikel Tidwell wrote: > Hey SPUGers, > > I have been working on a backend update system for my site. The > problem is that I can't find the code I once saw that would allow me to > resize images, creating new images at specific sizes. If anyone knows > where I could find either source that does this, the module that can help > me, or documentation of how to make this work, it would be appreciated. > > _ - _ - _ - _ - _ - _ - _ - _ - _ - _ - _ - _ - _ - _ - _ - _ - _ - _ > -- Mikel Tidwell President: RPGamer -- http://www.rpgamer.com/ > ICQ: 9187899 Personal Home Page -- http://dragon.rpgamer.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://www.halcyon.com/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://www.halcyon.com/spug/ From warner at oz.net Tue May 22 16:31:26 2001 From: warner at oz.net (Marion Scott Warner) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Washington Incorporation Message-ID: <3B0ADAAE.BC8FCEE0@oz.net> Ok, well this is not really a Perl questions but it is related to Perl and other software consulting. Does anyone here have experience with incorporation in Washington State? Would like to get the name of an attorney or accountant that can advise, and perform this task for a reasonable rate? Anyone have a ball park figure for what this would typically cost? Thanks in Advance Scott Warner warner@oz.net - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From Richard.Anderson at raycosoft.com Tue May 22 19:19:22 2001 From: Richard.Anderson at raycosoft.com (Richard Anderson) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Re: Washington Incorporation References: <3B0ADAAE.BC8FCEE0@oz.net> Message-ID: <003c01c0e31e$07236ca0$3788ddd1@aciwin> You might want to consider the low-cost, simpler alternative of forming an LLC, which is simply a matter of filing a form and paying a fee. See http://www.lectlaw.com/files/buo01.htm and http://www.wa.gov/dol/forms/620100.pdf Richard Anderson, Ph.D. www.unixscripts.com Perl / Java / SQL / Unix Richard.Anderson@raycosoft.com Raycosoft, LLC Seattle, WA, USA ----- Original Message ----- From: "Marion Scott Warner" To: Sent: Tuesday, May 22, 2001 2:31 PM Subject: SPUG: Washington Incorporation > Ok, well this is not really a Perl questions but it is related to Perl > and other software consulting. > Does anyone here have experience with incorporation in Washington State? > > Would like to get the name of an attorney or accountant that can advise, > and perform this task > for a reasonable rate? Anyone have a ball park figure for what this > would typically cost? > > Thanks in Advance > Scott Warner > warner@oz.net > > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > 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://www.halcyon.com/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://www.halcyon.com/spug/ From rowdenw at eskimo.com Tue May 22 19:46:41 2001 From: rowdenw at eskimo.com (William Rowden) Date: Wed Aug 4 00:08:03 2004 Subject: [OT] SPUG: Washington Incorporation In-Reply-To: <3B0ADAAE.BC8FCEE0@oz.net> Message-ID: Today, Marion Scott Warner wrote: > Does anyone here have experience with incorporation in > Washington State? > > Would like to get the name of an attorney or accountant that can > advise, and perform this task for a reasonable rate? Anyone have > a ball park figure for what this would typically cost? Invicta Law Group () will do all the incorporation work for $1250, and they specialize in technology and intellectual property. My business partner and I like working with Chris Beer (). -- -William PGP key: http://www.eskimo.com/~rowdenw/crypt/pgp/rowdenw.asc Fingerprint: 00C9 6887 F073 A261 CE06 EC88 7D75 13BD 1221 2BA9 Get used to disappointment. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From sensationweb at wowmail.com Wed May 23 13:11:36 2001 From: sensationweb at wowmail.com (SENSATIONWEB-TV) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: MEGA 3 GIGS OF THE WORLD´S BEST Message-ID: <200105231715.f4NHFqE27178@gocho.pm.org> Ladies & Gentlemen, Are you ready to the experience of a lifetime ? As affiliates of the CIL group, we offer you to PLUGIN to the largest SEX-SERVER on the WEB, in order to enjoy more than an amazing 3000 MegaBytes of the best and most sensational SEX on the entire Web! Why on earth do you think that thousands of people from 13 countries daily choose to visit 2 particular WebSites ? Very EASY answer! - The largest and most incredible content of LIVE SEX is offered! - State-of-the-art LIVE SHOWS with the wildest and most horny amateurs and pornstars in the world! - Hardcore LIVE SEX that hasn´t crossed your imagination! - Incredible & amazing themes from soft sex to the most bizarre sex! - Beautiful Girls & wild studs from almost every country, allowing you to watch, see & chat with awsome amateurs & pornstars who are blond, who are black, who are Scandinavian, who are Asian, who have BIG tits, who are shaved, who are pregnant who are .... you just name it ! - The best ever made SPY-CAMS, WATCH-CAMS, POOL-CAMS, SHOWER-CAMS, AMATEUR-CAMS ... etc! - Several high quality Interactive Cams & LIVE SEX Chat, where you are in controle ! - Much much more ... too much to mention ! EVERYTHING is offered 100% ANONOMOUSLY & you don´t need to sign-up or have a creditcard ... How simple is that ? PLUGIN now to our MEGA SEX-SERVER through any of the 2 AwardWinning Sites listed below, and get instantly access to more than 3000 MegaBytes of State-of-the-art WebSex! RIGHT HERE AT: http://siam.to/affiliate93 Or this one, if you just love true LESBIAN SEX, CHAT and MORE from Sunny Ibiza in Spain: http://siam.to/affiliate69 Enjoy your trip to paradise! Yours sincerely, MEGAWEB-TV World Affiliates of CIL Group - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From davidpa at avaya.com Fri May 25 13:13:16 2001 From: davidpa at avaya.com (Patterson, David S (Pat)) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Need an asynchronous alarm handler Message-ID: I see that there's an alarm function in the built-in library, but how do you setup a callback function to be called when a SIGALARM is generated? Basically, I'm looking for a snippet to show me how to set up async alarm handling. Thanx! --- "If things get any worse, I'll have to ask you to stop helping me..." D. S. "Pat" Patterson Software Engineer Avaya, Inc. 6464 185th Ave NE Redmond, WA 98052-6736 425-558-8672 888-501-4835 Pgr davidpa@avaya.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://www.halcyon.com/spug/ From ced at carios2.ca.boeing.com Fri May 25 13:13:32 2001 From: ced at carios2.ca.boeing.com (ced@carios2.ca.boeing.com) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Need an asynchronous alarm handler Message-ID: <200105251813.LAA02645@carios2.ca.boeing.com> >I see that there's an alarm function in the built-in library, but how do you >setup a callback function to be called when a SIGALARM is generated? >Basically, I'm looking for a snippet to show me how to set up async alarm >handling. perldoc perlipc Here's a bit from the perlipc: eval { local $SIG{ALRM} = sub { die "alarm clock restart" }; alarm 10; flock(FH, 2); # blocking write lock alarm 0; }; if ($@ and $@ !~ /alarm clock restart/) { die } Rgds, -- Charles DeRykus - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From cwilkes at singingfish.com Fri May 25 13:49:44 2001 From: cwilkes at singingfish.com (Chris Wilkes) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Did anyone else get TPJ? Message-ID: Arrived in the mail on Wednesday. Article by Damian on Text::Autoformat which is very informative. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From jimfl at colltech.com Fri May 25 13:47:41 2001 From: jimfl at colltech.com (Jim Flanagan) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Need an asynchronous alarm handler In-Reply-To: Message-ID: <1168602.3199787261@[10.8.0.134]> --Also Sprache "Patterson, David S (Pat)" On Friday, May 25, 2001 11:13 AM -0700: > I see that there's an alarm function in the built-in library, but > how do you setup a callback function to be called when a SIGALARM is > generated? > > Basically, I'm looking for a snippet to show me how to set up async > alarm handling. $SIG{ALRM} = sub { print "Alarm went off!\n" }; or $SIG{ALRM} = \&do_some_stuff; or, a more complicated example: alarm $timeout; $foo = eval { local $SIG{ALRM} = sub { die "TIMEOUT" }; $socket->accept() } alarm 0; if ($@ =~ /TIMEOUT/) { print "Timed out\n" } while ($foo->getline) { # do some stuff } -- Jim Flanagan Collective Technologies jimfl@colltech.com http://www.colltech.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://www.halcyon.com/spug/ From ced at carios2.ca.boeing.com Fri May 25 13:43:53 2001 From: ced at carios2.ca.boeing.com (ced@carios2.ca.boeing.com) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Need an asynchronous alarm handler Message-ID: <200105251843.LAA02680@carios2.ca.boeing.com> > alarm $timeout; > $foo = eval { > local $SIG{ALRM} = sub { die "TIMEOUT" }; > $socket->accept() alarm 0; # move alarm call to here > } > # alarm 0; # move alarm call from here > if ($@ =~ /TIMEOUT/) { > print "Timed out\n" > } > while ($foo->getline) { > # do some stuff > } Very minor nit but alarm(0) should actually be moved inside the eval. Otherwise, there's a small window for the alarm to go off early as someone pointed out on clpm. Rgds, -- Charles DeRykus - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From gardner at cardomain.com Fri May 25 14:40:41 2001 From: gardner at cardomain.com (Jonathan Gardner) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Did anyone else get TPJ? In-Reply-To: References: Message-ID: <0105251240410H.08900@avatar.cardomain.com> On Friday 25 May 2001 11:49 am, Chris Wilkes wrote: > Arrived in the mail on Wednesday. Article by Damian on Text::Autoformat > which is very informative. If he keeps up this kind of stuff, I'll be very disappointed that I didn't donate to his servitude. Check out the list of people who "bought" him at the end of the article. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From jimfl at colltech.com Fri May 25 14:47:45 2001 From: jimfl at colltech.com (Jim Flanagan) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Need an asynchronous alarm handler In-Reply-To: <200105251843.LAA02680@carios2.ca.boeing.com> Message-ID: <1385985.3199790865@[10.8.0.134]> --Also Sprache ced@carios2.ca.boeing.com On Friday, May 25, 2001 11:43 AM -0700: > > alarm $timeout; > > $foo = eval { > > local $SIG{ALRM} = sub { die "TIMEOUT" }; > > $socket->accept() > alarm 0; # move alarm call to here > > } > > # alarm 0; # move alarm call from here > > Very minor nit but alarm(0) should actually be moved > inside the eval. Otherwise, there's a small window for > the alarm to go off early as someone pointed out on > clpm. Unfortunately, this code wants the return value of the eval block, so putting the alarm inside the block will break it. So, we'd have to eval { $SIG{ALRM} = sub { die "TIMEOUT" }; $foo = $socket->accept; alarm(0); }; Another nit with my own code, I forgot a semicolon. It should be $foo = eval { ... }; -- Jim Flanagan Collective Technologies jimfl@colltech.com http://www.colltech.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://www.halcyon.com/spug/ From davidpa at avaya.com Fri May 25 15:35:19 2001 From: davidpa at avaya.com (Patterson, David S (Pat)) Date: Wed Aug 4 00:08:03 2004 Subject: Thanks for all the RE: SPUG: Need an asynchronous alarm handler Message-ID: Got it... Thanks to all who chimed in!! -Pat -----Original Message----- From: Patterson, David S (Pat) Sent: Friday, May 25, 2001 11:13 AM To: spug-list@pm.org Subject: SPUG: Need an asynchronous alarm handler I see that there's an alarm function in the built-in library, but how do you setup a callback function to be called when a SIGALARM is generated? Basically, I'm looking for a snippet to show me how to set up async alarm handling. Thanx! --- "If things get any worse, I'll have to ask you to stop helping me..." D. S. "Pat" Patterson Software Engineer Avaya, Inc. 6464 185th Ave NE Redmond, WA 98052-6736 425-558-8672 888-501-4835 Pgr davidpa@avaya.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://www.halcyon.com/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://www.halcyon.com/spug/ From creede at penguinsinthenight.com Fri May 25 16:01:03 2001 From: creede at penguinsinthenight.com (Creede Lambard) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Did anyone else get TPJ? In-Reply-To: <0105251240410H.08900@avatar.cardomain.com> References: <0105251240410H.08900@avatar.cardomain.com> Message-ID: <01052514014701.09892@igor.penguinsinthenight.com> I got it, and I had long given up hope of ever seeing one again. Now hopefully we will someday have spring and summer issues as well. On Fri, 25 May 2001, Jonathan Gardner wrote: > On Friday 25 May 2001 11:49 am, Chris Wilkes wrote: > > Arrived in the mail on Wednesday. Article by Damian on Text::Autoformat > > which is very informative. > > If he keeps up this kind of stuff, I'll be very disappointed that I didn't > donate to his servitude. Check out the list of people who "bought" him at the > end of the article. > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > 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://www.halcyon.com/spug/ -- Creede Lambard : Never rush a miracle man. fearless@io.com : You get rotten miracles. creede@penguinsinthenight.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://www.halcyon.com/spug/ From neil at ourshack.com Fri May 25 16:16:54 2001 From: neil at ourshack.com (Neil Ford) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Did anyone else get TPJ? In-Reply-To: <0105251240410H.08900@avatar.cardomain.com>; from gardner@cardomain.com on Fri, May 25, 2001 at 12:40:41PM -0700 References: <0105251240410H.08900@avatar.cardomain.com> Message-ID: <20010525221653.B7148@ourshack.com> On Fri, May 25, 2001 at 12:40:41PM -0700, Jonathan Gardner wrote: > On Friday 25 May 2001 11:49 am, Chris Wilkes wrote: > > Arrived in the mail on Wednesday. Article by Damian on Text::Autoformat > > which is very informative. > > If he keeps up this kind of stuff, I'll be very disappointed that I didn't > donate to his servitude. Check out the list of people who "bought" him at the > end of the article. > Over 50% of the contributions came from london.pm/belfast.pm (probably something to do with the amazing 'sales' job Kevin Lenzo did at YAPC::Europe 2000 :-) ). That's why when Damian visits London he definitely feels owned! Neil. -- Neil C. Ford Managing Director, Yet Another Computer Solutions Company Limited neil@yacsc.com - http://www.yacsc.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://www.halcyon.com/spug/ From damian at mail.csse.monash.edu.au Fri May 25 16:31:08 2001 From: damian at mail.csse.monash.edu.au (Damian Conway) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Did anyone else get TPJ? References: Message-ID: <200105252131.HAA60190@indy05.csse.monash.edu.au> > > Arrived in the mail on Wednesday. Article by Damian on Text::Autoformat > > which is very informative. > > If he keeps up this kind of stuff, I'll be very disappointed that I > didn't donate to his servitude. The near future may bring further opportunities. ;-) Damian - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From alyssa at atuin.net Fri May 25 23:47:22 2001 From: alyssa at atuin.net (Alyssa Harding) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: re: spam Message-ID: <3B0F355A.8050702@atuin.net> Is anyone else getting spam messages through the pm.org domain? Specifically from this address: gocho.pm.org (gocho-206.gocho.net [207.8.52.206] (may be forged)) Or is it just me? -- Alyssa Harding http://www.atuin.net/~alyssa ------------------------------------------------------------------- People didn't hit you over the head with farmhouses back home. -- Nanny Ogg gets homesick (Terry Pratchett, Witches Abroad) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From damian at mail.csse.monash.edu.au Fri May 25 16:56:05 2001 From: damian at mail.csse.monash.edu.au (Damian Conway) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Did anyone else get TPJ? References: <0105251240410H.08900@avatar.cardomain.com> Message-ID: <200105252156.HAA74269@indy05.csse.monash.edu.au> > Over 50% of the contributions came from london.pm/belfast.pm (probably > something to do with the amazing 'sales' job Kevin Lenzo did at > YAPC::Europe 2000 :-) ). That's why when Damian visits London he > definitely feels owned! Washington state was not disgraced, by any means. There were numerous significant contributors from the Seattle area and beyond, and the SPUG-meister himself, Tim Maher, was (typically) amongst the most generous of all my sponsors. Damian PS: You're right though about Kevin's amazing European fund-raising efforts on my behalf. I'm not sure what kind of incriminating photographs Kevin had of the UK Perl Mongers in particular, but they must have been very damaging. ;-) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From neil at ourshack.com Fri May 25 17:13:19 2001 From: neil at ourshack.com (Neil Ford) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Did anyone else get TPJ? In-Reply-To: <200105252156.HAA74269@indy05.csse.monash.edu.au>; from damian@mail.csse.monash.edu.au on Sat, May 26, 2001 at 07:56:05AM +1000 References: <0105251240410H.08900@avatar.cardomain.com> <200105252156.HAA74269@indy05.csse.monash.edu.au> Message-ID: <20010525231319.A7307@ourshack.com> On Sat, May 26, 2001 at 07:56:05AM +1000, Damian Conway wrote: > > > Over 50% of the contributions came from london.pm/belfast.pm (probably > > something to do with the amazing 'sales' job Kevin Lenzo did at > > YAPC::Europe 2000 :-) ). That's why when Damian visits London he > > definitely feels owned! > > Washington state was not disgraced, by any means. There were numerous > significant contributors from the Seattle area and beyond, and the > SPUG-meister himself, Tim Maher, was (typically) amongst the most > generous of all my sponsors. > My apologies is I disparaged anyone, it wasn't meant as such. I'd very much like to be welcome at SPUG again the next time I visit Seattle :-) > Damian > > PS: You're right though about Kevin's amazing European fund-raising > efforts on my behalf. I'm not sure what kind of incriminating > photographs Kevin had of the UK Perl Mongers in particular, > but they must have been very damaging. ;-) > Not sure it was photos, I just think he got writen guarantees whilst people were out on the Saturday night pub crawl :-) Mr Cross said it was a historical tour along the Thames, personally I just think it was a plan to get people so tanked up they'd agree to practically anything! To get this thread a little back on topic: when will the non mail header munging version of Text::Autoformat be available? Neil. -- Neil C. Ford Managing Director, Yet Another Computer Solutions Company Limited neil@yacsc.com - http://www.yacsc.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://www.halcyon.com/spug/ From damian at mail.csse.monash.edu.au Fri May 25 17:27:13 2001 From: damian at mail.csse.monash.edu.au (Damian Conway) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Did anyone else get TPJ? References: <0105251240410H.08900@avatar.cardomain.com> <200105252156.HAA74269@indy05.csse.monash.edu.au> Message-ID: <200105252227.IAA73953@indy05.csse.monash.edu.au> > Not sure it was photos, I just think he got writen guarantees whilst > people were out on the Saturday night pub crawl :-) Mr Cross said it > was a historical tour along the Thames, personally I just think it was a > plan to get people so tanked up they'd agree to practically anything! Ah, a technique I must remember! ;-) > To get this thread a little back on topic: when will the non mail header > munging version of Text::Autoformat be available? "By Christmas" ;-) Actually, it may be a month or two. I now have 32 modules to maintain...33 as soon as the new Inline::Files module hits the CPAN...and I'm working on at least seven others as well. I have 100 hours of presentations to prepare for my forthcoming 11-week, 11-city trip (Seattle: August 5-10). I'm writing a new Perl book. I'm helping Larry with Perl 6. There's a certain amount of contention for the limited amount of Damian currently available. %-) Damian - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From jmates at mbt.washington.edu Fri May 25 17:56:44 2001 From: jmates at mbt.washington.edu (Jeremy A. Mates) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Did anyone else get TPJ? In-Reply-To: <200105252227.IAA73953@indy05.csse.monash.edu.au> Message-ID: On Sat, 26 May 2001, Damian Conway wrote: > There's a certain amount of contention for the limited amount of Damian > currently available. fork() ? -- Jeremy A. Mates 1-206-221-4714 Fax: 685-7301 Senior Systems Administrator K 351, Health Sciences Center http://www.mbt.washington.edu/ Mail Box 357730 University of Washington Seattle, WA 98195 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From craig at n2h2.com Fri May 25 18:05:36 2001 From: craig at n2h2.com (Craig Sutton) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Did anyone else get TPJ? In-Reply-To: Message-ID: On Fri, 25 May 2001, Jeremy A. Mates wrote: > On Sat, 26 May 2001, Damian Conway wrote: > > There's a certain amount of contention for the limited amount of Damian > > currently available. > > fork() ? Spawn! > > -- > Jeremy A. Mates 1-206-221-4714 Fax: 685-7301 > Senior Systems Administrator K 351, Health Sciences Center > http://www.mbt.washington.edu/ Mail Box 357730 > University of Washington Seattle, WA 98195 > > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > 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://www.halcyon.com/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://www.halcyon.com/spug/ From damian at mail.csse.monash.edu.au Fri May 25 18:43:53 2001 From: damian at mail.csse.monash.edu.au (Damian Conway) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Did anyone else get TPJ? Message-ID: <200105252343.JAA66891@indy05.csse.monash.edu.au> > > > currently available. > > > > fork() ? > > Spawn! Oh, yeah. Cos we all know how much time that frees up! ;-) Damian - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From gardner at cardomain.com Fri May 25 19:31:55 2001 From: gardner at cardomain.com (Jonathan Gardner) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Did anyone else get TPJ? In-Reply-To: <200105252131.HAA60190@indy05.csse.monash.edu.au> References: <200105252131.HAA60190@indy05.csse.monash.edu.au> Message-ID: <0105251731550L.08900@avatar.cardomain.com> On Friday 25 May 2001 02:31 pm, Damian Conway wrote: > > > Arrived in the mail on Wednesday. Article by Damian on > > > Text::Autoformat which is very informative. > > > > If he keeps up this kind of stuff, I'll be very disappointed that I > > didn't donate to his servitude. > > > The near future may bring further opportunities. > > > ;-) > > Damian > I just thought of something funny... this whole arrangement brings new meaning to the phrase "We 0WnZ j00!" I actually just downloaded the module and I was playing with it... and I have a gripe, but only one... The command line thingy (When you are describing how to make the "just-fix-it-all-up-for-me-would-ya" vim command): perl -MText::Autoformat -eautoformat{all=>1} seems to be a typo. Shouldn't it be: perl -MText::Autoformat -e'autoformat{all=>1}' Otherwise, I think I am going to replace 'fmt' with a script that uses autoformat. It is really powerful, and I am very pleased with how it is handling my text. Now to get a good way to use it with KMail... hehehe! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From briani at activestate.com Fri May 25 20:14:22 2001 From: briani at activestate.com (Brian Ingerson) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Inline::Files Message-ID: <3B0F036E.DF13EE2D@activestate.com> As I pen this message Inline::Files is populating CPAN mirrors wordwide... Inline::Files is a new module by Damian Conway. In the strict sense it has nothing to do with the usual Inline::* crowd. 'Files' is not the name of any programming language that I know of. So what is it then? Remember the good old DATA file handle? That's the one that automatically gets opened with the contents of your Perl script that fall after a line containing only '__DATA__' or '__END__'. It sure is a handy little feature. But it doesn't scale. What do I mean? Well there's just one of them and you can only *read* from it and ... &^%%(&%)(*(@$^&^$ Shazaam! Enter Inline::Files! With Inline::Files you can: - Have as many __FOO__ delineated files in your program as you want. - Have more than one with the *same* marker name. - No __END__ or __DATA__ markers required. - Use them just like DATA. No open required. - Open them if you want to. - Read from them. - Write to them! - Read and write at the same time. - Seek on them. - Tell on them. (You tattler you) - Truncate them. - Close them. - Open/create brand new ones on the fly. - Delete (unlink) them. (Coming soon...) - Treat them almost exactly like regular files... - But on steroids! - And more. Why? Because this is Perl! The Script *IS* the File System. --- Those of you who have used Inline.pm will be familiar with this style. Does Inline support Inline::Files? Good question. Of course it does! The upcoming 0.40 super-release has preliminary support. use Inline::Files; use Inline C; print "9 + 16 = ", add(9, 16), "\n"; __C__ int add(int x, int y) { return x + y; } "Look ma, no __END__ statement". Although that's not the strongest case for I::F, there are some subtle andvantages. Now the source code can truly be compiled/loaded at Perl compile time instead of an INIT block. That means prototyped/bareword Inline functions can be used. Also I::F can report the *real* starting line and filename of the virtual file. This will be used to report that actual error location on C and C++ compilation failures. Beyond Inline, I see no end of usefulness for Inline::Files. The "Good Doctor" has done it again! Cheers, Brian Ingerson ingy@cpan.org -- perl -le 'use Inline C=>q{SV*JAxH(char*x){return newSVpvf ("Just Another %s Hacker",x);}};print JAxH+Perl' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From damian at mail.csse.monash.edu.au Fri May 25 20:38:52 2001 From: damian at mail.csse.monash.edu.au (Damian Conway) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Re: Inline::Files Message-ID: <200105260138.LAA91179@indy05.csse.monash.edu.au> Brian Ingerson wrote: > Inline::Files is a new module by Damian Conway. > ... > Beyond Inline, I see no end of usefulness for Inline::Files. The "Good > Doctor" has done it again! What Brian fails to mention was that I::F has been a highly collaborative effort between the two of us. He had the original notion, which I expanded upon, warped to my own evil ends, and implemented. Brian then did the final clean-up and integration with the other Inline:: modules. The "Good Doctor" had a lot of help delivering this bouncing baby module! ;-) Damian - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From mcglk at artlogix.com Fri May 25 23:54:55 2001 From: mcglk at artlogix.com (Ken McGlothlen) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Did anyone else get TPJ? In-Reply-To: <200105252227.IAA73953@indy05.csse.monash.edu.au> References: <0105251240410H.08900@avatar.cardomain.com> <200105252156.HAA74269@indy05.csse.monash.edu.au> <200105252227.IAA73953@indy05.csse.monash.edu.au> Message-ID: <87hey8d80w.fsf@ralf.artlogix.com> Damian Conway writes: | There's a certain amount of contention for the limited amount of Damian | currently available. That's all right. With the new developments in vacuum pumps, exsanguination has gotten a lot more efficient. :) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From neil at ourshack.com Sat May 26 02:20:12 2001 From: neil at ourshack.com (Neil Ford) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Did anyone else get TPJ? In-Reply-To: <200105252227.IAA73953@indy05.csse.monash.edu.au>; from damian@mail.csse.monash.edu.au on Sat, May 26, 2001 at 08:27:13AM +1000 References: <0105251240410H.08900@avatar.cardomain.com> <200105252156.HAA74269@indy05.csse.monash.edu.au> <200105252227.IAA73953@indy05.csse.monash.edu.au> Message-ID: <20010526082012.B7468@ourshack.com> On Sat, May 26, 2001 at 08:27:13AM +1000, Damian Conway wrote: > > > To get this thread a little back on topic: when will the non mail header > > munging version of Text::Autoformat be available? > > "By Christmas" ;-) > > Actually, it may be a month or two. > > I now have 32 modules to maintain...33 as soon as the new Inline::Files > module hits the CPAN...and I'm working on at least seven others as well. > I have 100 hours of presentations to prepare for my forthcoming 11-week, > 11-city trip (Seattle: August 5-10). I'm writing a new Perl book. I'm > helping Larry with Perl 6. > > There's a certain amount of contention for the limited amount of Damian > currently available. > > %-) > Fully understood. Just thought I'd ask as it was the module in question is kinda what started this thread. I'll will sit patiently and wait :-) Neil. -- Neil C. Ford Managing Director, Yet Another Computer Solutions Company Limited neil@yacsc.com - http://www.yacsc.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://www.halcyon.com/spug/ From dave at dave.org.uk Sat May 26 03:24:15 2001 From: dave at dave.org.uk (Dave Cross) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Did anyone else get TPJ? In-Reply-To: <20010525231319.A7307@ourshack.com> References: <200105252156.HAA74269@indy05.csse.monash.edu.au> <0105251240410H.08900@avatar.cardomain.com> <200105252156.HAA74269@indy05.csse.monash.edu.au> Message-ID: <5.0.2.1.2.20010526091936.02261ec0@pop.dave.org.uk> At 23:13 25/05/2001, Neil Ford wrote: >Not sure it was photos, I just think he got writen guarantees whilst >people were out on the Saturday night pub crawl :-) Mr Cross said it >was a historical tour along the Thames, personally I just think it was a >plan to get people so tanked up they'd agree to practically anything! It was so many, many things. A historical walk along the side of the Thames, a mobile beer festival, a sales meeing for Kevin, a brainstorming session for fundraising techniques (we never _did_ make the "Damian is my bitch" t-shirts) and, not least, a hotbed of ideas for Perl 6 which yielded at least on RFC (number 324, I think). Oh and yes, people _did_ get some embarrassing photos :) Dave... [looking forward to the next one] -- SMS: sms@dave.org.uk Perl Training in the UK - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From binkley at bigfoot.com Sun May 27 08:01:23 2001 From: binkley at bigfoot.com (B. K. Oxley (binkley) at Home) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Re: Inline::Files References: <200105260138.LAA91179@indy05.csse.monash.edu.au> Message-ID: <3B10FAA3.6B2B73C6@bigfoot.com> Damian Conway wrote: > > Brian Ingerson wrote: > > > Inline::Files is a new module by Damian Conway. > > ... > > Beyond Inline, I see no end of usefulness for Inline::Files. The "Good > > Doctor" has done it again! > > What Brian fails to mention was that I::F has been a highly > collaborative effort between the two of us. He had the original notion, > which I expanded upon, warped to my own evil ends, and implemented. > Brian then did the final clean-up and integration with the other > Inline:: modules. I have a failure for writing to a handle in test #3. GREAT module, BTW! Cheers, --binkley Test failure: System: Linux binkley.dyn.dhs.org 2.2.19-7.0.1binkley #2 Sat May 5 14:29:34 CDT 2001 i686 unknown Perl: Summary of my perl5 (revision 5.0 version 6 subversion 0) configuration: Platform: osname=linux, osvers=2.2.17-8smp, archname=i386-linux uname='linux porky.devel.redhat.com 2.2.17-8smp #1 smp fri nov 17 16:12:17 est 2000 i686 unknown ' config_args='-des -Doptimize=-O2 -march=i386 -mcpu=i686 -Dcc=gcc -Dcccdlflags=-fPIC -Dinstallprefix=/usr -Dprefix=/usr -Darchname=i386-linux -Dd_dosuid -Dd_semctl_semun -Di_db -Di_ndbm -Di_gdbm -Di_shadow -Di_syslog -Dman3ext=3pm -Uuselargefiles' hint=recommended, useposix=true, d_sigaction=define usethreads=undef use5005threads=undef useithreads=undef usemultiplicity=undef useperlio=undef d_sfio=undef uselargefiles=undef use64bitint=undef use64bitall=undef uselongdouble=undef usesocks=undef Compiler: cc='gcc', optimize='-O2 -march=i386 -mcpu=i686', gccversion=2.96 20000731 (Red Hat Linux 7.1 2.96-78) cppflags='-fno-strict-aliasing' ccflags ='-fno-strict-aliasing' stdchar='char', d_stdstdio=define, usevfork=false intsize=4, longsize=4, ptrsize=4, doublesize=8 d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12 ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=4 alignbytes=4, usemymalloc=n, prototype=define Linker and Libraries: ld='gcc', ldflags =' -L/usr/local/lib' libpth=/usr/local/lib /lib /usr/lib libs=-lnsl -ldl -lm -lc -lcrypt libc=/lib/libc-2.2.so, so=so, useshrplib=false, libperl=libperl.a Dynamic Linking: dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-rdynamic' cccdlflags='-fPIC', lddlflags='-shared -L/usr/local/lib' Characteristics of this binary (from libperl): Compile-time options: Built under linux Compiled at Apr 3 2001 11:27:33 @INC: /usr/lib/perl5/5.6.0/i386-linux /usr/lib/perl5/5.6.0 /usr/lib/perl5/site_perl/5.6.0/i386-linux /usr/lib/perl5/site_perl/5.6.0 /usr/lib/perl5/site_perl . make test TEST_VERBOSE=1: [root@binkley Inline-Files-0.60]# make test TEST_VERBOSE=1 PERL_DL_NONLAZY=1 /usr/bin/perl -Iblib/arch -Iblib/lib -I/usr/lib/perl5/5.6.0/i386-linux -I/usr/lib/perl5/5.6.0 -e 'use Test::Harness qw(&runtests $verbose); $verbose=1; runtests @ARGV;' t/*.t t/00init............1..15 ok 1 ok 2 ok 3 ok 4 ok 5 ok 6 ok 7 ok 8 ok 9 ok 10 ok 11 ok 12 ok 13 ok 14 ok 15 ok t/01basics..........1..9 ok 1 ok 2 ok 3 ok 4 ok 5 ok 6 ok 7 ok 8 ok 9 ok t/02write...........1..2 ok 1 ok 2 ok t/03nowrite.........1..2 ok 1 not ok 2 # Failed test 2 in t/03nowrite.t at line 35 FAILED test 2 Failed 1/2 tests, 50.00% okay t/04create..........1..2 ok 1 ok 2 ok t/05seek............1..21 ok 1 ok 2 ok 3 ok 4 ok 5 ok 6 ok 7 ok 8 ok 9 ok 10 ok 11 ok 12 ok 13 ok 14 ok 15 ok 16 ok 17 ok 18 ok 19 ok 20 ok 21 ok t/06backup..........1..4 ok 1 ok 2 ok 3 ok 4 ok t/07hash............1..12 ok 1 ok 2 ok 3 ok 4 ok 5 ok 6 ok 7 ok 8 ok 9 ok 10 ok 11 ok 12 ok Failed Test Stat Wstat Total Fail Failed List of Failed ------------------------------------------------------------------------------- t/03nowrite.t 2 1 50.00% 2 Failed 1/8 test scripts, 87.50% okay. 1/67 subtests failed, 98.51% okay. make: *** [test_dynamic] Error 29 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From dha at panix.com Sun May 27 23:08:14 2001 From: dha at panix.com (David H. Adler) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: Did anyone else get TPJ? In-Reply-To: <5.0.2.1.2.20010526091936.02261ec0@pop.dave.org.uk>; from dave@dave.org.uk on Sat, May 26, 2001 at 09:24:15AM +0100 References: <200105252156.HAA74269@indy05.csse.monash.edu.au> <0105251240410H.08900@avatar.cardomain.com> <200105252156.HAA74269@indy05.csse.monash.edu.au> <20010525231319.A7307@ourshack.com> <5.0.2.1.2.20010526091936.02261ec0@pop.dave.org.uk> Message-ID: <20010528000814.A17128@panix.com> On Sat, May 26, 2001 at 09:24:15AM +0100, Dave Cross wrote: > At 23:13 25/05/2001, Neil Ford wrote: > > >Not sure it was photos, I just think he got writen guarantees whilst > >people were out on the Saturday night pub crawl :-) Mr Cross said it > >was a historical tour along the Thames, personally I just think it was a > >plan to get people so tanked up they'd agree to practically anything! > > It was so many, many things. A historical walk along the side of the > Thames, a mobile beer festival, a sales meeing for Kevin, a brainstorming > session for fundraising techniques (we never _did_ make the "Damian is my > bitch" t-shirts) and, not least, a hotbed of ideas for Perl 6 which yielded > at least on RFC (number 324, I think). Yes, that's the one. Uh... should I start apologizing again at this point? :-) dha, should probably not be listened to on technical matters when drunk -- David H. Adler - - http://www.panix.com/~dha/ Chipmunks are go! - Madness - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From briani at activestate.com Sun May 27 23:30:53 2001 From: briani at activestate.com (Brian Ingerson) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: ANNOUNCE: Inline 0.40 Major Release Message-ID: <3B11D47D.CA21D715@activestate.com> I am pleased to announce the release of Inline-0.40. This is a major release for Inline. Possibly the most important one to date. That's because you can now create CPAN extension modules that look and behave just like ones written in XS. In prior versions of Inline, writing extension modules was possible, but problematic. The official word on the Inline mailing list was "wait for version 0.40". The wait is over. The new features of Inline-0.40 include: 1) Inline::MakeMaker. This is a drop-in replacement for ExtUtils::MakeMaker. It actually loads the ExtUtils counterpart, but grabs control long enough to make sure that the generated Makefile is "Inline aware". 2) Short file names for objects. For instance a typical module in 0.34 might have produced an object called: auto/Foo_C_3cee729d1d942c6792ca5a741dc21879/Foo_C_3cee729d1d942c6792ca5a741dc21879.so with 0.40 it would be: auto/Foo/Foo.so 3) An object validation file. For the object above you'd get: auto/Foo/Foo.inl which might contain: md5 : 3cee729d1d942c6792ca5a741dc21879 name : Foo version : "" language : C language_id : C installed : 0 date_compiled : Sun May 27 18:52:27 2001 inline_version : 0.40 ILSM : % module : Inline::C suffix : so type : compiled Config : % apiversion : 5.6.1 archname : i686-linux-thread-multi cc : gcc ccflags : -D_REENTRANT ... ld : gcc osname : linux osvers : 2.2.17 so : so version : 5.6.1 4) Support for creating binary distributions. Even ones without the C source. 5) Support for Damian Conway's new module: Inline::Files. The net effect of all this is that you can now create a C-based extension module for CPAN called Math::Simple and it would look like: ---8<--- (Simple.pm) package Math::Simple; use strict; require Exporter; @Math::Simple::ISA = qw(Exporter); @Math::Simple::EXPORT = qw(add subtract); $Math::Simple::VERSION = '1.23'; use Inline (C => DATA => NAME => 'Math::Simple', VERSION => '1.23', ); 1; __DATA__ __C__ int add (int x, int y) { return x + y; } int subtract (int x, int y) { return x - y; } ---8<--- And the Makefile.PL would look like: ---8<--- use Inline::MakeMaker; WriteMakefile( NAME => 'Math::Simple', VERSION_FROM => 'Simple.pm', ); ---8<--- And that's it. Just add a MANIFEST, a README, a test harness (test.pl) and some POD doc. Run 'make dist', and ship it. Now please don't actually *do* that with Math::Simple or I'll be hearing about it for the rest of time. NOTE: For your convenience I've included all the Math::Simple files in the distribution, just in case you want to play with them. --- This release has been in a pre-release test cycle for the past two weeks. It has undergone 9 revisions. Many thanks to the members of inline@perl.org who helped me iron out the wrinkles. Also please note that this release breaks compatability with all of the other Inline::* modules (like Inline::Java for instance). The authors of these modules are all aware of this and will submit upgrades to their software within the next couple days. If you use any of these modules, please wait for the upgrades before installing Inline-0.40. Finally, be assured that the public interface has not changed. Your existing code should work fine with this release. The README follows. Enjoy, Brian Ingerson -------------------------------------------------------------------- INTRODUCTION: Inline.pm - Write Perl subroutines in other programming languages. Inline lets you write Perl subroutines in other programming languages like C, C++, Java, Python, Tcl and even Assembly. You don't need to compile anything. All the details are handled transparently so you can just run your Perl script like normal. Example: use Inline::Files; use Inline C; print JAxH('Inline'), "\n"; __C__ SV* JAxH(char* x) { return newSVpvf ("Just Another %s Hacker",x); } When run, this complete program prints: Just Another Inline Hacker The one line version is: perl -le 'use Inline C=>q{SV*JAxH(char*x){return newSVpvf("Just Another %s Hacker",x);}};print JAxH+Inline' --------------------------------------------------------------- FEATURES: Inline version 0.40 is a major upgrade. It includes: + Inline::MakeMaker + Rock solid support for writing CPAN extension modules + Short file names. + No more _Inline/lib/auto/Foo_C_3cee729d1d942c6792ca5a741dc21879/Foo_C_3cee729d1d942c6792ca5a741dc21879.so + Now it's _Inline/lib/auto/Foo/Foo.so + Support for creating binary distributions. + Can even do it without shipping C source code. + Support for Damian Conway's Inline::Files + No more __END__ markers. + Safe new config and caching format. + Similar to Data::Denter format + New Inline-FAQ.pod. Inline version 0.33 is a minor upgrade with the following changes: + Support for Inline::Struct and Inline::Filters + Added ENABLE and DISABLE configuration modifiers. + C installation is optional + Test harness reworked. Faster testing. + Fixed all reported (and some unreported) bugs. + Documentation enhancements. Inline version 0.32 is a minor upgrade with the following changes: + Addition of UNTAINT, SAFEMODE, GLOBAL_LOAD, MAKE, and LDDLFLAGS configuration options. + Fixed all reported (and some unreported) bugs. + Documentation enhancements. Inline version 0.31 is a minor upgrade with the following changes: + "use Inline C;" is now a synonym for "use Inline C => DATA;" + Default build/install directory changed from "blib_I/" to ".Inline/" + Build/Install directory structure simplified. + Short install paths. + Build areas in ".Inline/build/" subdirectory. + Added 'CC', 'CCFLAGS', 'LD', and 'LDFLAGS' config options to C. + More recipes in Cookbook. Inline version 0.30 is a major upgrade from previous verions. It includes: + Integrated support for typemap files in C. + All the recognized types now come *only* from typemaps. + The default types come from the default typemap installed with core Perl. + Typemaps are used to modify the Parse::RecDescent grammar for parsing C. + This means you can easily use your existing typemaps. + Language support completely separated from base Inline code. + Beta supoort for C (Inline::C, included) + Alpha support for C++ (Inline::CPP, available separately) + Alpha support for Python (Inline::Python, available separately) + Support for 'embedding' Perl in C with my new programming language, CPR. (Inline::CPR, available separately) This one may warp your mind :^) + Simple API for adding your own language support. + Write your own Inline::Foo + Write your own implementation of Inline::C, or just modify Inline::C::grammar. + Support for interpreted languages in addition to compiled ones. + Autodetection of new Inline language modules. + Much easier and more powerful configuration syntax. + More XS and MakeMaker features exposed for configuration (for C and C++). + Flexible new syntax for specifying source code. + Use DATA section for AutoLoader, Inline, and POD simultaneously. + Support for using Inline 'with' other modules. + "use Inline with 'Event';" lets Event.pm pass config info to Inline.pm. + Event.pm 0.80 has built in support for Inline.pm 0.30 and higher. + Write Event callbacks in C with extreme ease. + More documentation + perldoc Inline + perldoc Inline-FAQ + perldoc Inline-API + perldoc Inline::C + perldoc Inline::C-Cookbook + Better error messages and easier debugging. + Mailing list: inline@perl.org Other features of Inline.pm include: = Automatically compiles your source code and caches the shared object. = Automatically DynaLoads the shared object and binds it to Perl. = Recompiles only when the C code changes. = Changing the Perl code will not cause a recompile of the C code. = Support for writing extension modules, suitable for distributing to the CPAN. = Support for generating and binding Inline subs at run time. = Works on all Unix and MS Windows configurations. ------------------------------------------------------------------------------- INSTALLATION: This module requires the Digest::MD5 and Parse::RecDescent modules. It also requires the appropriate C compiler. (Where appropriate means the one referred to in your Config.pm) To install Inline do this: perl Makefile.PL make make test make install On ActivePerl for MSWin32, use nmake instead of make. Or just use: ppm install Inline For convenience, Inline::C is packaged with Inline, and will be automatically installed as well. ------------------------------------------------------------------------------- INFORMATION: = For more information on Inline, see 'perldoc Inline' and 'perldoc Inline-FAQ' = For information about Inline::, see 'perldoc Inline::C' and 'perldoc Inline::C-Cookbook' = For information on writing your own Inline extension see 'perldoc Inline-API' = For information about the Perl5 internal C API, see 'perldoc perlapi' or try http://www.perldoc.com/perl5.6/pod/perlapi.html = The Fall 2000 edition of The Perl Journal has an article about Inline The Inline.pm mailing list is inline@perl.org. Send email to inline-subscribe@perl.org to subscribe. Please send questions and comments to "Brian Ingerson" Copyright (c) 2001, Brian Ingerson. All Rights Reserved. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From damian at mail.csse.monash.edu.au Mon May 28 02:45:06 2001 From: damian at mail.csse.monash.edu.au (Damian Conway) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: ANNOUNCE: Inline 0.40 Major Release Message-ID: <200105280745.RAA93956@indy05.csse.monash.edu.au> Brian announced: > I am pleased to announce the release of Inline-0.40. Congratulations to Brian and his Merry Band of Outlaw Programmers. This is a *major* achievement. One that I hope we will soon see in the core distribution. In fact, I think it's *so* significant that, in honour of this release, within the next month I'm going to break my strict "Pure Perl" code-of-ethics and release a C-based module implemented via Inline. ;-) Damian - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From jdevlin at stadiumdistrict.com Mon May 28 15:11:52 2001 From: jdevlin at stadiumdistrict.com (Joe Devlin) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: re: spam Message-ID: <01C0E777.C46BD6A0@tac-lx100-ip47.nwnexus.net> I got some, a while back. Joe ---------- From: Alyssa Harding[SMTP:alyssa@atuin.net] Sent: Friday, May 25, 2001 9:47 PM To: SPUG Subject: SPUG: re: spam Is anyone else getting spam messages through the pm.org domain? Specifically from this address: gocho.pm.org (gocho-206.gocho.net [207.8.52.206] (may be forged)) Or is it just me? -- Alyssa Harding http://www.atuin.net/~alyssa ------------------------------------------------------------------- People didn't hit you over the head with farmhouses back home. -- Nanny Ogg gets homesick (Terry Pratchett, Witches Abroad) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/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://www.halcyon.com/spug/ From eric.brose at attws.com Tue May 29 16:48:02 2001 From: eric.brose at attws.com (Brose, Eric) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: MS Access and DBI Message-ID: <67AC2DB52118D411A8F300508B957F1204B144DB@WA-MSG02> Hello, I've written a few small CGI apps in which i've used an MS Access dB as the backend. Until now, I've only had to use select and insert statements and everything's been hunky dory. Whenever I try to run a very simple UPDATE or DELETE stmt like this my $sqlstatement="DELETE * from Player WHERE Player.playerName=\"Scooby\";"; print "$sqlstatement"; my $sth = $dbh->prepare($sqlstatement); unless ($sth->execute) { die "Could not execute SQL statement ... maybe invalid?"; } I get an error reading: DBD::ODBC::st execute failed: [Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1 . (SQL-07001)(DBD: st_execute/SQLExecute err=-1) at update.pl line 26. I don't want to change the design of my dB to get around this, but I haven't been able to get this to work for a few days now. Does anyone have experience with this? Thanks, EB - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From dbitsef at qwest.com Tue May 29 17:10:23 2001 From: dbitsef at qwest.com (David Bitseff) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: MS Access and DBI In-Reply-To: <67AC2DB52118D411A8F300508B957F1204B144DB@WA-MSG02> References: <67AC2DB52118D411A8F300508B957F1204B144DB@WA-MSG02> Message-ID: <15124.7759.311469.598803@maakie.uswc.uswest.com> Sorry, What I meant was; Try removing the '*' character. I'm not familiar with Access, but I think SQL delete statements don't have an asterisk. Brose, Eric writes: > Hello, I've written a few small CGI apps in which i've used an MS > Access dB as the backend. Until now, I've only had to use select and > insert statements and everything's been hunky dory. Whenever I try to > run a very simple UPDATE or DELETE stmt like this > my $sqlstatement="DELETE * from Player WHERE > Player.playerName=\"Scooby\";"; print "$sqlstatement"; my $sth = > $dbh->prepare($sqlstatement); unless ($sth->execute) { die "Could not > execute SQL statement ... maybe invalid?"; } > I get an error reading: > DBD::ODBC::st execute failed: [Microsoft][ODBC Microsoft Access > Driver] Too few parameters. Expected 1 > . (SQL-07001)(DBD: st_execute/SQLExecute err=-1) at update.pl line 26. > I don't want to change the design of my dB to get around this, but I > haven't been able to get this to work for a few days now. Does anyone > have experience with this? > Thanks, EB - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From keith.reed at philips.com Tue May 29 17:27:43 2001 From: keith.reed at philips.com (keith.reed@philips.com) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: MS Access and DBI Message-ID: <0056910012320689000002L192*@MHS> If you have a newline imbedded in your SQL command string, MS-Access can't handle it. -Keith - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From eric.brose at attws.com Tue May 29 17:52:40 2001 From: eric.brose at attws.com (Brose, Eric) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: MS Access and DBI Message-ID: <67AC2DB52118D411A8F300508B957F1204B144E0@WA-MSG02> That's it! Weird...so I guess I'll have to enter parameters for UPDATE and DELETE queries into the execute function. I wonder why I could pass all of my qualifiers through just fine using select and insert statments and I have to change it in cases like these. Thanks, Eric -----Original Message----- From: Craig Sutton [mailto:craig@n2h2.com] Sent: Tuesday, May 29, 2001 3:37 PM To: Brose, Eric Subject: RE: SPUG: MS Access and DBI oh... I think I had that mixed up. It should be: my $var = "Scooby"; my $sql = "DELETE * from Player where Player.playerName = ?"; my $sth = $dbh->prepare($sql); $sth->execute($var); $var was in the wrong place. :) Craig --------------------------------------------------------- Craig Sutton ICE Programming type | Plagiarism saves time. N2H2 Inc. Phone: 1.206.336.2929 E-Mail: craig@n2h2.com 900 4th Ave Suite #3400, Seattle, WA 98164 On Tue, 29 May 2001, Brose, Eric wrote: > C:\My Documents\My Projects\nfl2K2>perl update.pl > DBI::st=HASH(0x10257a4)->_prepare(...): attribute parameter 'Scooby' is not > a hash ref at C:/Perl/site/lib/DBD/ODBC.pm line 99. > > > Why is it trying to interpret this as a hash ref? > -----Original Message----- > From: Craig Sutton [mailto:craig@n2h2.com] > Sent: Tuesday, May 29, 2001 2:54 PM > To: Brose, Eric > Subject: Re: SPUG: MS Access and DBI > > > Try something like: > > my $var = "Scooby"; > my $sql = "DELETE * from Player where Player.playerName = ?"; > my $sth = $dbh->prepare($sql, $var); > $sth->execute(); > > See if that does the job. > > > Craig > > --------------------------------------------------------- > Craig Sutton > ICE Programming type | Plagiarism saves time. > N2H2 Inc. > Phone: 1.206.336.2929 > E-Mail: craig@n2h2.com > 900 4th Ave Suite #3400, Seattle, WA 98164 > > > On Tue, 29 May 2001, Brose, Eric wrote: > > > Hello, > > > > I've written a few small CGI apps in which i've used an MS Access dB as > the > > backend. Until now, I've only had to use select and insert statements and > > everything's been hunky dory. Whenever I try to run a very simple UPDATE > or > > DELETE stmt like this > > > > my $sqlstatement="DELETE * from Player WHERE > > Player.playerName=\"Scooby\";"; > > print "$sqlstatement"; > > my $sth = $dbh->prepare($sqlstatement); > > unless ($sth->execute) { > > die "Could not execute SQL statement ... maybe invalid?"; > > } > > > > I get an error reading: > > > > DBD::ODBC::st execute failed: [Microsoft][ODBC Microsoft Access Driver] > Too > > few parameters. Expected 1 > > . (SQL-07001)(DBD: st_execute/SQLExecute err=-1) at update.pl line 26. > > > > I don't want to change the design of my dB to get around this, but I > haven't > > been able to get this to work for a few days now. Does anyone have > > experience with this? > > > > Thanks, > > EB > > > > > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > > 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://www.halcyon.com/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://www.halcyon.com/spug/ From wildwood_players at yahoo.com Tue May 29 17:57:41 2001 From: wildwood_players at yahoo.com (Richard Wood) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: MS Access and DBI In-Reply-To: <15124.7759.311469.598803@maakie.uswc.uswest.com> Message-ID: <20010529225741.41949.qmail@web11504.mail.yahoo.com> I don't use DBI on Access but I use it heavily on Oracle. Here are examples of one of my deletes and updates: THE DELETE $dbh->do("DELETE temp_npanxx WHERE npanxx = $db_npanxx AND npac_site = '$db_npacsite'") || warn "\nThe delete row from temp_npaxx failed: $DBI::errstr\n"; THE UPDATE $sth_update = $dbh->prepare("UPDATE NPAC_NPANXX SET npac_site = ?, effective_dt = to_date(?,'SYYYYMMDDHH24MISS'), ocn = ?, company = ?, update_dt = to_date(?,'SYYYYMMDDHH24MISS'), active_cd = ? WHERE npanxx = ? AND npac_site = ?"); $sth_update->execute( $npacsite, $u_effdate, $ocn, $ucompany, $u_update_dt, $active_cd, $npanxx, $npacsite); die "Unexpected Oracle error: $DBI::errstr\n" if (!$DBI::errstr =~ /NPAC_NPANXX_PK/); I hope this gives some insight. Regards, Rich Wood --- David Bitseff wrote: > > > Sorry, > > What I meant was; Try removing the '*' character. > I'm not familiar > with Access, but I think SQL delete statements don't > have an asterisk. > > > Brose, Eric writes: > > > Hello, I've written a few small CGI apps in which > i've used an MS > > Access dB as the backend. Until now, I've only had > to use select and > > insert statements and everything's been hunky > dory. Whenever I try to > > run a very simple UPDATE or DELETE stmt like this > > > my $sqlstatement="DELETE * from Player WHERE > > Player.playerName=\"Scooby\";"; print > "$sqlstatement"; my $sth = > > $dbh->prepare($sqlstatement); unless > ($sth->execute) { die "Could not > > execute SQL statement ... maybe invalid?"; } > > > I get an error reading: > > > DBD::ODBC::st execute failed: [Microsoft][ODBC > Microsoft Access > > Driver] Too few parameters. Expected 1 > > . (SQL-07001)(DBD: st_execute/SQLExecute err=-1) > at update.pl line 26. > > > I don't want to change the design of my dB to get > around this, but I > > haven't been able to get this to work for a few > days now. Does anyone > > have experience with this? > > > Thanks, EB > > - - - - - - - - - - - - - - - - - - - - - - - - - - > - - - - - - - - - - - > 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://www.halcyon.com/spug/ > > ===== Richard O. Wood Wildwood IT Consultants, Inc. wildwood_players@yahoo.com 425.941.9437 __________________________________________________ Do You Yahoo!? Yahoo! Auctions - buy the things you want at great prices http://auctions.yahoo.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://www.halcyon.com/spug/ From alyssa at atuin.net Wed May 30 17:57:59 2001 From: alyssa at atuin.net (Alyssa Harding) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: MS Access and DBI References: <67AC2DB52118D411A8F300508B957F1204B144DB@WA-MSG02> <15124.7759.311469.598803@maakie.uswc.uswest.com> Message-ID: <3B157AF7.3030603@atuin.net> you seem to be deleting everything from the Player table where the Player schema's playerName table = Scooby... I think you may mean: DELETE from Player WHERE playerName = "Scooby" (delete everything from the Player table for the player named "Scooby" while you are logging in as the DB user who owns this table) my $sql = 'DELETE from Player WHERE playerName = "Scooby"'; A. David Bitseff wrote: > > Sorry, > > What I meant was; Try removing the '*' character. I'm not familiar > with Access, but I think SQL delete statements don't have an asterisk. > > > Brose, Eric writes: >> my $sqlstatement="DELETE * from Player WHERE Player.playerName=\"Scooby\";"; -- Alyssa Harding http://www.atuin.net/~alyssa ------------------------------------------------------------------- "The thing is that Mr. Dibbler can even sell sausages to people who have bought them off him *before*." -- Now *that's* marketing (Terry Pratchett, Moving Pictures) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From eric.brose at attws.com Tue May 29 18:03:02 2001 From: eric.brose at attws.com (Brose, Eric) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: MS Access and DBI Message-ID: <67AC2DB52118D411A8F300508B957F1204B144E2@WA-MSG02> Yes. It isn't necessary to use the asterik. Access doesn't seem to mind when you do though. Thanks, Eric -----Original Message----- From: Alyssa Harding [mailto:alyssa@atuin.net] Sent: Wednesday, May 30, 2001 3:58 PM To: dbitsef@qwest.com Cc: Brose, Eric; 'spug-list@pm.org' Subject: Re: SPUG: MS Access and DBI you seem to be deleting everything from the Player table where the Player schema's playerName table = Scooby... I think you may mean: DELETE from Player WHERE playerName = "Scooby" (delete everything from the Player table for the player named "Scooby" while you are logging in as the DB user who owns this table) my $sql = 'DELETE from Player WHERE playerName = "Scooby"'; A. David Bitseff wrote: > > Sorry, > > What I meant was; Try removing the '*' character. I'm not familiar > with Access, but I think SQL delete statements don't have an asterisk. > > > Brose, Eric writes: >> my $sqlstatement="DELETE * from Player WHERE Player.playerName=\"Scooby\";"; -- Alyssa Harding http://www.atuin.net/~alyssa ------------------------------------------------------------------- "The thing is that Mr. Dibbler can even sell sausages to people who have bought them off him *before*." -- Now *that's* marketing (Terry Pratchett, Moving Pictures) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From jope-spug at jope.net Wed May 30 17:59:05 2001 From: jope-spug at jope.net (El JoPe Magnifico) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: site clutter Message-ID: (Apologies if this has already been discussed. I've been off the list for the past six months, and haven't been to a meeting in eons. *gulp!*) The front page of the SPUG site is a badly cluttered with old meeting blurbs, going back over twelve months. It would be a good idea to move those to a separate page, and just link from a description-less table of contents on the front page, if not just from a single link. And while I'm on the topic of the website... Is there any reason not to move it to the pm.org server? Consistency with the other PM's aside, that server has mod_perl, which I'm guessing Halcyon's server does not. =) An alternative (or companion) would be to move the site to SourceForge, which would offer different benefit: * ability to share site admin duties among multiple admins. * a superbly equipped staging ground for group code collaborations; this was discussed at one time, though that was before Vancouver stole Brian Ingerson, who was the main proponent of the idea. -jp PS: I'm baaaaaack...! =) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 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://www.halcyon.com/spug/ From joshlanza at hotmail.com Wed May 30 18:44:35 2001 From: joshlanza at hotmail.com (Joshua Lanza) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: site clutter Message-ID: I've attended a few meetings and been on this list for about a year and have learned much Perl from it (actually looked at Perl for the first time at an e-spug meeting), and have had some questions answered that helped me to get work done in a pinch. I am not a Perl god, though, so I can't give back to the community by presenting at meetings, but I am a web developer and would be happy to contribute to the group by doing a bit of site work. Incidentally, I do work at *that* place in redmond, so my pages come out looking a bit evil sometimes, but I would do my level best to preserve the current look and feel. Josh (just another aspiring Perl hacker) >From: El JoPe Magnifico >To: Seattle Perl Users Group >Subject: SPUG: site clutter >Date: Wed, 30 May 2001 15:59:05 -0700 (PDT) > >(Apologies if this has already been discussed. I've been off the list >for the past six months, and haven't been to a meeting in eons. *gulp!*) > >The front page of the SPUG site is a badly cluttered with old meeting >blurbs, going back over twelve months. It would be a good idea to move >those to a separate page, and just link from a description-less table >of contents on the front page, if not just from a single link. > >And while I'm on the topic of the website... > >Is there any reason not to move it to the pm.org server? Consistency >with the other PM's aside, that server has mod_perl, which I'm guessing >Halcyon's server does not. =) > >An alternative (or companion) would be to move the site to SourceForge, >which would offer different benefit: > * ability to share site admin duties among multiple admins. > * a superbly equipped staging ground for group code collaborations; > this was discussed at one time, though that was before Vancouver > stole Brian Ingerson, who was the main proponent of the idea. > >-jp > >PS: I'm baaaaaack...! =) > > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > 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://www.halcyon.com/spug/ > > _________________________________________________________________ Get your FREE download of MSN Explorer at http://explorer.msn.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://www.halcyon.com/spug/ From dvergin at igc.org Thu May 31 14:03:37 2001 From: dvergin at igc.org (David Vergin) Date: Wed Aug 4 00:08:03 2004 Subject: SPUG: site clutter In-Reply-To: Message-ID: <001d01c0ea04$660ef940$0ba0fea9@bigmindmedia.com> I am working on revamping the SPUG site (off and on). It seems to always be the *second* thing on my to-do list. I'll take this as a prompting to get off my duff and do something or turn it over to someone else. Stay tuned, Josh. David V > -----Original Message----- > From: owner-spug-list@pm.org [mailto:owner-spug-list@pm.org]On Behalf Of > Joshua Lanza > Sent: Wednesday, May 30, 2001 3:45 PM > To: jope-spug@jope.net; spug-list@pm.org > Subject: Re: SPUG: site clutter > > > > I've attended a few meetings and been on this list for about a year and have > learned much Perl from it (actually looked at Perl for the first time at an > e-spug meeting), and have had some questions answered that helped me to get > work done in a pinch. I am not a Perl god, though, so I can't give back to > the community by presenting at meetings, but I am a web developer and would > be happy to contribute to the group by doing a bit of site work. > > Incidentally, I do work at *that* place in redmond, so my pages come out > looking a bit evil sometimes, but I would do my level best to preserve the > current look and feel. > > Josh > (just another aspiring Perl hacker) > > > >From: El JoPe Magnifico > >To: Seattle Perl Users Group > >Subject: SPUG: site clutter > >Date: Wed, 30 May 2001 15:59:05 -0700 (PDT) > > > >(Apologies if this has already been discussed. I've been off the list > >for the past six months, and haven't been to a meeting in eons. *gulp!*) > > > >The front page of the SPUG site is a badly cluttered with old meeting > >blurbs, going back over twelve months. It would be a good idea to move > >those to a separate page, and just link from a description-less table > >of contents on the front page, if not just from a single link. > > > >And while I'm on the topic of the website... > > > >Is there any reason not to move it to the pm.org server? Consistency > >with the other PM's aside, that server has mod_perl, which I'm guessing > >Halcyon's server does not. =) > > > >An alternative (or companion) would be to move the site to SourceForge, > >which would offer different benefit: > > * ability to share site admin duties among multiple admins. > > * a superbly equipped staging ground for group code collaborations; > > this was discussed at one time, though that was before Vancouver > > stole Brian Ingerson, who was the main proponent of the idea. > > > >-jp > > > >PS: I'm baaaaaack...! =) > > > > > > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - > > 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://www.halcyon.com/spug/ > > > > > > _________________________________________________________________ > Get your FREE download of MSN Explorer at http://explorer.msn.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://www.halcyon.com/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://www.halcyon.com/spug/