From KSmith at netLibrary.com Thu Jun 20 13:46:46 2002 From: KSmith at netLibrary.com (Keanan Smith) Date: Wed Aug 4 23:58:42 2004 Subject: [boulder.pm] Hmm, now this is either the most boring list ever, or it's broken :) Message-ID: <8B499C5ACCA965439B3F6712E7ADABBD0DD0C7@mailman.netlibrary.com> So, the question is which, I've recieved no messages of any kind from this list in the two weeks since I put myself on it, and I was really hoping for some fun/silly nerdy perl-type conversations, which I could randomly participate in... So is this list broken, or am I going to have to start a conversation by myself? From gfa at idiom.com Thu Jun 20 13:52:15 2002 From: gfa at idiom.com (Glenn Ashton) Date: Wed Aug 4 23:58:42 2004 Subject: [boulder.pm] Hmm, now this is either the most boring list ever, or it's broken :) In-Reply-To: <8B499C5ACCA965439B3F6712E7ADABBD0DD0C7@mailman.netlibrary.com> Message-ID: > So is this list broken, or am I going to have to start a conversation by > myself? Wouldn't you be talking to yourself then? -Glenn Ashton From mraley_2000 at yahoo.com Thu Jun 20 13:54:15 2002 From: mraley_2000 at yahoo.com (Mark Raley) Date: Wed Aug 4 23:58:42 2004 Subject: [boulder.pm] Hmm, now this is either the most boring list ever, or it's broken :) In-Reply-To: <8B499C5ACCA965439B3F6712E7ADABBD0DD0C7@mailman.netlibrary.com> Message-ID: <20020620185415.86658.qmail@web21411.mail.yahoo.com> Hi Keanan, No, the list is not broken, it just doesn't get much traffic. Say, do you know Tom Whitcomb? Mark --- Keanan Smith wrote: > So, the question is which, I've recieved no messages of any kind from > this > list in the two weeks since I put myself on it, > and I was really hoping for some fun/silly nerdy perl-type > conversations, > which I could randomly participate in... > > So is this list broken, or am I going to have to start a conversation by > myself? __________________________________________________ Do You Yahoo!? Yahoo! - Official partner of 2002 FIFA World Cup http://fifaworldcup.yahoo.com From KSmith at netLibrary.com Thu Jun 20 14:06:57 2002 From: KSmith at netLibrary.com (Keanan Smith) Date: Wed Aug 4 23:58:42 2004 Subject: [boulder.pm] Hmm, now this is either the most boring list eve r, or it's broken :) Message-ID: <8B499C5ACCA965439B3F6712E7ADABBD0DD0C9@mailman.netlibrary.com> Hmm, I've met him once or twice, not really though. I don't work with him directly. -----Original Message----- From: Mark Raley [mailto:mraley_2000@yahoo.com] Sent: Thursday, June 20, 2002 12:54 PM To: boulder-pm-list@happyfunball.pm.org Subject: Re: [boulder.pm] Hmm, now this is either the most boring list ever, or it's broken :) Hi Keanan, No, the list is not broken, it just doesn't get much traffic. Say, do you know Tom Whitcomb? Mark --- Keanan Smith wrote: > So, the question is which, I've recieved no messages of any kind from > this > list in the two weeks since I put myself on it, > and I was really hoping for some fun/silly nerdy perl-type > conversations, > which I could randomly participate in... > > So is this list broken, or am I going to have to start a conversation by > myself? __________________________________________________ Do You Yahoo!? Yahoo! - Official partner of 2002 FIFA World Cup http://fifaworldcup.yahoo.com From porterje at us.ibm.com Thu Jun 20 14:09:52 2002 From: porterje at us.ibm.com (Jessee Porter) Date: Wed Aug 4 23:58:42 2004 Subject: [boulder.pm] Hmm, now this is either the most boring list ever, or it's broken :) Message-ID: ssh, we're all coding. regards, Jesse Porter -- As we enjoy great advantages from inventions of others, we should be glad of an opportunity to serve others by any invention of ours; and this we should do freely and generously. -- Benjamin Franklin From KSmith at netLibrary.com Thu Jun 20 14:11:58 2002 From: KSmith at netLibrary.com (Keanan Smith) Date: Wed Aug 4 23:58:42 2004 Subject: [boulder.pm] Hmm, now this is either the most boring list eve r, or it's broken :) Message-ID: <8B499C5ACCA965439B3F6712E7ADABBD0DD0CA@mailman.netlibrary.com> Well, of course the point of sending something to the list was to see if anyone else was actually *on* this list Which of course wasn't the case... If I was talking to myself then that would've been the end of the conversation, which it obviously wasn't eh? :) -----Original Message----- From: Glenn Ashton [mailto:gfa@idiom.com] Sent: Thursday, June 20, 2002 12:52 PM To: boulder-pm-list@happyfunball.pm.org Subject: Re: [boulder.pm] Hmm, now this is either the most boring list ever, or it's broken :) > So is this list broken, or am I going to have to start a conversation by > myself? Wouldn't you be talking to yourself then? -Glenn Ashton From fibonaci at babylonia.flatirons.org Thu Jun 20 14:25:39 2002 From: fibonaci at babylonia.flatirons.org (Luke Palmer) Date: Wed Aug 4 23:58:42 2004 Subject: [boulder.pm] Hmm, now this is either the most boring list ever, or it's broken :) In-Reply-To: <8B499C5ACCA965439B3F6712E7ADABBD0DD0C7@mailman.netlibrary.com> Message-ID: On Thu, 20 Jun 2002, Keanan Smith wrote: > So, the question is which, I've recieved no messages of any kind from this > list in the two weeks since I put myself on it, > and I was really hoping for some fun/silly nerdy perl-type conversations, > which I could randomly participate in... > > So is this list broken, or am I going to have to start a conversation by > myself? You just did. So... how 'bout that Perl 6? Do any of you guys write to perl6-language or perl6-internals (i.e. do I know you)? Also, what fields does everybody work in; what do they use perl for? I'm just a recreational programmer, and I teach Perl to small groups of people on occasion. Yep. Oh yeah, so has everyone read through Apocalypse 5? What do you think of Larry's tear-down-and-rebuild regex thing? This should keep conversation going for at least ten minutes :) Luke From fibonaci at babylonia.flatirons.org Thu Jun 20 14:25:39 2002 From: fibonaci at babylonia.flatirons.org (Luke Palmer) Date: Wed Aug 4 23:58:42 2004 Subject: [boulder.pm] Hmm, now this is either the most boring list ever, or it's broken :) In-Reply-To: <8B499C5ACCA965439B3F6712E7ADABBD0DD0C7@mailman.netlibrary.com> Message-ID: On Thu, 20 Jun 2002, Keanan Smith wrote: > So, the question is which, I've recieved no messages of any kind from this > list in the two weeks since I put myself on it, > and I was really hoping for some fun/silly nerdy perl-type conversations, > which I could randomly participate in... > > So is this list broken, or am I going to have to start a conversation by > myself? You just did. So... how 'bout that Perl 6? Do any of you guys write to perl6-language or perl6-internals (i.e. do I know you)? Also, what fields does everybody work in; what do they use perl for? I'm just a recreational programmer, and I teach Perl to small groups of people on occasion. Yep. Oh yeah, so has everyone read through Apocalypse 5? What do you think of Larry's tear-down-and-rebuild regex thing? This should keep conversation going for at least ten minutes :) Luke From svq at peakpeak.com Thu Jun 20 15:03:21 2002 From: svq at peakpeak.com (svq) Date: Wed Aug 4 23:58:42 2004 Subject: [boulder.pm] Hmm, now this is either the most boring list ever,or it's broken :) References: Message-ID: <3D123509.9B83B4E4@peakpeak.com> Luke Palmer wrote: > On Thu, 20 Jun 2002, Keanan Smith wrote: > > > So, the question is which, I've recieved no messages of any kind from this > > list in the two weeks since I put myself on it, > > and I was really hoping for some fun/silly nerdy perl-type conversations, > > which I could randomly participate in... > > > > So is this list broken, or am I going to have to start a conversation by > > myself? > > You just did. So... how 'bout that Perl 6? Do any of you guys write to > perl6-language or perl6-internals (i.e. do I know you)? Also, what fields > does everybody work in; what do they use perl for? > > I'm just a recreational programmer, and I teach Perl to small groups of > people on occasion. Yep. > > Oh yeah, so has everyone read through Apocalypse 5? What do you think of > Larry's tear-down-and-rebuild regex thing? > > This should keep conversation going for at least ten minutes :) > > Luke I've belonged to the list for a while and have never seen any activity on it before. In fact, I had pretty much forgotten about it. I figured everyone who used perl was like me and knew everything there was to know. :) I have not yet used perl professionally. In fact it has been a couple of months since I used it at all. My purpose for joining the list was just to read and try and understand other peoples problems so that it would maybe stay in my head after reading a couple of books on it. That hasn't been working out very well as you may have guessed. Maybe some good perl discussion will ensue after this? Steve Queen From walter at frii.com Thu Jun 20 20:22:21 2002 From: walter at frii.com (Walter Pienciak) Date: Wed Aug 4 23:58:42 2004 Subject: [boulder.pm] Hmm, now this is either the most boring list ever, or it's broken :) In-Reply-To: <8B499C5ACCA965439B3F6712E7ADABBD0DD0C7@mailman.netlibrary.com> Message-ID: On Thu, 20 Jun 2002, Keanan Smith wrote: > So, the question is which, I've recieved no messages of any kind from this > list in the two weeks since I put myself on it, > and I was really hoping for some fun/silly nerdy perl-type conversations, > which I could randomly participate in... > > So is this list broken, Nope. > or am I going to have to start a conversation by myself? Yep. Walter From walter at frii.com Thu Jun 20 20:23:44 2002 From: walter at frii.com (Walter Pienciak) Date: Wed Aug 4 23:58:42 2004 Subject: [boulder.pm] Non-member submission from ["J. Wayde Allen" ] (fwd) Message-ID: ---------- Forwarded message ---------- Date: Thu, 20 Jun 2002 14:03:01 -0500 From: owner-boulder-pm-list@pm.org To: boulder-pm-list-approval@pm.org Subject: BOUNCE boulder-pm-list@pm.org: Non-member submission from ["J. Wayde Allen" ] >From walter@frii.com Thu Jun 20 14:03:01 2002 Received: from green.its.bldrdoc.gov (green.its.bldrdoc.gov [132.163.64.205]) by mail.pm.org (8.11.6/8.11.3) with ESMTP id g5KJ30L25910 for ; Thu, 20 Jun 2002 14:03:00 -0500 Received: from gemini.its.bldrdoc.gov (wallen@gemini.its.bldrdoc.gov [132.163.64.73]) by green.its.bldrdoc.gov (8.9.2/8.9.2) with ESMTP id MAA06614; Thu, 20 Jun 2002 12:54:21 -0600 (MDT) Date: Thu, 20 Jun 2002 13:09:15 -0600 (MDT) From: "J. Wayde Allen" To: boulder-pm-list@happyfunball.pm.org cc: "'boulder-pm-list@pm.org'" Subject: Re: [boulder.pm] Hmm, now this is either the most boring list ever, or it's broken :) In-Reply-To: <8B499C5ACCA965439B3F6712E7ADABBD0DD0C7@mailman.netlibrary.com> Message-ID: MIME-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII On Thu, 20 Jun 2002, Keanan Smith wrote: > So is this list broken, or am I going to have to start a conversation > by myself? The list is not broken. There just hasn't been much traffic lately. - Wayde (wallen@its.bldrdoc.gov) From walter at frii.com Thu Jun 20 20:25:25 2002 From: walter at frii.com (Walter Pienciak) Date: Wed Aug 4 23:58:42 2004 Subject: [boulder.pm] Non-member submission from [ljp ] (fwd) Message-ID: ---------- Forwarded message ---------- Date: Thu, 20 Jun 2002 15:13:21 -0500 From: owner-boulder-pm-list@pm.org To: boulder-pm-list-approval@pm.org Subject: BOUNCE boulder-pm-list@pm.org: Non-member submission from [ljp ] >From walter@frii.com Thu Jun 20 15:13:20 2002 Received: from charon.host4u.net (charon.host4u.net [209.150.128.172]) by mail.pm.org (8.11.6/8.11.3) with ESMTP id g5KKDKL26186 for ; Thu, 20 Jun 2002 15:13:20 -0500 Received: from shippin-.llornkcor.com (ppp13.jymis.com [63.173.117.78]) by charon.host4u.net (8.11.6/8.11.6) with ESMTP id g5KK4mD22052 for ; Thu, 20 Jun 2002 15:04:48 -0500 Message-Id: <5.0.2.1.2.20020621030437.02272b58@llornkcor.com> X-Sender: llornkcor@llornkcor.com X-Mailer: QUALCOMM Windows Eudora Version 5.0.2 Date: Fri, 21 Jun 2002 03:05:09 +0700 To: boulder-pm-list@happyfunball.pm.org From: ljp Subject: Re: [boulder.pm] Hmm, now this is either the most boring list ever, or it's broken :) In-Reply-To: <8B499C5ACCA965439B3F6712E7ADABBD0DD0C7@mailman.netlibrary. com> Mime-Version: 1.0 Content-Type: text/plain; charset="us-ascii"; format=flowed Hey, I'd forgotten all about this list.. heh.. very low traffic, indeed ljp At 12:46 PM 6/20/2002 -0600, you wrote: >So, the question is which, I've recieved no messages of any kind from this >list in the two weeks since I put myself on it, >and I was really hoping for some fun/silly nerdy perl-type conversations, >which I could randomly participate in... > >So is this list broken, or am I going to have to start a conversation by >myself? Open Palmtop Integrated Environment http://opie.handhelds.org llornkcor@handhelds.org From nagler at bivio.biz Thu Jun 20 20:25:14 2002 From: nagler at bivio.biz (Rob Nagler) Date: Wed Aug 4 23:58:42 2004 Subject: [boulder.pm] Hmm, now this is either the most boring list ever,or it's broken :) In-Reply-To: <3D123509.9B83B4E4@peakpeak.com> References: <3D123509.9B83B4E4@peakpeak.com> Message-ID: <15634.32890.772000.804087@gargle.gargle.HOWL> svq writes: > Maybe some good perl discussion will ensue after this? I have been thinking about Perl and little languages lately. There has been a variety of discussions, e.g., rpm-list@redhat.com, about using XML for little languages. To my mind XML is an inappropriate solution if you don't need heterogeneous data exchange. If you are using Perl, Data::Dumper/do/eval is the right solution for all little language problems. Nothing like a bold statement to get the conversation going, eh? Rob From fibonaci at babylonia.flatirons.org Thu Jun 20 22:56:13 2002 From: fibonaci at babylonia.flatirons.org (Luke Palmer) Date: Wed Aug 4 23:58:42 2004 Subject: [boulder.pm] Hmm, now this is either the most boring list ever,or it's broken :) In-Reply-To: <15634.32890.772000.804087@gargle.gargle.HOWL> Message-ID: On Thu, 20 Jun 2002, Rob Nagler wrote: > svq writes: > > Maybe some good perl discussion will ensue after this? > > I have been thinking about Perl and little languages lately. There > has been a variety of discussions, e.g., rpm-list@redhat.com, about > using XML for little languages. To my mind XML is an inappropriate > solution if you don't need heterogeneous data exchange. Agreed. I don't like XML much at all, actually. I was never much of an *ML fan; I've preferred LaTeX for typesetting, whatever for data exchange (mostly some convoluted protocol), et cetera. > If you are > using Perl, Data::Dumper/do/eval is the right solution for all little > language problems. Well, apparently people like Scheme. Hey, I figure it's easy to parse and it's easy to write (except for when you need to *do* something, NPI), so why not. Perl, even if it's just simple stuff, is not easy to parse (you need something as complex as Perl to do it), so if you're writing in non-Perl (but why?), you're screwed (I'm even getting irritated by all this stuff (parenthetical expressions, that is (sorry (this is starting to look like Scheme :)))). Has anyone else heard of alternatives to XML and Scheme that are tolerable? Any of these that there is not a CPAN mod for yet (I need to contribute something... anything). > Nothing like a bold statement to get the conversation going, eh? Eh indeed. Luke From nagler at bivio.biz Thu Jun 20 23:25:45 2002 From: nagler at bivio.biz (Rob Nagler) Date: Wed Aug 4 23:58:42 2004 Subject: [boulder.pm] Hmm, now this is either the most boring list ever,or it's broken :) In-Reply-To: References: <15634.32890.772000.804087@gargle.gargle.HOWL> Message-ID: <15634.43721.90000.883108@gargle.gargle.HOWL> Luke Palmer writes: > Perl, even if it's just simple stuff, is not easy to parse (you > need something as complex as Perl to do it), so if you're writing in > non-Perl (but why?), you're screwed (I'm even getting irritated by all > this stuff (parenthetical expressions, that is (sorry (this is > starting to look like Scheme :)))). Fortunately a guy named Larry wrote this cool interpreter for Perl. ;-) The reason I like Perl as a data format is that I can just "eval" or "do" it. It's literally a one-liner. Rob From davek at saturn5.com Fri Jun 21 01:01:07 2002 From: davek at saturn5.com (David Nicholas Kayal) Date: Wed Aug 4 23:58:42 2004 Subject: [boulder.pm] Hmm, now this is either the most boring list ever,or it's broken :) In-Reply-To: Message-ID: lets do an emacs vs vi thread. i'm living in san francisco and leaving for boulder tomorrow morning for a friends wedding. then thinking of heading out to mesa verde. i am lead to understand that the weather is on the hot side. i want to climb to the top of bear peak. maybe it will be covered with lady bugs again. millions and millions of them. anyway... i prefer emacs. On Thu, 20 Jun 2002, Luke Palmer wrote: > On Thu, 20 Jun 2002, Rob Nagler wrote: > > > svq writes: > > > Maybe some good perl discussion will ensue after this? > > > > I have been thinking about Perl and little languages lately. There > > has been a variety of discussions, e.g., rpm-list@redhat.com, about > > using XML for little languages. To my mind XML is an inappropriate > > solution if you don't need heterogeneous data exchange. > > Agreed. I don't like XML much at all, actually. I was never much of an *ML > fan; I've preferred LaTeX for typesetting, whatever for data exchange > (mostly some convoluted protocol), et cetera. > > > If you are > > using Perl, Data::Dumper/do/eval is the right solution for all little > > language problems. > > Well, apparently people like Scheme. Hey, I figure it's easy to parse and > it's easy to write (except for when you need to *do* something, NPI), so > why not. Perl, even if it's just simple stuff, is not easy to parse (you > need something as complex as Perl to do it), so if you're writing in > non-Perl (but why?), you're screwed (I'm even getting irritated by all > this stuff (parenthetical expressions, that is (sorry (this is > starting to look like Scheme :)))). > > Has anyone else heard of alternatives to XML and Scheme that are > tolerable? Any of these that there is not a CPAN mod for yet (I need to > contribute something... anything). > > > Nothing like a bold statement to get the conversation going, eh? > > Eh indeed. > > Luke > > From myke at komar.org Fri Jun 21 01:24:57 2002 From: myke at komar.org (Myke Komarnitsky) Date: Wed Aug 4 23:58:42 2004 Subject: [boulder.pm] ok, I've got a perl question Message-ID: <5.1.0.14.0.20020621002215.00a64880@boulder.aescon.com> This is more stylistic I think than syntactical.... but here goes. Most of my perl work is for web sites - databases, forms, cgi, etc... often of the time, inputted data is being put in a mysql database. Thus, you have to parse and prepare the user's data. Silly and obvious question: how do YOU go about getting the user data? every perl example I see has the OO style, eg. use CGI; $cgi = new CGI; my $name = $cgi->param("name"); my $email = $cgi->param("email"); which works, well, ok. However, on one site, I have about 8 public forms and 30 admin forms. Typing all that explicitly is a pain in the ass, and it's rife with opportunity to misspell a variable. My way of getting the data is by using use CGI qw/:cgi-lib -no_debug/; &ReadParse; which ends up giving me an %in hash with all the variables in there (eg. $in{'name'},$in{'email'}, etc..). Nice benefits: I can loop through that hash for security/data sanitization Escaping the data for 's for database input If I add another field in the form, I don't have to add another line to the perl script. Error logging: on an error, I do foreach $key (sort keys %in) { print "$key ==> $in{$key}\n";} which is handy for troubleshooting what your input data is. I don't seem to ever run into other code that uses this method (an ancient and unnamed local perl fanatic taught me this method, I must confess), so I'm wondering if I'm missing something fantastically obvious. Myke Michael Komarnitsky Komar Consulting Group 303.818.3718 http://www.komar.biz http://climbingboulder.com http://myke.komar.org - From davek at saturn5.com Fri Jun 21 01:35:59 2002 From: davek at saturn5.com (David Nicholas Kayal) Date: Wed Aug 4 23:58:42 2004 Subject: [boulder.pm] ok, I've got a perl question In-Reply-To: <5.1.0.14.0.20020621002215.00a64880@boulder.aescon.com> Message-ID: I have this template I use for making a web page. http://yayproductions.com/nice_start_cgi.txt On Fri, 21 Jun 2002, Myke Komarnitsky wrote: > This is more stylistic I think than syntactical.... but here goes. > > Most of my perl work is for web sites - databases, forms, cgi, etc... often > of the time, inputted data is being put in a mysql database. Thus, you have > to parse and prepare the user's data. > > Silly and obvious question: how do YOU go about getting the user data? > > every perl example I see has the OO style, eg. > use CGI; > $cgi = new CGI; > my $name = $cgi->param("name"); > my $email = $cgi->param("email"); > > which works, well, ok. However, on one site, I have about 8 public forms > and 30 admin forms. Typing all that explicitly is a pain in the ass, and > it's rife with opportunity to misspell a variable. > > > My way of getting the data is by using > use CGI qw/:cgi-lib -no_debug/; > &ReadParse; > which ends up giving me an %in hash with all the variables in there (eg. > $in{'name'},$in{'email'}, etc..). Nice benefits: > I can loop through that hash for security/data sanitization > Escaping the data for 's for database input > If I add another field in the form, I don't have to add another > line to the perl script. > Error logging: on an error, I do > foreach $key (sort keys %in) { print "$key ==> $in{$key}\n";} > which is handy for troubleshooting what your input data is. > > I don't seem to ever run into other code that uses this method (an ancient > and unnamed local perl fanatic taught me this method, I must confess), so > I'm wondering if I'm missing something fantastically obvious. > > Myke > > Michael Komarnitsky Komar Consulting Group > 303.818.3718 http://www.komar.biz > http://climbingboulder.com > http://myke.komar.org > - > > From davek at saturn5.com Fri Jun 21 01:35:59 2002 From: davek at saturn5.com (David Nicholas Kayal) Date: Wed Aug 4 23:58:42 2004 Subject: [boulder.pm] ok, I've got a perl question In-Reply-To: <5.1.0.14.0.20020621002215.00a64880@boulder.aescon.com> Message-ID: I have this template I use for making a web page. http://yayproductions.com/nice_start_cgi.txt On Fri, 21 Jun 2002, Myke Komarnitsky wrote: > This is more stylistic I think than syntactical.... but here goes. > > Most of my perl work is for web sites - databases, forms, cgi, etc... often > of the time, inputted data is being put in a mysql database. Thus, you have > to parse and prepare the user's data. > > Silly and obvious question: how do YOU go about getting the user data? > > every perl example I see has the OO style, eg. > use CGI; > $cgi = new CGI; > my $name = $cgi->param("name"); > my $email = $cgi->param("email"); > > which works, well, ok. However, on one site, I have about 8 public forms > and 30 admin forms. Typing all that explicitly is a pain in the ass, and > it's rife with opportunity to misspell a variable. > > > My way of getting the data is by using > use CGI qw/:cgi-lib -no_debug/; > &ReadParse; > which ends up giving me an %in hash with all the variables in there (eg. > $in{'name'},$in{'email'}, etc..). Nice benefits: > I can loop through that hash for security/data sanitization > Escaping the data for 's for database input > If I add another field in the form, I don't have to add another > line to the perl script. > Error logging: on an error, I do > foreach $key (sort keys %in) { print "$key ==> $in{$key}\n";} > which is handy for troubleshooting what your input data is. > > I don't seem to ever run into other code that uses this method (an ancient > and unnamed local perl fanatic taught me this method, I must confess), so > I'm wondering if I'm missing something fantastically obvious. > > Myke > > Michael Komarnitsky Komar Consulting Group > 303.818.3718 http://www.komar.biz > http://climbingboulder.com > http://myke.komar.org > - > > From fibonaci at babylonia.flatirons.org Fri Jun 21 02:52:34 2002 From: fibonaci at babylonia.flatirons.org (Luke Palmer) Date: Wed Aug 4 23:58:42 2004 Subject: [boulder.pm] ok, I've got a perl question In-Reply-To: Message-ID: On Thu, 20 Jun 2002, David Nicholas Kayal wrote: > I have this template I use for making a web page. > > http://yayproductions.com/nice_start_cgi.txt > I'm disappointed in you: you're a Perl programmer! :) Lines 18-23 are *far* too long. That's like... 30 more keystrokes than you need. You could replace it with this: my %input = map { ($_ => param($_)) } param(); You don't need @input because you can just replace it with C. The rest is okay because HTML and DB stuff is always ugly. Luke From fibonaci at babylonia.flatirons.org Fri Jun 21 02:52:34 2002 From: fibonaci at babylonia.flatirons.org (Luke Palmer) Date: Wed Aug 4 23:58:42 2004 Subject: [boulder.pm] ok, I've got a perl question In-Reply-To: Message-ID: On Thu, 20 Jun 2002, David Nicholas Kayal wrote: > I have this template I use for making a web page. > > http://yayproductions.com/nice_start_cgi.txt > I'm disappointed in you: you're a Perl programmer! :) Lines 18-23 are *far* too long. That's like... 30 more keystrokes than you need. You could replace it with this: my %input = map { ($_ => param($_)) } param(); You don't need @input because you can just replace it with C. The rest is okay because HTML and DB stuff is always ugly. Luke From fibonaci at babylonia.flatirons.org Fri Jun 21 03:05:22 2002 From: fibonaci at babylonia.flatirons.org (Luke Palmer) Date: Wed Aug 4 23:58:43 2004 Subject: [boulder.pm] ok, I've got a perl question In-Reply-To: <5.1.0.14.0.20020621002215.00a64880@boulder.aescon.com> Message-ID: On Fri, 21 Jun 2002, Myke Komarnitsky wrote: > This is more stylistic I think than syntactical.... but here goes. > > Most of my perl work is for web sites - databases, forms, cgi, etc... often > of the time, inputted data is being put in a mysql database. Thus, you have > to parse and prepare the user's data. > > Silly and obvious question: how do YOU go about getting the user data? Me? Oh, I use PHP (holds head in shame). PHP is a lot easier if you don't need to do any text processing; i.e. you're just getting variables and sticking them in a database. If, however, I _do_ need to use Perl (often enough), I use the kind of thing I said in my last reply: my %input = map { ($_ => $cgi->param($_)) } $cgi->param(); It's elegant, and it confuses those who aren't perl fluent, something I always go for. Is ReadParse builtin? I didn't know about it, but I usually don't like other people's subs populating globals for me. > every perl example I see has the OO style, eg. > use CGI; > $cgi = new CGI; > my $name = $cgi->param("name"); > my $email = $cgi->param("email"); > > which works, well, ok. However, on one site, I have about 8 public forms > and 30 admin forms. Typing all that explicitly is a pain in the ass, and > it's rife with opportunity to misspell a variable. Yeah, OO's stupid, when you only have one O. But, say you wanted to parse data from _two_ GET requests simultaneously (what?). But I use OO anyway, hypocritically, I guess. > > My way of getting the data is by using > use CGI qw/:cgi-lib -no_debug/; > &ReadParse; > which ends up giving me an %in hash with all the variables in there (eg. > $in{'name'},$in{'email'}, etc..). Nice benefits: > I can loop through that hash for security/data sanitization > Escaping the data for 's for database input > If I add another field in the form, I don't have to add another > line to the perl script. > Error logging: on an error, I do > foreach $key (sort keys %in) { print "$key ==> $in{$key}\n";} > which is handy for troubleshooting what your input data is. > > I don't seem to ever run into other code that uses this method (an ancient > and unnamed local perl fanatic taught me this method, I must confess), so > I'm wondering if I'm missing something fantastically obvious. Nah. It's just ugly. Those of us with "good programming habits" (who are we kidding?) don't do things like use global variables as parameter passing, other than Perl's very own punctuation variables, heh. Hey, when you're not writing maintainable code, I say, do what's the quickest to type. Luke From fibonaci at babylonia.flatirons.org Fri Jun 21 03:05:22 2002 From: fibonaci at babylonia.flatirons.org (Luke Palmer) Date: Wed Aug 4 23:58:43 2004 Subject: [boulder.pm] ok, I've got a perl question In-Reply-To: <5.1.0.14.0.20020621002215.00a64880@boulder.aescon.com> Message-ID: On Fri, 21 Jun 2002, Myke Komarnitsky wrote: > This is more stylistic I think than syntactical.... but here goes. > > Most of my perl work is for web sites - databases, forms, cgi, etc... often > of the time, inputted data is being put in a mysql database. Thus, you have > to parse and prepare the user's data. > > Silly and obvious question: how do YOU go about getting the user data? Me? Oh, I use PHP (holds head in shame). PHP is a lot easier if you don't need to do any text processing; i.e. you're just getting variables and sticking them in a database. If, however, I _do_ need to use Perl (often enough), I use the kind of thing I said in my last reply: my %input = map { ($_ => $cgi->param($_)) } $cgi->param(); It's elegant, and it confuses those who aren't perl fluent, something I always go for. Is ReadParse builtin? I didn't know about it, but I usually don't like other people's subs populating globals for me. > every perl example I see has the OO style, eg. > use CGI; > $cgi = new CGI; > my $name = $cgi->param("name"); > my $email = $cgi->param("email"); > > which works, well, ok. However, on one site, I have about 8 public forms > and 30 admin forms. Typing all that explicitly is a pain in the ass, and > it's rife with opportunity to misspell a variable. Yeah, OO's stupid, when you only have one O. But, say you wanted to parse data from _two_ GET requests simultaneously (what?). But I use OO anyway, hypocritically, I guess. > > My way of getting the data is by using > use CGI qw/:cgi-lib -no_debug/; > &ReadParse; > which ends up giving me an %in hash with all the variables in there (eg. > $in{'name'},$in{'email'}, etc..). Nice benefits: > I can loop through that hash for security/data sanitization > Escaping the data for 's for database input > If I add another field in the form, I don't have to add another > line to the perl script. > Error logging: on an error, I do > foreach $key (sort keys %in) { print "$key ==> $in{$key}\n";} > which is handy for troubleshooting what your input data is. > > I don't seem to ever run into other code that uses this method (an ancient > and unnamed local perl fanatic taught me this method, I must confess), so > I'm wondering if I'm missing something fantastically obvious. Nah. It's just ugly. Those of us with "good programming habits" (who are we kidding?) don't do things like use global variables as parameter passing, other than Perl's very own punctuation variables, heh. Hey, when you're not writing maintainable code, I say, do what's the quickest to type. Luke From fibonaci at babylonia.flatirons.org Fri Jun 21 03:09:48 2002 From: fibonaci at babylonia.flatirons.org (Luke Palmer) Date: Wed Aug 4 23:58:43 2004 Subject: [boulder.pm] Hmm, now this is either the most boring list ever,or it's broken :) In-Reply-To: Message-ID: > anyway... > > i prefer emacs. I like vim. It's all about the colors, baby. Emacs didn't have colors on console until 21.1, and now that it does, they are ugly. Especially Perl's. And I don't know how to write a emacs syntax file. For those of you who use vim, and like Perl 6 as much as me (ok, nobody), attached is my first draft of a Perl 6 syntax highlighting file. Why is emacs better? Luke -------------- next part -------------- " Vim syntax file " Language: Perl 6 " Maintainer: Luke Palmer " Last Change: 2002 Jun 12 " " This is a big undertaking. Perl 6 is the sort of language that only Perl " can parse. But I'll do my best to get vim to. " Die if there's already a defined syntax if exists("b:current_syntax") finish endif " Billions of keywords syn keyword p6KeyDecl sub is but syn keyword p6KeyScopeDecl my our local let temp syn keyword p6KeyFlow for foreach loop while until if unless when syn keyword p6KeyFlow given next last redo or and err xor return not syn keyword p6KeyException die fail try CATCH syn keyword p6KeyIO print open read write readline seek syn keyword p6KeyProperty const prec key value kv irs ofs ors pos int syn keyword p6KeyProperty float str true false syn keyword p6KeyFunc map sort split reduce keys grep values truncate syn keyword p6KeyFunc defined exists syn keyword p6KeySpecial operator undef syn keyword p6KeyCompare eq ne lt le gt ge syn match p6KeyIO "-[rwxoRWXOezsfdlpSbctugkTBMAC]" " Comments syn match p6Comment "#.*" " Variables, arrays, and hashes with ordinary \w+ names syn match p6VarPlain "[$@%][a-zA-Z_]\w*" syn match p6VarPlain "\$\^\w\+" syn match p6VarException "\$!" syn match p6VarPunct "\$\d\+" syn cluster p6Interp contains=p6VarPlain,p6InterpExpression,p6VarPunct,p6VarException,p6InterpClosure " $( ... ) construct syn region p6InterpExpression contained matchgroup=p6Variable start=+\$(+ skip=+\\)+ end=+)+ contains=TOP " FIXME: This ugly hack will show up later on. Once again, don't try to fix it. syn region p6ParenExpression start="\(<\s*\)\@" end=">" contains=@p6Interp " Single-quoted, q, '' strings syn region p6LiteralString start=+'+ skip=+\\'+ end=+'+ " \w-delimited strings syn region p6LiteralString start="q\s\+\z([a-zA-Z0-9_]\)" skip="\\\z1" end="\z1" " Punctuation-delimited strings syn region p6LiteralString start="q\s*\z([^a-zA-Z0-9_ ]\)" skip="\\\z1" end="\z1" syn region p6LiteralString start="q\s*\[" skip="\\]" end="]" syn region p6LiteralString start="q\s*(" skip="\\)" end=")" syn region p6LiteralString start="q\s*{" skip="\\}" end="}" syn region p6LiteralString start="q\s*<" skip="\\>" end=">" " Numbers syn match p6Number "\(\d*\.\d\+\|\d\+\.\d*\|\d\+\)\(e\d\+\)\{0,1}" syn match p6Number "0[0-7]\+" syn match p6Number "0x[0-9a-f]\+" syn keyword p6Number NaN Inf " => Operator syn match p6InterpString "\w\+\s*=>"he=e-2 " Sexeger! syn cluster p6Regexen contains=@p6Interp,p6Closure,p6Comment,p6CharClass,p6RuleCall,p6TestExpr,p6RegexSpecial " Here's how we get into regex mode " Standard /.../ syn region p6Regex start="\(\w\_s*\)\@ syn region p6Regex start="\<\(m\|rx\)\_s*\(\_s*:\_s*[a-zA-Z0-9_()]\+\)*\_s*\["hs=e skip="\\]" end="]" contains=@p6Regexen syn region p6Regex start="\<\(m\|rx\)\_s*\(\_s*:\_s*[a-zA-Z0-9_()]\+\)*\_s*{"hs=e skip="\\}" end="}" contains=@p6Regexen syn region p6Regex start="\<\(m\|rx\)\_s*\(\_s*:\_s*[a-zA-Z0-9_()]\+\)*\_s*<"hs=e skip="\\>" end=">" contains=@p6Regexen " rule { } syn region p6Regex start="rule\(\_s\+\w\+\)\{0,1}\_s*{"hs=e end="}" contains=@p6Regexen " Closure (FIXME: Really icky hack, also doesn't support :blah modifiers) " However, don't do what you might _expect_ would work, because it won't. " And no variant of it will, either. I found this out through 4 hours from " miniscule tweaking to complete redesign. This is the best way I've found! syn region p6Closure start="\(\(rule\(\_s\+\w\+\)\{0,1}\|s\|rx\)\_s*\)\@" end=">\_s*" nextgroup=p6SubBracket contains=@p6Regexen " This is kinda tricky. Since these are contained, they're "called" by the " previous four groups. They just pick up the delimiter at the current location " and behave like a string. syn region p6SubNonBracket contained start="\z(\W\)" skip="\\\z1" end="\z1" contains=@p6Interp syn region p6SubBracket contained start="\z(\W\)" skip="\\\z1" end="\z1" contains=@p6Interp syn region p6SubBracket contained start="\[" skip="\\]" end="]" contains=@p6Interp syn region p6SubBracket contained start="{" skip="\\}" end="}" contains=@p6Interp syn region p6SubBracket contained start="<" skip="\\>" end=">" contains=@p6Interp syn match p6RuleCall contained "<\s*!\{0,1}\s*\w\+"hs=s+1 syn match p6CharClass contained "<\s*!\{0,1}\s*\[\]\{0,1}[^]]*\]\s*>" syn match p6CharClass contained "<\s*!\{0,1}\s*-\{0,1}\(alpha\|digit\|sp\|ws\|null\)\s*>" syn match p6CharClass contained "\\[HhVvNnTtEeRrFfWwSs]" syn match p6CharClass contained "\\[xX]\(\[[0-9a-f;]\+\]\|\x\+\)" syn match p6CharClass contained "\\0\(\[[0-7;]\+\]\|\o\+\)" syn region p6CharClass contained start="\\[QqCc]\[" end="]" skip="\\]" syn match p6RegexSpecial contained "\\\@" "syn match p6RegexSpecial contained "\\\@+ syn region p6TestExpr contained start="<\s*!\{0,1}\s*(" end=")\s*>" contains=TOP " Hash quoting (sortof a hack) " syn match p6InterpString "{\s*\w\+\s*}"ms=s+1,me=e-1 syn match p6Normal "//" hi link p6Normal Normal hi link p6Regex String hi link p6SubNonBracket p6String hi link p6SubBracket p6String hi link p6CharClass Special hi link p6RuleCall Identifier hi link p6RegexSpecial Type hi link p6Error Error hi link p6KeyCompare p6Keyword hi link p6KeyDecl p6Keyword hi link p6KeyScopeDecl p6Keyword hi link p6KeyFlow p6Keyword hi link p6KeyException Special hi link p6KeyIO p6Keyword hi link p6KeyProperty Type hi link p6KeyFunc p6Keyword hi link p6KeySpecial Special hi link p6KeyType Type hi link p6Pattern p6Keyword hi link p6VarPlain p6Variable hi link p6VarPunct p6Variable hi link p6InterpString p6String hi link p6LiteralString p6String hi link p6Keyword Statement hi link p6Number Number hi link p6Comment Comment hi link p6Variable Identifier hi link p6VarException Special hi link p6String String From davek at saturn5.com Fri Jun 21 03:18:40 2002 From: davek at saturn5.com (David Nicholas Kayal) Date: Wed Aug 4 23:58:43 2004 Subject: [boulder.pm] Hmm, now this is either the most boring list ever,or it's broken :) In-Reply-To: Message-ID: Well.... I learned emacs and I'm lazy. The keystrokes are barely more than a thought. If something works, I generally don't try to fix it. Which is one of the reasons why I have winded code. In addition to that, I am trying to improve my communication skills. Oh, btw the way. I'm not a perl programmer. I'm a gardener. here is a photo shoot of one the the gardens I've done. http://yayproductions.com/garden/ This is my favorite shot: http://yayproductions.com/garden/sixmonthslater/100-0002_img.jpg I'm afraid though, that you will have to use something other than Links to view them. On Fri, 21 Jun 2002, Luke Palmer wrote: > > anyway... > > > > i prefer emacs. > > I like vim. It's all about the colors, baby. Emacs didn't have colors on > console until 21.1, and now that it does, they are ugly. Especially > Perl's. > And I don't know how to write a emacs syntax file. For those of > you who use vim, and like Perl 6 as much as me (ok, nobody), attached is > my first draft of a Perl 6 syntax highlighting file. > Why is emacs better? > > Luke > From porterje at us.ibm.com Fri Jun 21 10:36:01 2002 From: porterje at us.ibm.com (Jessee Porter) Date: Wed Aug 4 23:58:43 2004 Subject: [boulder.pm] In other news Message-ID: Along with many of my coworkers, I'm getting sacked on next friday... Anyone looking for a reasonably experienced perl programmer? regards, Jesse Porter -- As we enjoy great advantages from inventions of others, we should be glad of an opportunity to serve others by any invention of ours; and this we should do freely and generously. -- Benjamin Franklin From donald.g.lewis at lmco.com Fri Jun 21 11:16:36 2002 From: donald.g.lewis at lmco.com (Lewis, Donald G) Date: Wed Aug 4 23:58:43 2004 Subject: [boulder.pm] emacs, vim, gardening and stuff Message-ID: <6D5BFD6B8FB1D31192F90008C74B68170C729A28@emss02m03.ems.lmco.com> I prefer emacs too. It can do some amazing stuff, don't know about vim. But my problem too is that I do not understand all of the code behind emacs so I tend to leave it the way I find it. Sometimes it will not do what I want even though I know it is possible for it to do. For instance the version here at work is sort of plain vanilla, best I can tell, and I cannot figure out how to get the syntax to display in color and for it to check the parens and other constructs. I like your garden. I too would prefer to spend all of my time gardening, but such is life. I recently moved into a new house with essentially nothing for a garden. It is a HOA property so I am going through the hoops to get stuff approved by "the committee". In some ways I envy my son in Florida because he can grow stuff year around. But then right now I don't envy him, 55 degree evenings is real nice. - Don Lewis, Lockheed Martin >-----Original Message----- >.From: David Nicholas Kayal [mailto:davek@saturn5.com] >Sent: Friday, June 21, 2002 2:19 AM >To: boulder-pm-list@happyfunball.pm.org >Subject: Re: [boulder.pm] Hmm, now this is either the most boring list >ever,or it's broken :) > > >Well.... > >I learned emacs and I'm lazy. The keystrokes are barely more than a >thought. >If something works, I generally don't try to fix it. Which is one of >the reasons why I have winded code. In addition to that, I am trying to >improve my communication skills. > >Oh, btw the way. I'm not a perl programmer. I'm a gardener.> > >here is a photo shoot of one the the gardens I've done. > > http://yayproductions.com/garden/ > >This is my favorite shot: > > http://yayproductions.com/garden/sixmonthslater/100-0002_img.jpg > >I'm afraid though, that you will have to use something other than Links to >view them. > > > > >On Fri, 21 Jun 2002, Luke Palmer wrote: > > > anyway... > > > > i prefer emacs. > > I like vim. It's all about the colors, baby. Emacs didn't have colors on > console until 21.1, and now that it does, they are ugly. Especially > Perl's. > And I don't know how to write a emacs syntax file. For those of > you who use vim, and like Perl 6 as much as me (ok, nobody), attached is > my first draft of a Perl 6 syntax highlighting file. > Why is emacs better? > > Luke > From nagler at bivio.biz Fri Jun 21 11:51:35 2002 From: nagler at bivio.biz (Rob Nagler) Date: Wed Aug 4 23:58:43 2004 Subject: [boulder.pm] emacs, vim, gardening and stuff In-Reply-To: <6D5BFD6B8FB1D31192F90008C74B68170C729A28@emss02m03.ems.lmco.com> References: <6D5BFD6B8FB1D31192F90008C74B68170C729A28@emss02m03.ems.lmco.com> Message-ID: <15635.22935.104000.597651@gargle.gargle.HOWL> Lewis, Donald G writes: > I prefer emacs too. It can do some amazing stuff, don't know about vim. But > my problem too is that I do not understand all of the code behind emacs so I > tend to leave it the way I find it. Sometimes it will not do what I want > even though I know it is possible for it to do. For instance the version > here at work is sort of plain vanilla, best I can tell, and I cannot figure > out how to get the syntax to display in color and for it to check the parens > and other constructs. You need to install cperl. You can do it locally in your ~/emacs directory. Here's a page I found which discusses it: http://www.khngai.com/emacs/perl.php Here'e the general pages on programming modes: http://www.tldp.org/HOWTO/Emacs-Beginner-HOWTO-3.html Cheers, Rob From KSmith at netLibrary.com Mon Jun 24 10:44:12 2002 From: KSmith at netLibrary.com (Keanan Smith) Date: Wed Aug 4 23:58:43 2004 Subject: [boulder.pm] emacs, vim, gardening and stuff Message-ID: <8B499C5ACCA965439B3F6712E7ADABBD0DD0DE@mailman.netlibrary.com> Hrm, VIm over Emacs, (Actually at work I use a silly win* program called UltraEdit, it seems to work well enough) Of course I grew up using VI (Literally, I started using it when I was 7 when I dialed-in to my dad's main frame to play 'adventure', 'nethack' and 'rogue' *grin*) And XML is, I agree, *not* usefull for simple 'state-maintaining' and transmission of data structures to other perl programs. Where XML is usefull is where it needs to communicate to something that *isn't* a perl program, anyone feel like writing Data::Dumper::XML? *grin* Oh wait, we just call that SOAP eh? In all seriouslessness though, What I've been wracking my brain on, currently, is the best way to be able to take an array of input lines, search among the input lines for a regular expression which matches *across adjacent array elements* I know this is weird, and not heavily usefull, since it's just preferable to have the whole array in a big scalar and do your regexps against that. The problem is that the implementation I'm dealing with *requires* an array (Well, or a hash), and in fact, the more elements of the array I need to update, the slower the whole process goes, so I'm trying to find the "least work for the buck" Problem number two is that the input files are well, huge for text files (4-8 Megs, 50-70 thousand lines) Problem number three the regular expression isn't known until run-time (So I can't simply change it to a set of conditionals and single-array-element matches before hand) Among the Ideas I've been toying with are: join into a scalar, do the regular expression work, split back into an array. update the whole bloody thing (This is the current implementation, and I don't like it :) tie the scalar to a yet-uncreated tie package that implements the scalar as an array, unfortunately changes made to such a scalar would, of neccessity, be global in nature, as scalars are treated as a single "unit" and can't really be updated "partially" (Unlike composite objects like arrays and hashes) and as a result I just end up with the same thing as above, only hidden inside a 'tie' package. I could create alternate methods for updating the scalar only at a certain offset (Which I would have to previously translated internally to a set of alternate indexes by which I could access the internal array-type thingie) However, all this workaround still generates a huge overhead in the 'translate x to scalar and back' as well as the generation of the initial indexes (Although I only have to really pay that once) Disect the 'searching' expression into bits which can be parsed on a single 'element' this requires some rather tricky workaround, and I don't think I could possibly manage to get every possible case covered (For instance /([ab]\n)*(?<=a\n)b/ would be a disturbingly complicated thing to get working.) Hrm, I've passed through two or three other ideas I can't think of at the moment (It is, after all, monday morning) anyone else have anything that sounds passable for a possible easier work-around for this type of nonsense? -K -----Original Message----- From: Rob Nagler [mailto:nagler@bivio.biz] Sent: Friday, June 21, 2002 10:52 AM To: boulder-pm-list@happyfunball.pm.org Subject: Re: [boulder.pm] emacs, vim, gardening and stuff Lewis, Donald G writes: > I prefer emacs too. It can do some amazing stuff, don't know about vim. But > my problem too is that I do not understand all of the code behind emacs so I > tend to leave it the way I find it. Sometimes it will not do what I want > even though I know it is possible for it to do. For instance the version > here at work is sort of plain vanilla, best I can tell, and I cannot figure > out how to get the syntax to display in color and for it to check the parens > and other constructs. You need to install cperl. You can do it locally in your ~/emacs directory. Here's a page I found which discusses it: http://www.khngai.com/emacs/perl.php Here'e the general pages on programming modes: http://www.tldp.org/HOWTO/Emacs-Beginner-HOWTO-3.html Cheers, Rob From davep at kinaole.org Mon Jun 24 13:42:51 2002 From: davep at kinaole.org (Dave Price) Date: Wed Aug 4 23:58:43 2004 Subject: [boulder.pm] emacs, vim, gardening and stuff In-Reply-To: <8B499C5ACCA965439B3F6712E7ADABBD0DD0DE@mailman.netlibrary.com>; from KSmith@netLibrary.com on Mon, Jun 24, 2002 at 09:44:12AM -0600 References: <8B499C5ACCA965439B3F6712E7ADABBD0DD0DE@mailman.netlibrary.com> Message-ID: <20020624124251.B4348@kinaole.org> On Mon, Jun 24, 2002 at 09:44:12AM -0600, Keanan Smith wrote: > Hrm, VIm over Emacs, (Actually at work I use a silly win* program called > UltraEdit, it seems to work well enough) Of course I grew up using VI > (Literally, I started using it when I was 7 when I dialed-in to my dad's > main frame to play 'adventure', 'nethack' and 'rogue' *grin*) > If you company allows it, you can run the vim for win32; not quite GPL, vim uses the charity license, but the win32 product is great (www.vim.org) aloha, dave From KSmith at netLibrary.com Mon Jun 24 13:52:15 2002 From: KSmith at netLibrary.com (Keanan Smith) Date: Wed Aug 4 23:58:43 2004 Subject: [boulder.pm] emacs, vim, gardening and stuff Message-ID: <8B499C5ACCA965439B3F6712E7ADABBD0DD0E1@mailman.netlibrary.com> Yah, I actually have VIm for Windows at work as well, I find that I don't really want to use VIm when I have to do alot of mousing back and forth between windows (Which I do at work) I prefer VIm when all i have to do is type in stuff (Works well for my devel at home) I could probably spend the time to customize ViM at work to do everything I want UE to do (And more) I'm just lazy and work installed it so I use it ;) -----Original Message----- From: Dave Price [mailto:davep@kinaole.org] Sent: Monday, June 24, 2002 12:43 PM To: boulder-pm-list@happyfunball.pm.org; KSmith@netLibrary.com Subject: Re: [boulder.pm] emacs, vim, gardening and stuff On Mon, Jun 24, 2002 at 09:44:12AM -0600, Keanan Smith wrote: > Hrm, VIm over Emacs, (Actually at work I use a silly win* program called > UltraEdit, it seems to work well enough) Of course I grew up using VI > (Literally, I started using it when I was 7 when I dialed-in to my dad's > main frame to play 'adventure', 'nethack' and 'rogue' *grin*) > If you company allows it, you can run the vim for win32; not quite GPL, vim uses the charity license, but the win32 product is great (www.vim.org) aloha, dave From rise at knavery.net Mon Jun 24 18:23:52 2002 From: rise at knavery.net (rise) Date: Wed Aug 4 23:58:43 2004 Subject: [boulder.pm] emacs, vim, gardening and stuff In-Reply-To: <8B499C5ACCA965439B3F6712E7ADABBD0DD0DE@mailman.netlibrary.com> Message-ID: On Mon, 24 Jun 2002, Keanan Smith wrote: > And XML is, I agree, *not* usefull for simple 'state-maintaining' and > transmission of data structures to other perl programs. Where XML is > usefull is where it needs to communicate to something that *isn't* a perl > program, anyone feel like writing Data::Dumper::XML? *grin* Oh wait, we just > call that SOAP eh? Actually it's called Data::DumpXML... http://search.cpan.org/search?dist=Data-DumpXML I think it does a pretty decent job - reasonably DWIMly, flexible enough for what I've needed it for. I don't think it'd be that great for trying to output XML conforming to some twisted design by committee Rorschach DTD, but it's been useful. I've never tried XML::Dumper but it's another option. -- Jonathan Conway rise@knavery.net history is paling & my surge protection failed, & so I FRIED - Concrete Blonde, "Fried" From wilddogz at ureach.com Thu Jun 27 13:55:13 2002 From: wilddogz at ureach.com (Scott Liddick) Date: Wed Aug 4 23:58:43 2004 Subject: [boulder.pm] unsubscribe Message-ID: <200206271855.OAA22335@www21.ureach.com> unsubscribe ________________________________________________ Get your own "800" number Voicemail, fax, email, and a lot more http://www.ureach.com/reg/tag ---- On Fri, 21 Jun 2002, Jessee Porter (porterje@us.ibm.com) wrote: > > Along with many of my coworkers, I'm getting sacked on next friday... > Anyone looking for a reasonably experienced perl programmer? > regards, > Jesse Porter > -- > As we enjoy great advantages from inventions of others, we > should be glad of an opportunity to serve others by any > invention of ours; and this we should do freely and generously. > -- Benjamin Franklin > > > > From KSmith at netLibrary.com Thu Jun 27 16:44:50 2002 From: KSmith at netLibrary.com (Keanan Smith) Date: Wed Aug 4 23:58:43 2004 Subject: [boulder.pm] unsubscribe Message-ID: <8B499C5ACCA965439B3F6712E7ADABBD0DD0FF@mailman.netlibrary.com> Muhuhahaha! Scott is trying to escape! Little does he know that you can never unsubscribe from the evil boulder Perl-Mongers list (Well, at least not without sending E-mail to majordomo *grin*) (Let's fill up his inbox with useless perl stuff! quick everyone! I'll start... Hey, This is an oddity: Of these two code fragments: @{$me->{arrayrep}} = split(/(?=$me->{break})/,$value); my $mypos = 0; foreach $line (@{$me->{arrayrep}}) { $mypos += length($line); ... do stuff ... } and while ($value =~ /$me->{break}/g) { my $mypos = pos($value); $me->{arrayrep}->[$i] = $1; $i++; ... do stuff ... } I would think that the first (Which calls the 'split' builtin to generate the array) would be faster than the second (Which repeatedly does a regular expression and assigns the list elements by hand) But in fact it's the reverse! Weird eh? Anyone have a good explination for why? -----Original Message----- From: Scott Liddick [mailto:wilddogz@ureach.com] Sent: Thursday, June 27, 2002 12:55 PM To: Jessee Porter Subject: [boulder.pm] unsubscribe unsubscribe ________________________________________________ Get your own "800" number Voicemail, fax, email, and a lot more http://www.ureach.com/reg/tag ---- On Fri, 21 Jun 2002, Jessee Porter (porterje@us.ibm.com) wrote: > > Along with many of my coworkers, I'm getting sacked on next friday... > Anyone looking for a reasonably experienced perl programmer? > regards, > Jesse Porter > -- > As we enjoy great advantages from inventions of others, we > should be glad of an opportunity to serve others by any > invention of ours; and this we should do freely and generously. > -- Benjamin Franklin > > > > From Jay.Kominek at colorado.edu Thu Jun 27 17:00:34 2002 From: Jay.Kominek at colorado.edu (Jay Kominek) Date: Wed Aug 4 23:58:43 2004 Subject: [boulder.pm] unsubscribe In-Reply-To: <8B499C5ACCA965439B3F6712E7ADABBD0DD0FF@mailman.netlibrary.com> Message-ID: On Thu, 27 Jun 2002, Keanan Smith wrote: > @{$me->{arrayrep}} = split(/(?=$me->{break})/,$value); > my $mypos = 0; > foreach $line (@{$me->{arrayrep}}) > while ($value =~ /$me->{break}/g) > { > my $mypos = pos($value); > I would think that the first (Which calls the 'split' builtin to generate > the array) > would be faster than the second (Which repeatedly does a regular expression > and assigns the list elements by hand) > But in fact it's the reverse! Weird eh? > Anyone have a good explination for why? You're allocating more memory for the first one, as well as using a zero width assertion. If I recall correctly, those (can) significantly increase the time it takes to perform a match. They'd certainly make it more complex to repeatedly match a string. The double indirection to access the elements of the array can't help much, either. (Hopefully Perl is optimizing it away, but you never know.) Any actual values for the change in algorithmic and constant time? - Jay Kominek Plus ?a change, plus c'est la m?me chose From KSmith at netLibrary.com Thu Jun 27 17:27:18 2002 From: KSmith at netLibrary.com (Keanan Smith) Date: Wed Aug 4 23:58:43 2004 Subject: [boulder.pm] unsubscribe Message-ID: <8B499C5ACCA965439B3F6712E7ADABBD0DD100@mailman.netlibrary.com> Heh, actually, the first one is slightly broken, it shouldn't contain a forward-lookahead at all (I just realized that since I copied that from old, commented out code, it's behavior should have been changed to match the new version of the code.) Here's a simplified version with the names changed to stop warping people's brains: @array = split(/\n/,$value); my $mypos = 0; foreach $line (@array) { $mypos += length($line); ...dostuff... } Versus while ($value =~ /\n/g) { my $mypos = pos($value); $array[$i] = $1; $i++; ...dostuff... } (And yes, the second one is still faster, weird eh? At least I think so...) And change of '$value' and change of the regular expression change the total time, but the relationship between the two times remains more-or-less the same (The second is about 20% faster, in all the cases I tried) -----Original Message----- From: Jay Kominek [mailto:Jay.Kominek@colorado.edu] Sent: Thursday, June 27, 2002 4:01 PM To: 'boulder-pm-list@happyfunball.pm.org' Subject: RE: [boulder.pm] unsubscribe On Thu, 27 Jun 2002, Keanan Smith wrote: > @{$me->{arrayrep}} = split(/(?=$me->{break})/,$value); > my $mypos = 0; > foreach $line (@{$me->{arrayrep}}) > while ($value =~ /$me->{break}/g) > { > my $mypos = pos($value); > I would think that the first (Which calls the 'split' builtin to generate > the array) > would be faster than the second (Which repeatedly does a regular expression > and assigns the list elements by hand) > But in fact it's the reverse! Weird eh? > Anyone have a good explination for why? You're allocating more memory for the first one, as well as using a zero width assertion. If I recall correctly, those (can) significantly increase the time it takes to perform a match. They'd certainly make it more complex to repeatedly match a string. The double indirection to access the elements of the array can't help much, either. (Hopefully Perl is optimizing it away, but you never know.) Any actual values for the change in algorithmic and constant time? - Jay Kominek Plus ?a change, plus c'est la m?me chose From KSmith at netLibrary.com Thu Jun 27 17:38:07 2002 From: KSmith at netLibrary.com (Keanan Smith) Date: Wed Aug 4 23:58:43 2004 Subject: [boulder.pm] unsubscribe Message-ID: <8B499C5ACCA965439B3F6712E7ADABBD0DD101@mailman.netlibrary.com> Here's a little more complete example: use Time::HiRes qw(time); sub slurp { my($fn) = @_; my $tmp = $/; undef $/; open(IN,"<$fn"); my $buff = ; close IN; $/ = $tmp; return $buff; } $value = slurp("E:\\52350\\source\\52350_.html"); # 3.8 Meg file with about 69.5K lines $timest = &time; @array = split(/\n/,$value); my $mypos = 0; foreach $line (@array) { $mypos += length($line); } print "Trial 1 took: ".(&time - $timest)."\n"; print "Source is ".length($value)." bytes and ".scalar(@array)." lines long.\n"; $timest = &time; while ($value =~ /\n/g) { my $mypos = pos($value); $array[$i] = $1; $i++; } print "Trial 2 took: ".(&time - $timest)."\n"; print "Source is ".length($value)." bytes and ".scalar(@array)." lines long.\n"; Produces this output: Trial 1 took: 0.220000028610229 Source is 3783482 bytes and 69559 lines long. Trial 2 took: 0.490999937057495 Source is 3783482 bytes and 69559 lines long. (Note that reversing the order of the trials doesn't make the split any faster, or the while any slower) -----Original Message----- From: Jay Kominek [mailto:Jay.Kominek@colorado.edu] Sent: Thursday, June 27, 2002 4:01 PM To: 'boulder-pm-list@happyfunball.pm.org' Subject: RE: [boulder.pm] unsubscribe On Thu, 27 Jun 2002, Keanan Smith wrote: > @{$me->{arrayrep}} = split(/(?=$me->{break})/,$value); > my $mypos = 0; > foreach $line (@{$me->{arrayrep}}) > while ($value =~ /$me->{break}/g) > { > my $mypos = pos($value); > I would think that the first (Which calls the 'split' builtin to generate > the array) > would be faster than the second (Which repeatedly does a regular expression > and assigns the list elements by hand) > But in fact it's the reverse! Weird eh? > Anyone have a good explination for why? You're allocating more memory for the first one, as well as using a zero width assertion. If I recall correctly, those (can) significantly increase the time it takes to perform a match. They'd certainly make it more complex to repeatedly match a string. The double indirection to access the elements of the array can't help much, either. (Hopefully Perl is optimizing it away, but you never know.) Any actual values for the change in algorithmic and constant time? - Jay Kominek Plus ?a change, plus c'est la m?me chose From KSmith at netLibrary.com Thu Jun 27 17:46:31 2002 From: KSmith at netLibrary.com (Keanan Smith) Date: Wed Aug 4 23:58:43 2004 Subject: [boulder.pm] unsubscribe Message-ID: <8B499C5ACCA965439B3F6712E7ADABBD0DD102@mailman.netlibrary.com> Erp my brain is broken :) This actually reflects the problem at hand: use Time::HiRes qw(time); sub slurp { my($fn) = @_; my $tmp = $/; undef $/; open(IN,"<$fn"); my $buff = ; close IN; $/ = $tmp; return $buff; } $value = slurp("E:\\52350\\source\\52350_.html"); # 3.7 Meg file with #$value = slurp("E:\\67345\\TEST\\67345.mtml"); #$value = slurp("E:\\52350\\source\\52350_.html"); $timest = &time; @array = split(/\n/,$value); my $mypos = 0; foreach $line (@array) { $mypos += length($line); $lines[$i] = $mypos; $positions{$mypos} = $i; $i++; } print "Trial 1 took: ".(&time - $timest)."\n"; print "Source is ".length($value)." bytes and ".scalar(@array)." lines long.\n"; $timest = &time; $i=0; while ($value =~ /\n/g) { my $mypos = pos($value); $array[$i] = $1; $lines[$i] = $mypos; $positions{$mypos} = $i; $i++; } print "Trial 2 took: ".(&time - $timest)."\n"; print "Source is ".length($value)." bytes and ".scalar(@array)." lines long.\n"; With output: Trial 1 took: 1.95299994945526 Source is 3783482 bytes and 69559 lines long. Trial 2 took: 1.33200001716614 Source is 3783482 bytes and 69559 lines long. Although the example below does pose two interesting question, a. why was it faster this time, I'm doing more work! b. why is the while faster this time, but slower below (That's really odd...) The only thing I can think of is that somehow there's some weird caching going on. -----Original Message----- From: Keanan Smith [mailto:KSmith@netLibrary.com] Sent: Thursday, June 27, 2002 4:38 PM To: 'boulder-pm-list@happyfunball.pm.org' Subject: RE: [boulder.pm] unsubscribe Here's a little more complete example: use Time::HiRes qw(time); sub slurp { my($fn) = @_; my $tmp = $/; undef $/; open(IN,"<$fn"); my $buff = ; close IN; $/ = $tmp; return $buff; } $value = slurp("E:\\52350\\source\\52350_.html"); # 3.8 Meg file with about 69.5K lines $timest = &time; @array = split(/\n/,$value); my $mypos = 0; foreach $line (@array) { $mypos += length($line); } print "Trial 1 took: ".(&time - $timest)."\n"; print "Source is ".length($value)." bytes and ".scalar(@array)." lines long.\n"; $timest = &time; while ($value =~ /\n/g) { my $mypos = pos($value); $array[$i] = $1; $i++; } print "Trial 2 took: ".(&time - $timest)."\n"; print "Source is ".length($value)." bytes and ".scalar(@array)." lines long.\n"; Produces this output: Trial 1 took: 0.220000028610229 Source is 3783482 bytes and 69559 lines long. Trial 2 took: 0.490999937057495 Source is 3783482 bytes and 69559 lines long. (Note that reversing the order of the trials doesn't make the split any faster, or the while any slower) -----Original Message----- From: Jay Kominek [mailto:Jay.Kominek@colorado.edu] Sent: Thursday, June 27, 2002 4:01 PM To: 'boulder-pm-list@happyfunball.pm.org' Subject: RE: [boulder.pm] unsubscribe On Thu, 27 Jun 2002, Keanan Smith wrote: > @{$me->{arrayrep}} = split(/(?=$me->{break})/,$value); > my $mypos = 0; > foreach $line (@{$me->{arrayrep}}) > while ($value =~ /$me->{break}/g) > { > my $mypos = pos($value); > I would think that the first (Which calls the 'split' builtin to generate > the array) > would be faster than the second (Which repeatedly does a regular expression > and assigns the list elements by hand) > But in fact it's the reverse! Weird eh? > Anyone have a good explination for why? You're allocating more memory for the first one, as well as using a zero width assertion. If I recall correctly, those (can) significantly increase the time it takes to perform a match. They'd certainly make it more complex to repeatedly match a string. The double indirection to access the elements of the array can't help much, either. (Hopefully Perl is optimizing it away, but you never know.) Any actual values for the change in algorithmic and constant time? - Jay Kominek Plus ?a change, plus c'est la m?me chose From porterje at us.ibm.com Fri Jun 28 10:41:31 2002 From: porterje at us.ibm.com (Jessee Porter) Date: Wed Aug 4 23:58:43 2004 Subject: [boulder.pm] unsubscribe Message-ID: Wow, talk about adding insult to injury :-) regards, Jesse Porter -- As we enjoy great advantages from inventions of others, we should be glad of an opportunity to serve others by any invention of ours; and this we should do freely and generously. -- Benjamin Franklin Scott Liddick com> cc: Sent by: Subject: [boulder.pm] unsubscribe owner-boulder-pm- list@pm.org 06/27/2002 12:55 PM Please respond to boulder-pm-list unsubscribe ________________________________________________ Get your own "800" number Voicemail, fax, email, and a lot more http://www.ureach.com/reg/tag ---- On Fri, 21 Jun 2002, Jessee Porter (porterje@us.ibm.com) wrote: > > Along with many of my coworkers, I'm getting sacked on next friday... > Anyone looking for a reasonably experienced perl programmer? > regards, > Jesse Porter > -- > As we enjoy great advantages from inventions of others, we > should be glad of an opportunity to serve others by any > invention of ours; and this we should do freely and generously. > -- Benjamin Franklin > > > > From davis_compz at hotmail.com Fri Jun 28 18:36:36 2002 From: davis_compz at hotmail.com (j davis) Date: Wed Aug 4 23:58:43 2004 Subject: [boulder.pm] file handle and pipe Message-ID: Hello, Im a newbie. I have a var. that holds the contents of a email. I am trying to send the email using sendmail like this.... `/bin/echo $in{content} | sendmail jd\@taproot.bz`; doesnt work , friend suggested this..... open MAIL, "|/usr/bin/sendmail jd\@taproot.bz"; print MAIL "$in{content}"; close MAIL; cant seem to make this work either but i really like the idea of it. can i open a file handel and pipe info into a program like im trying above? thanks, jd jd@taproot.bz http://www.taproot.bz _________________________________________________________________ Chat with friends online, try MSN Messenger: http://messenger.msn.com From davis_compz at hotmail.com Fri Jun 28 23:21:01 2002 From: davis_compz at hotmail.com (j davis) Date: Wed Aug 4 23:58:43 2004 Subject: [boulder.pm] file handle and pipe Message-ID: syntax was just a little off open(MAIL, "|/usr/sbin/sendmail jd\@taproot.bz"); print MAIL "$in{content}"; close MAIL; is what i needed....like i said im new. can all command line based programs be piped into in this manner? thanks jd >Hello, >Im a newbie. I have a var. that holds the contents of a email. I am trying >to send the email using sendmail like this.... > >`/bin/echo $in{content} | sendmail jd\@taproot.bz`; > >doesnt work , friend suggested this..... > >open MAIL, "|/usr/bin/sendmail jd\@taproot.bz"; >print MAIL "$in{content}"; >close MAIL; > >cant seem to make this work either but i really like the idea of it. >can i open a file handel and pipe info into a program like >im trying above? > >thanks, >jd >jd@taproot.bz >http://www.taproot.bz > >_________________________________________________________________ >Chat with friends online, try MSN Messenger: http://messenger.msn.com thanks, jd jd@taproot.bz http://www.taproot.bz _________________________________________________________________ Join the world’s largest e-mail service with MSN Hotmail. http://www.hotmail.com From fibonaci at babylonia.flatirons.org Sat Jun 29 01:12:00 2002 From: fibonaci at babylonia.flatirons.org (Luke Palmer) Date: Wed Aug 4 23:58:43 2004 Subject: [boulder.pm] file handle and pipe In-Reply-To: Message-ID: On Fri, 28 Jun 2002, j davis wrote: > Hello, > Im a newbie. I have a var. that holds the contents of a email. I am trying > to send the email using sendmail like this.... > > `/bin/echo $in{content} | sendmail jd\@taproot.bz`; Should work like this: `/bin/echo '$in{content}' | sendmail jd\@taproot.bz`; (le singel qeuotes) > doesnt work , friend suggested this..... > > open MAIL, "|/usr/bin/sendmail jd\@taproot.bz"; > print MAIL "$in{content}"; > close MAIL; > Oddly enough, this should work. Are you sure something isn't going wrong somewhere else in your program? > cant seem to make this work either but i really like the idea of it. > can i open a file handel and pipe info into a program like > im trying above? Yes. That's precisely how you do it, unless I'm having some marvelously stupid brainfart at the moment. If you don't figure it out, send in the whole program and I'll look over it (unless it's giant). P.S. For those of you who couldn't make it, YAPC was incredible! Extremely fun and informative!! Go next year! Luke From fibonaci at babylonia.flatirons.org Sat Jun 29 01:20:06 2002 From: fibonaci at babylonia.flatirons.org (Luke Palmer) Date: Wed Aug 4 23:58:43 2004 Subject: [boulder.pm] file handle and pipe In-Reply-To: Message-ID: On Sat, 29 Jun 2002, j davis wrote: > > syntax was just a little off > > open(MAIL, "|/usr/sbin/sendmail jd\@taproot.bz"); The parentheses are all you changed? This should not make a difference. I ran a test on it and it does the exact same thing. In fact, Deparse deparses to it without parentheses.... What version are you running? Mind attaching me the source so I can have a look at this oddity. If nothing else, you've found a bug that I can patch :) Luke > print MAIL "$in{content}"; > close MAIL; > > is what i needed....like i said im new. > can all command line based programs be piped into in this manner? > > thanks > jd > > > >Hello, > >Im a newbie. I have a var. that holds the contents of a email. I am trying > >to send the email using sendmail like this.... > > > >`/bin/echo $in{content} | sendmail jd\@taproot.bz`; > > > >doesnt work , friend suggested this..... > > > >open MAIL, "|/usr/bin/sendmail jd\@taproot.bz"; > >print MAIL "$in{content}"; > >close MAIL; > > > >cant seem to make this work either but i really like the idea of it. > >can i open a file handel and pipe info into a program like > >im trying above? > > > >thanks, > >jd > >jd@taproot.bz > >http://www.taproot.bz > > > >_________________________________________________________________ > >Chat with friends online, try MSN Messenger: http://messenger.msn.com > > > thanks, > jd > > jd@taproot.bz > http://www.taproot.bz > > _________________________________________________________________ > Join the world?s largest e-mail service with MSN Hotmail. > http://www.hotmail.com > From davis_compz at hotmail.com Sat Jun 29 02:13:45 2002 From: davis_compz at hotmail.com (j davis) Date: Wed Aug 4 23:58:43 2004 Subject: [boulder.pm] file handle and pipe Message-ID: so, the script is not finshed as you can tell. I was just getting the var passing down cause I'm new to cgi too.anyway here it is, I use the the perl that you get with rh7.3 and i updated it once using up2date.. perl-5.6.1-34.99.6 thanks jd #!/usr/bin/perl &ReadParse; print "Content-type: text/html\n\n"; print "hi"; print "your mail has been sent all replies will be sent to:"; print "$in{email}\n"; print ""; ###now open pipe to write to open(MAIL, "|/usr/sbin/sendmail jd\@taproot.bz"); print MAIL "$in{content}"; close MAIL; # Adapted from cgi-lib.pl by S.E.Brenner@bioc.cam.ac.uk # Copyright 1994 Steven E. Brenner sub ReadParse { local (*in) = @_ if @_; local ($i, $key, $val); if ( $ENV{'REQUEST_METHOD'} eq "GET" ) { $in = $ENV{'QUERY_STRING'}; } elsif ($ENV{'REQUEST_METHOD'} eq "POST") { read(STDIN,$in,$ENV{'CONTENT_LENGTH'}); } else { # Added for command line debugging # Supply name/value form data as a command line argument # Format: name1=value1\&name2=value2\&... # (need to escape & for shell) # Find the first argument that's not a switch (-) $in = ( grep( !/^-/, @ARGV )) [0]; $in =~ s/\\&/&/g; } @in = split(/&/,$in); foreach $i (0 .. $#in) { # Convert plus's to spaces $in[$i] =~ s/\+/ /g; # Split into key and value. ($key, $val) = split(/=/,$in[$i],2); # splits on the first =. # Convert %XX from hex numbers to alphanumeric $key =~ s/%(..)/pack("c",hex($1))/ge; $val =~ s/%(..)/pack("c",hex($1))/ge; # Associate key and value. \0 is the multiple separator $in{$key} .= "\0" if (defined($in{$key})); $in{$key} .= $val; } return length($in); } >From: Luke Palmer >Reply-To: boulder-pm-list@happyfunball.pm.org >To: >Subject: Re: [boulder.pm] file handle and pipe >Date: Sat, 29 Jun 2002 00:20:06 -0600 (MDT) >MIME-Version: 1.0 >Received: from mail.pm.org ([64.49.222.22]) by hotmail.com with Microsoft >SMTPSVC(5.0.2195.4905); Fri, 28 Jun 2002 23:19:50 -0700 >Received: (from majordomo@localhost)by mail.pm.org (8.11.6/8.11.3) id >g5T6RSp18779for boulder-pm-list-outgoing; Sat, 29 Jun 2002 01:27:28 -0500 >Received: from babylonia.flatirons.org >(IDENT:lIEHVuSaqlQI1Ll2hymzmlxU/Xam2VSp@[161.97.204.99])by mail.pm.org >(8.11.6/8.11.3) with ESMTP id g5T6RR018776for >; Sat, 29 Jun 2002 01:27:27 -0500 >Received: from localhost (fibonaci@localhost)by babylonia.flatirons.org >(8.11.6/8.8.7) with ESMTP id g5T6K6I11811for >; Sat, 29 Jun 2002 00:20:06 -0600 >X-Authentication-Warning: mail.pm.org: majordomo set sender to >owner-boulder-pm-list@pm.org using -f >In-Reply-To: >Message-ID: > >Sender: owner-boulder-pm-list@pm.org >Precedence: bulk >Return-Path: owner-boulder-pm-list@mail.pm.org >X-OriginalArrivalTime: 29 Jun 2002 06:19:50.0774 (UTC) >FILETIME=[F9B1E160:01C21F34] > >On Sat, 29 Jun 2002, j davis wrote: > > > > > syntax was just a little off > > > > open(MAIL, "|/usr/sbin/sendmail jd\@taproot.bz"); > >The parentheses are all you changed? This should not make a difference. I >ran a test on it and it does the exact same thing. In fact, Deparse >deparses to it without parentheses.... > >What version are you running? >Mind attaching me the source so I can have a look at this oddity. If >nothing else, you've found a bug that I can patch :) > >Luke > > > print MAIL "$in{content}"; > > close MAIL; > > > > > is what i needed....like i said im new. > > can all command line based programs be piped into in this manner? > > > > thanks > > jd > > > > > > >Hello, > > >Im a newbie. I have a var. that holds the contents of a email. I am >trying > > >to send the email using sendmail like this.... > > > > > >`/bin/echo $in{content} | sendmail jd\@taproot.bz`; > > > > > >doesnt work , friend suggested this..... > > > > > >open MAIL, "|/usr/bin/sendmail jd\@taproot.bz"; > > >print MAIL "$in{content}"; > > >close MAIL; > > > > > >cant seem to make this work either but i really like the idea of it. > > >can i open a file handel and pipe info into a program like > > >im trying above? > > > > > >thanks, > > >jd > > >jd@taproot.bz > > >http://www.taproot.bz > > > > > >_________________________________________________________________ > > >Chat with friends online, try MSN Messenger: http://messenger.msn.com > > > > > > thanks, > > jd > > > > jd@taproot.bz > > http://www.taproot.bz > > > > _________________________________________________________________ > > Join the world’s largest e-mail service with MSN Hotmail. > > http://www.hotmail.com > > thanks, jd jd@taproot.bz http://www.taproot.bz _________________________________________________________________ Chat with friends online, try MSN Messenger: http://messenger.msn.com