From jvanslyk at matchlogic.com Tue May 2 10:06:49 2000 From: jvanslyk at matchlogic.com (Jason Van Slyke) Date: Wed Aug 4 23:58:19 2004 Subject: [boulder.pm] "Luge strategy? Lie flat and try not to die." --Tim Steeves Message-ID: <5FE9B713CCCDD311A03400508B8B3013BB47C4@bdr-xcln.is.matchlogic.com> Just something to ponder for a second or two. Then head out on the freeway. =8o) jvs Jason Van Slyke DataMart/Performance Analysis MatchLogic Inc. Phone: (303) 222-7434 Pager: (888) 266-7056 Alpha Pager: pagejvanslyk@matchlogic.com From walter at frii.com Wed May 3 15:40:11 2000 From: walter at frii.com (Walter Pienciak) Date: Wed Aug 4 23:58:19 2004 Subject: [boulder.pm] Re: A real stupid thing In-Reply-To: Message-ID: On Fri, 14 Apr 2000, Rob Mohr wrote: > Details, Walter, details!! Ha! If you want the lurid details, you'll have to hunt me down and get them personally. I won't put them onto the Internet. It's a good list of things not to do, though. Obtuse algorithms, crazy code . . . when I took a look, I couldn't *believe* some of the stuff I saw. Anyway. Vacation was GREAT. I should do it more often. We were out in Palmdale, California, which is always a super destination if you like things that go Zoom! in the sky. One of my sister's friends works for Boeing's Reusable Space Systems, and got us in to Site 1, which in English means that we got a close-up and very cool look at the shuttle Columbia, which is in the plant getting a major systems refitting (heads-up avionics, etc.) We walked over it, under it, and around it, but didn't get to sit in the pilot's seat and play with the steering wheel, and they didn't want me carving my initials in the heat-shield tiles -- fussbudgets! Then I came home to Boulder and got 3 days of climbing in. Then when I punched in for work on Monday, I sent an e-mail around to staff notifying them that I had 2,664 pieces of e-mail waiting for me, and that they should *call* for anything important, but be patient otherwise. Now, systems folks get a lot of automated e-mail when different events happen, and I was able to go through those pretty quickly, but the sheer number seems to have shocked general staff into leaving me alone. It's been a quiet week so far. Ach, some Perl schtuff -- via some excerpts of am e-mail I sent today. If you already know this stuff, just say (quietly, to yourself!) "Hmph! I know THAT!" and delete the message ;^) Walter ---------- Excerpts follow ---------- Anyway, your code looks good. I can think of pissy little changes like < my $lttf_adm = "xxxxx\@xxxxx.ac.nz"; > my $lttf_adm = 'xxxxx@xxxxx.ac.nz'; but the only substantive change I'd recommend is to include $! in your dienice stuff. Stylistically, I'll comment on your print statements. It looks like you've adhered to the "best practices" methodology of cut-and-paste programming ;^) What I mean is that I see a mix of styles (which I do also): print MAIL "Something or other\n"; print <Get rich NOW! !!}; which also lets me avoid a proliferation of quotation marks and the visually yukky escape stuff. This one is kinda undocumented (or at least hard to find). See the "print" entry in the perlfunc manpage, and the section on "Quote and Quote-like Operators" in the perlop manpage. But the code looks good. This is all trivial stuff and intended in the spirit of "there's more than one way to do it." Either that or I'm in a chatty mood today . . . From walter at frii.com Thu May 4 14:55:15 2000 From: walter at frii.com (Walter Pienciak) Date: Wed Aug 4 23:58:19 2004 Subject: [boulder.pm] &read_mail if ( $preIPO_opportunity eq "get rich" ); Message-ID: ---------- Forwarded message ---------- Date: Thu, 4 May 2000 12:03:56 -0700 From: Jim Ward Subject: IDCertify-Perl Prgmrs >Greetings. Not sure if your group allows employment posts but if so, would be appreciative if you could forward this one. Thanks and best regards. jw Our firm, IDCertify, is a well-funded, full-service Certification Authority located in Seattle, WA. We develop Digital Signature and Digital Certificate solutions. We're currently in rapid growth mode and in need of permanent talent at all levels (contractors considered). Ours is a PreIPO business model with a very short-term timeframe to offering. Compensation is competitive/DOE and includes stock options. Please take a look at the description below as well as our web site: www.IDCertify.com. I'd be eager to chat with you to see if our needs match your objectives. Best regards, J.Ward Recruiting Manager www.IDCertify.com jward@IDCertify.com ID CERTIFY, Inc. TITLE: Systems Programmer LOCATION: Seattle, WA DESCRIPTION: Position is responsible for generalist programming and support in a rapidly changing technical environment. RESPONSIBILITIES: · Design and implement network services · Design and implement all CGI scripts using Perl· Assist in debugging system problems and work closely with Operations and Engineering · Interface with business customers to provide tech support QUALIFICATIONS: · At least 4 years generalist programmer experience (Perl/Python ANDOR C/C++) · Experience with SQL programming (Pref PL-SQL) · Familiarity with network services based on Unix and/or NT · Familiarity with the IETF Process (RFC) · Ability to work in a fast-paced and dynamic environment · Strong interpersonal skills; team player · Ability to be self-directed and work independently PLUSES: · Experience with Digital Signature technology or cryptography a plus. · Certifications · Experience working with commercial API's and interfaces · Visual Basic for Applications · BS/MA in computer science or related field · Internet firewalls/router configuration · GNU/Linux, Solaris, FreeBSD, NT From Robert.L.Harris at rnd-consulting.com Thu May 4 15:01:38 2000 From: Robert.L.Harris at rnd-consulting.com (Robert L. Harris) Date: Wed Aug 4 23:58:19 2004 Subject: [boulder.pm] passing 2 arrays to a sub Message-ID: <20000504140138.A29033@rnd-consulting.com> Have this: my (@Arr1)=(....); my (@Arr2)=(....); &DoStuff(@Arr1, @Arr2); sub DoStuff { my (@Arr1)=??????; my (@Arr2)=??????; . . . # No return } Suggestions? Robert :wq! --------------------------------------------------------------------------- Robert L. Harris | Microsoft: Senior System Engineer | For when quality, reliability at RnD Consulting | and security just aren't \_ that important! DISCLAIMER: These are MY OPINIONS ALONE. I speak for no-one else. FYI: perl -e 'print $i=pack(c5,(41*2),sqrt(7056),(unpack(c,H)-2),oct(115),10);' From davek at saturn5.com Thu May 4 15:12:14 2000 From: davek at saturn5.com (Dave) Date: Wed Aug 4 23:58:19 2004 Subject: [boulder.pm] &read_mail if ( $preIPO_opportunity eq "get rich" ); In-Reply-To: Message-ID: why is this being posted? i'm sure that if anyone subscribing to this list needs a job that they would be able to find many places wishing to offer assistance. On Thu, 4 May 2000, Walter Pienciak wrote: > Date: Thu, 4 May 2000 13:55:15 -0600 (MDT) > From: Walter Pienciak > Reply-To: boulder-pm-list@happyfunball.pm.org > To: boulder-pm-list@happyfunball.pm.org > Subject: [boulder.pm] &read_mail if ( $preIPO_opportunity eq "get rich" ); > > > > ---------- Forwarded message ---------- > Date: Thu, 4 May 2000 12:03:56 -0700 > From: Jim Ward > Subject: IDCertify-Perl Prgmrs > > >Greetings. Not sure if your group allows employment posts but if so, would > be appreciative if you could forward this one. Thanks and best regards. jw > > > > Our firm, IDCertify, is a well-funded, full-service Certification Authority > located in Seattle, WA. We develop Digital Signature and Digital Certificate > solutions. We're currently in rapid growth mode and in need of permanent > talent at all levels (contractors considered). Ours is a PreIPO business > model with a very short-term timeframe to offering. > > Compensation is competitive/DOE and includes stock options. > > Please take a look at the description below as well as our web site: > www.IDCertify.com. I'd be eager to chat with you to see if our needs match > your objectives. > > > Best regards, > > J.Ward > Recruiting Manager > www.IDCertify.com > jward@IDCertify.com > > > > ID CERTIFY, Inc. > > TITLE: Systems Programmer > > LOCATION: Seattle, WA > > DESCRIPTION: Position is responsible for generalist programming and > support in a rapidly changing technical environment. > > RESPONSIBILITIES: > · Design and implement network services > · Design and implement all CGI scripts using Perl· > Assist in debugging system problems and work closely with Operations > and Engineering > · Interface with business customers to provide tech support > > QUALIFICATIONS: > · At least 4 years generalist programmer experience (Perl/Python ANDOR > C/C++) > · Experience with SQL programming (Pref PL-SQL) > · Familiarity with network services based on Unix and/or NT > · Familiarity with the IETF Process (RFC) > · Ability to work in a fast-paced and dynamic environment > · Strong interpersonal skills; team player > · Ability to be self-directed and work independently > > PLUSES: > > · Experience with Digital Signature technology or cryptography a plus. > · Certifications > · Experience working with commercial API's and interfaces > · Visual Basic for Applications > · BS/MA in computer science or related field > · Internet firewalls/router configuration > · GNU/Linux, Solaris, FreeBSD, NT > > > > > From walter at frii.com Thu May 4 15:13:32 2000 From: walter at frii.com (Walter Pienciak) Date: Wed Aug 4 23:58:19 2004 Subject: [boulder.pm] passing 2 arrays to a sub In-Reply-To: <20000504140138.A29033@rnd-consulting.com> Message-ID: On Thu, 4 May 2000, Robert L. Harris wrote: > > > Have this: > > > my (@Arr1)=(....); > my (@Arr2)=(....); > > &DoStuff(@Arr1, @Arr2); > > sub DoStuff { > my (@Arr1)=??????; > my (@Arr2)=??????; > . > . > . > # No return > } > > > Suggestions? > > Robert Hi, Robert, How about passing them in by reference: &DoStuff( \@Arr1, \@Arr2 ); Walter From walter at frii.com Thu May 4 15:17:06 2000 From: walter at frii.com (Walter Pienciak) Date: Wed Aug 4 23:58:19 2004 Subject: [boulder.pm] &read_mail if ( $preIPO_opportunity eq "get rich" ); In-Reply-To: Message-ID: On Thu, 4 May 2000, Dave wrote: > why is this being posted? > > i'm sure that if anyone subscribing to this list needs a job that they > would be able to find many places wishing to offer assistance. Hi, Dave, It's being posted because we had a thread on job postings back in October and decided that Perl-related job postings once in a while were okay. If you think there's an abusive number being forwarded, we can revisit the issue. Walter From Robert.L.Harris at rnd-consulting.com Thu May 4 15:24:13 2000 From: Robert.L.Harris at rnd-consulting.com (Robert L. Harris) Date: Wed Aug 4 23:58:19 2004 Subject: [boulder.pm] passing 2 arrays to a sub In-Reply-To: ; from walter@frii.com on Thu, May 04, 2000 at 02:13:32PM -0600 References: <20000504140138.A29033@rnd-consulting.com> Message-ID: <20000504142413.C29033@rnd-consulting.com> Right, but but what does the portion inside the sub routine look like? Robert Thus spake Walter Pienciak (walter@frii.com): > On Thu, 4 May 2000, Robert L. Harris wrote: > > > > > > > Have this: > > > > > > my (@Arr1)=(....); > > my (@Arr2)=(....); > > > > &DoStuff(@Arr1, @Arr2); > > > > sub DoStuff { > > my (@Arr1)=??????; > > my (@Arr2)=??????; > > . > > . > > . > > # No return > > } > > > > > > Suggestions? > > > > Robert > > Hi, Robert, > > How about passing them in by reference: > > &DoStuff( \@Arr1, \@Arr2 ); > > > Walter :wq! --------------------------------------------------------------------------- Robert L. Harris | Microsoft: Senior System Engineer | For when quality, reliability at RnD Consulting | and security just aren't \_ that important! DISCLAIMER: These are MY OPINIONS ALONE. I speak for no-one else. FYI: perl -e 'print $i=pack(c5,(41*2),sqrt(7056),(unpack(c,H)-2),oct(115),10);' From walter at frii.com Thu May 4 15:33:14 2000 From: walter at frii.com (Walter Pienciak) Date: Wed Aug 4 23:58:19 2004 Subject: [boulder.pm] passing 2 arrays to a sub In-Reply-To: <20000504142413.C29033@rnd-consulting.com> Message-ID: On Thu, 4 May 2000, Robert L. Harris wrote: > Right, but but what does the portion inside the sub routine look like? > > Robert Ah. &DoStuff( \@Arr1, \@Arr2 ); sub DoStuff { my ( $a, $b ) = @_; # You can now reference the stuff from @Arr1 as @$a and @Arr2 as @$b } There's a section on this in Programming Perl (pp. 116-118 in my copy) and also in the Perl Cookbook (pp. 342-343). Walter > Thus spake Walter Pienciak (walter@frii.com): > > > On Thu, 4 May 2000, Robert L. Harris wrote: > > > > > > > > > > > Have this: > > > > > > > > > my (@Arr1)=(....); > > > my (@Arr2)=(....); > > > > > > &DoStuff(@Arr1, @Arr2); > > > > > > sub DoStuff { > > > my (@Arr1)=??????; > > > my (@Arr2)=??????; > > > . > > > . > > > . > > > # No return > > > } > > > > > > > > > Suggestions? > > > > > > Robert > > > > Hi, Robert, > > > > How about passing them in by reference: > > > > &DoStuff( \@Arr1, \@Arr2 ); > > > > > > Walter > > > > :wq! > --------------------------------------------------------------------------- > Robert L. Harris | Microsoft: > Senior System Engineer | For when quality, reliability > at RnD Consulting | and security just aren't > \_ that important! > DISCLAIMER: > These are MY OPINIONS ALONE. I speak for no-one else. > FYI: > perl -e 'print $i=pack(c5,(41*2),sqrt(7056),(unpack(c,H)-2),oct(115),10);' > From CWA at DISC.com Thu May 4 15:57:34 2000 From: CWA at DISC.com (William Atkinson) Date: Wed Aug 4 23:58:19 2004 Subject: [boulder.pm] &read_mail if ( $preIPO_opportunity eq "get rich " ); Message-ID: Isn't the purpose of this list to promote Perl? If so, what better promotion than to say you can get a job with these skills? IMHO, job postings on the list, as long as they are relevant, and don't drown out the other postings are useful. Chip > -----Original Message----- > From: Walter Pienciak [mailto:walter@frii.com] > Sent: Thursday, May 04, 2000 2:17 PM > To: boulder-pm-list@happyfunball.pm.org > Subject: Re: [boulder.pm] &read_mail if ( $preIPO_opportunity eq "get > rich" ); > > > On Thu, 4 May 2000, Dave wrote: > > > why is this being posted? > > > > i'm sure that if anyone subscribing to this list needs a > job that they > > would be able to find many places wishing to offer assistance. > > Hi, Dave, > > It's being posted because we had a thread on job postings > back in October > and decided that Perl-related job postings once in a while were okay. > > If you think there's an abusive number being forwarded, we > can revisit the > issue. > > Walter > From Robert.L.Harris at rnd-consulting.com Sat May 13 23:51:02 2000 From: Robert.L.Harris at rnd-consulting.com (Robert L. Harris) Date: Wed Aug 4 23:58:19 2004 Subject: [boulder.pm] break a while() and better grep? Message-ID: <20000513225102.J19327@rnd-consulting.com> Currently I have a script that walks a bunch of directories. It opens each file and reads it with a: while() { if (<$String>) { do stuff; } } Part of the problem is I want it to break out of the while at the first time it finds $string, but not the loop that the while is in. Will a "break" do this clean? Something else? Is there a faster way to grep a string out of a file, without actually doing a system('grep')? I just need to know if the string is in the file. Robert :wq! --------------------------------------------------------------------------- Robert L. Harris | Microso~1 : Senior System Engineer | For when quality, reliability at RnD Consulting | and security just aren't \_ that important! DISCLAIMER: These are MY OPINIONS ALONE. I speak for no-one else. FYI: perl -e 'print $i=pack(c5,(41*2),sqrt(7056),(unpack(c,H)-2),oct(115),10);' From bmozart at frii.com Sun May 14 00:26:29 2000 From: bmozart at frii.com (Randall Fowle) Date: Wed Aug 4 23:58:19 2004 Subject: [boulder.pm] break a while() and better grep? In-Reply-To: <20000513225102.J19327@rnd-consulting.com> Message-ID: On Sat, 13 May 2000, Robert L. Harris wrote: > Part of the problem is I want it to break out of the while at the first > time it finds $string, but not the loop that the while is in. Will > a "break" do this clean? Something else? The keyword "last" works like "break" does in C: while() { if (<$String>) { do stuff; last; } } This will take you out of the while() loop without taking you out of a loop that contains this code. > Is there a faster way to grep a string out of a file, without actually > doing a system('grep')? I just need to know if the string is in the > file. System will at least tell you if the string is in the file, even if it does spawn a whole new process. As far as I know, your only alternative is to traverse the file and try to match the string to each line. -Randy. will skip the reference between spawning processes and Mother's Day From Jay.Kominek at colorado.edu Sun May 14 00:35:20 2000 From: Jay.Kominek at colorado.edu (Jay Kominek) Date: Wed Aug 4 23:58:19 2004 Subject: [boulder.pm] break a while() and better grep? In-Reply-To: <20000513225102.J19327@rnd-consulting.com> Message-ID: > while() { > if (<$String>) { > do stuff; > } > } > > Part of the problem is I want it to break out of the while at the first > time it finds $string, but not the loop that the while is in. Will > a "break" do this clean? Something else? FOO: while(1) { BAR: while(1) { BAZ: while(1) { if($magic== 42) { last FOO; } # break out of top loop if($magic==0x42) { last BAR; } # break out of middle loop if($magic== 666) { last BAZ; } # break out of bottom loop } } } last and break should be interchangable when you're giving the name. next also exists. I believe this is discussed in the perlsyn man page. > Is there a faster way to grep a string out of a file, without actually > doing a system('grep')? I just need to know if the string is in the > file. undef$/; open(FILE,"file"); $kungfu = ; close(FILE); if($kungfu =~ /string/) { # do speed-elite magic here } - Jay Kominek Waiting is. From rcarlino at home.com Fri May 19 07:18:44 2000 From: rcarlino at home.com (Ray) Date: Wed Aug 4 23:58:19 2004 Subject: [boulder.pm] looking Message-ID: <00051906211100.07317@fleance.cr.usgs.gov> I am looking for a script that will run on an apache website that will dynamically produce a text-only version of the pages. It needs to work with java script and server side includes. Anyone seen anything good? Thanks Ray From walter at frii.com Fri May 19 08:15:11 2000 From: walter at frii.com (Walter Pienciak) Date: Wed Aug 4 23:58:19 2004 Subject: [boulder.pm] looking In-Reply-To: <00051906211100.07317@fleance.cr.usgs.gov> Message-ID: On Fri, 19 May 2000, Ray wrote: > > > I am looking for a script that will run on an apache website that will > dynamically produce a text-only version of the pages. > It needs to work with java script and server side includes. > Anyone seen anything good? > > > Thanks > Ray Hi, Ray, Are you looking for something that when run with a URL as an "argument" will return a formatted text version of that URL? Or am I missing the idea? Walter From rcarlino at home.com Fri May 19 08:24:08 2000 From: rcarlino at home.com (Ray) Date: Wed Aug 4 23:58:19 2004 Subject: [boulder.pm] looking In-Reply-To: References: Message-ID: <00051907260801.07317@fleance.cr.usgs.gov> Yes I think so. I have 4 web sites that need to have a text only version. So I want to be able to put a text-only button on the page and run a script or use arguments. I have tried nph-filter and parser but they both have a hard time with the javascript menus.. Ray On Fri, 19 May 2000, you wrote: > On Fri, 19 May 2000, Ray wrote: > > > > > > > I am looking for a script that will run on an apache website that will > > dynamically produce a text-only version of the pages. > > It needs to work with java script and server side includes. > > Anyone seen anything good? > > > > > > Thanks > > Ray > > Hi, Ray, > > Are you looking for something that when run with a URL as an "argument" > will return a formatted text version of that URL? Or am I missing the > idea? > > Walter From walter at frii.com Fri May 19 09:32:07 2000 From: walter at frii.com (Walter Pienciak) Date: Wed Aug 4 23:58:19 2004 Subject: [boulder.pm] looking In-Reply-To: <00051907260801.07317@fleance.cr.usgs.gov> Message-ID: On Fri, 19 May 2000, Ray wrote: > Yes I think so. I have 4 web sites that need to have a text only version. So I > want to be able to put a text-only button on the page and run a script or use > arguments. I have tried nph-filter and parser but they both have a hard time > with the javascript menus.. > > Ray Hmmm. My first thought on this is that most people who want to lose the images don't want anything to do with the Javascript either. But you need the Javascript. I don't know of any existing scripts to do this. You could poke around freshmeat.net et al., but I dunno that you'd find anything. I guess you'd get the page, s/// out the tags, and send out the new page. Or substitute them with a one-blank-pixel.gif type of link? No doubt this is a naive approach, forgetting many oopsies. But maybe someone has done this and can correct me . . . ? Walter