From mikes at practilutions.com Thu May 1 01:28:45 2008 From: mikes at practilutions.com (Mike Stallfus) Date: Thu, 1 May 2008 08:28:45 GMT Subject: [sf-perl] Opportunities in Unix/Linux Technology Opportunities to $100k in Atlanta Message-ID: Practical Solutions is recruiting for a major Technology provider that has many positions available for experienced IT professionals with experience with SQL/Oracle in a Unix/Linux environment are needed. System Administration and/or Network Operation Center Experience a plus These are permanent positions with full benefits Relocation is available (if required). These are the hottest but we have more requirements as well. Please read the description below and reply ASAP if you are interested and qualified Even if you do not match the listed job if you have similar experience please send your resume. I may have a fit for you. Mike Stallfus mikes at practilutions.com Typical technical career opportunities may include: Software Engineer (Java/Corba) Systems Integrator System Engineer Program Management Field Service Engineer My client delivers the technology and expertise that is digital video forward. The company?s award-winning solutions are used by the world?s leading network operators and content owners to deliver viewer experiences Systems Integrator REQUIRED SKILLS: Minimum 3 years working as a systems integrator and/or system administrator in a UNIX/linux environment, preferably. Experience installing and trouble-shooting UNIX/linux software and operating system components. Strong knowledge of UNIX/linux shell scripting languages and system tools such as BASH, PERL, VI, etc. Strong hardware and software trouble-shooting skills. Expertise in installing, trouble-shooting, and maintaining complex TCP/IP networks, routing, and physical network topologies. Strong interpersonal and communications skills and an ability to understand and discuss cable industry related business issues. Ability to travel on short notice on an as-needed basis up to 50% of the time. Senior Software Engineer Required Skills * 7+ years experience developing software in a Unix environment * 5+ years experience developing Java/J2EE applications * 3+ years experience developing CORBA applications * Understanding of network programming (sockets, TCP/IP, UDP) * Experience developing distributed software systems * Experience developing and optimizing database access * Experience developing highly threaded applications * Strong interpersonal and communications skills and an ability to understand and articulate complex ideas and concepts in both verbal and written form * Motivated self-staring individual; Team player Mike Stallfus Practical Solutions, LLC. mikes at practilutions.com Note: We respect your Online Privacy. If you are not interested in receiving our e-mails then please reply with a "Unsubscribe" in the subject line at unsubscribe at practilutions.com and mention all the e-mail addresses to be removed with any e-mail addresses, which might be diverting the e-mails to you. We are sorry for the inconvenience you. We are sorry for the inconvenience From quinn at fairpath.com Thu May 1 06:54:06 2008 From: quinn at fairpath.com (Quinn Weaver) Date: Thu, 1 May 2008 06:54:06 -0700 Subject: [sf-perl] Opportunities in Unix/Linux Technology Opportunities to $100k in Atlanta In-Reply-To: References: Message-ID: <20080501135406.GA13930@mtn.fairpath.com> Hi, Mike (and a reminder to the list), When posting job ads, please start the Subject line with [job]. This helps folks filter content based on what interests them. Thanks, -- Quinn Weaver, independent contractor | President, San Francisco Perl Mongers http://fairpath.com/quinn/resume/ | http://sf.pm.org/ 510-520-5217 From rjray at blackperl.com Thu May 1 10:34:46 2008 From: rjray at blackperl.com (Randy J. Ray) Date: Thu, 01 May 2008 10:34:46 -0700 Subject: [sf-perl] Opportunities in Unix/Linux Technology Opportunities to $100k in Atlanta In-Reply-To: <20080501135406.GA13930@mtn.fairpath.com> References: <20080501135406.GA13930@mtn.fairpath.com> Message-ID: <4819FF36.5030903@blackperl.com> Quinn Weaver wrote: > Hi, Mike (and a reminder to the list), > > When posting job ads, please start the Subject line with [job]. This helps > folks filter content based on what interests them. I suspect this is maybe a spammer of sorts-- I've seen an almost verbatim copy of this message at least one other place in the last few days. Also note that the "jobs" listed barely mention Perl at all. Randy -- """"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""" Randy J. Ray Silicon Valley Scale Modelers: http://www.svsm.org rjray at blackperl.com randy.j.ray at gmail.com From andy at petdance.com Thu May 1 11:07:14 2008 From: andy at petdance.com (Andy Lester) Date: Thu, 1 May 2008 13:07:14 -0500 Subject: [sf-perl] Opportunities in Unix/Linux Technology Opportunities to $100k in Atlanta In-Reply-To: <4819FF36.5030903@blackperl.com> References: <20080501135406.GA13930@mtn.fairpath.com> <4819FF36.5030903@blackperl.com> Message-ID: <3C2B996C-808A-413C-B4E6-173D1F71FBBF@petdance.com> On May 1, 2008, at 12:34 PM, Randy J. Ray wrote: > I suspect this is maybe a spammer of sorts-- I've seen an almost > verbatim copy > of this message at least one other place in the last few days. Also > note that > the "jobs" listed barely mention Perl at all. He's a spammer. He also mailed to the hackathons list, which has been defunct for over a year. -- Andy Lester => andy at petdance.com => www.petdance.com => AIM:petdance From rick at linuxmafia.com Thu May 1 16:15:31 2008 From: rick at linuxmafia.com (Rick Moen) Date: Thu, 1 May 2008 16:15:31 -0700 Subject: [sf-perl] Opportunities in Unix/Linux Technology Opportunities to $100k in Atlanta In-Reply-To: <4819FF36.5030903@blackperl.com> References: <20080501135406.GA13930@mtn.fairpath.com> <4819FF36.5030903@blackperl.com> Message-ID: <20080501231531.GB3800@linuxmafia.com> Quoting Randy J. Ray (rjray at blackperl.com): > I suspect this is maybe a spammer of sorts-- I've seen an almost > verbatim copy of this message at least one other place in the last few > days. Also note that the "jobs" listed barely mention Perl at all. FWIW, I've handled, earlier today (in my listadmin capacity) several other copies of Mike's post on other Bay Area technical mailing lists, politely rejecting them as not complying with those mailing lists' posted policies. From quinn at fairpath.com Fri May 2 14:59:49 2008 From: quinn at fairpath.com (Quinn Weaver) Date: Fri, 2 May 2008 14:59:49 -0700 Subject: [sf-perl] [job] mod_perl (1) programmer needed Message-ID: <20080502215949.GA20587@mtn.fairpath.com> I'm passing this along on behalf of a recruiter. She's seeking a mod_perl (1, not 2) programmer for a full-time position. Sorry, no other details right now; I guess you'll have to contact her for those. She seems to be in a hurry to fill the position. You can reach her at "Patti Morse" Peace, -- Quinn Weaver, independent contractor | President, San Francisco Perl Mongers http://fairpath.com/quinn/resume/ | http://sf.pm.org/ 510-520-5217 From nheller at silcon.com Sun May 4 18:54:09 2008 From: nheller at silcon.com (Neil Heller) Date: Sun, 4 May 2008 18:54:09 -0700 Subject: [sf-perl] Escalation or something else? In-Reply-To: <20080302232735.GC24586@fetter.org> References: <20080302232735.GC24586@fetter.org> Message-ID: <000701c8ae52$e8e32250$baa966f0$@com> In the following situation, what is your opinion of the best course of action? As a developer, you have completed a module and have moved it for testing. A tester discovers a bug of mid-severity. You say "that's no bug, that's a feature. Besides, the release is 1 hour away." Does the tester escalate the problem to his manager? Does the code get released with the bug (feature)? Does something else happen? From friedman at highwire.stanford.edu Sun May 4 20:11:56 2008 From: friedman at highwire.stanford.edu (Michael Friedman) Date: Sun, 4 May 2008 20:11:56 -0700 Subject: [sf-perl] Escalation or something else? In-Reply-To: <000701c8ae52$e8e32250$baa966f0$@com> References: <20080302232735.GC24586@fetter.org> <000701c8ae52$e8e32250$baa966f0$@com> Message-ID: Heh. TIMTOWTDI. :-) It all depends on the situation. I work on web apps. We release weekly. If something comes up an hour before the release, we don't install it and fix it before the next release. If instead you have to make a 4 pm deadline to get the image to the CD printer to run off 20,000 discs and if you miss it it will cost you a $10,000 fine, you'll probably ship with it as is. On the other hand, if you don't release constantly, why is a new feature only being tested an hour before release? That seems like a systemic problem right there. My $.02, -- Mike On May 4, 2008, at 6:54 PM, Neil Heller wrote: > > In the following situation, what is your opinion of the best course of > action? > > As a developer, you have completed a module and have moved it for > testing. > A tester discovers a bug of mid-severity. > You say "that's no bug, that's a feature. Besides, the release is 1 > hour > away." > > Does the tester escalate the problem to his manager? > Does the code get released with the bug (feature)? > > Does something else happen? > > > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm --------------------------------------------------------------------- Michael Friedman HighWire Press Phone: 650-725-1974 Stanford University FAX: 270-721-8034 --------------------------------------------------------------------- From garth.webb at gmail.com Mon May 5 01:40:15 2008 From: garth.webb at gmail.com (Garth Webb) Date: Mon, 5 May 2008 01:40:15 -0700 Subject: [sf-perl] Escalation or something else? In-Reply-To: <000701c8ae52$e8e32250$baa966f0$@com> References: <20080302232735.GC24586@fetter.org> <000701c8ae52$e8e32250$baa966f0$@com> Message-ID: On Sun, May 4, 2008 at 6:54 PM, Neil Heller wrote: > > In the following situation, what is your opinion of the best course of > action? > > As a developer, you have completed a module and have moved it for testing. > A tester discovers a bug of mid-severity. > You say "that's no bug, that's a feature. Besides, the release is 1 hour > away." > > Does the tester escalate the problem to his manager? > Does the code get released with the bug (feature)? > > Does something else happen? First of all there should be more than the tester and the developer involved in a potential problem with a release, engineering and project managers should be involved. Second, if its a feature then the developer should be able to point to the specs that define it as a feature, or its not a feature, its a bug. Third, saying 'besides, the release to close' trivializes the job of the QA person. If a big customer facing bug screws up the product, QA is going to take the heat. It'd be like QA saying to the developer, "Oh, don't bother fixing those SQL-injection vunerablities, I don't feel like testing them" Ultimately the person who will take responsibility for any problems with the product should make the call and everyone involved should be aware of any sacrifices in testing or coding that were made in exchange for the time. Garth From nheller at silcon.com Sun May 11 20:31:07 2008 From: nheller at silcon.com (Neil Heller) Date: Sun, 11 May 2008 20:31:07 -0700 Subject: [sf-perl] Escalation or something else? In-Reply-To: References: <20080302232735.GC24586@fetter.org> <000701c8ae52$e8e32250$baa966f0$@com> Message-ID: <000001c8b3e0$9dc5c7d0$d9515770$@com> Has anybody used curl? If so, what did you use it for? Did you use it from the command line or from a Perl script? Neil Heller From friedman at highwire.stanford.edu Mon May 12 11:01:22 2008 From: friedman at highwire.stanford.edu (Michael Friedman) Date: Mon, 12 May 2008 11:01:22 -0700 Subject: [sf-perl] Escalation or something else? In-Reply-To: <000001c8b3e0$9dc5c7d0$d9515770$@com> References: <20080302232735.GC24586@fetter.org> <000701c8ae52$e8e32250$baa966f0$@com> <000001c8b3e0$9dc5c7d0$d9515770$@com> Message-ID: <951CDB68-8F4C-449E-B6CA-ACFF721AA503@highwire.stanford.edu> curl is a great command-line program for grabbing files from a URL. But if you're going to write a Perl script, why not use LibWWWPerl (LWP::*) instead? That gets you a lot more error handling and features. See the perldoc for LWP::UserAgent, HTTP::Request, and HTTP::Response. UA has a good example to use. Also, from the command-line, you can use GET, an LWP script installed by perl. My copy is in /usr/bin/GET, but yours may be elsewhere. You could even use GET as a model, but it's pretty sophisticated so it's probably more than you need if you're considering system("curl.."). On top of that, there are many CPAN modules for doing HTTP stuff from perl. Try out a couple! TIMTOWTDI. -- Mike On May 11, 2008, at 8:31 PM, Neil Heller wrote: > Has anybody used curl? > > If so, what did you use it for? > > Did you use it from the command line or from a Perl script? > > Neil Heller > > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm --------------------------------------------------------------------- Michael Friedman HighWire Press Phone: 650-725-1974 Stanford University FAX: 270-721-8034 --------------------------------------------------------------------- From fred at redhotpenguin.com Mon May 12 11:10:24 2008 From: fred at redhotpenguin.com (Fred Moyer) Date: Mon, 12 May 2008 11:10:24 -0700 Subject: [sf-perl] perl curl [ was Re: Escalation or something else?] In-Reply-To: <000001c8b3e0$9dc5c7d0$d9515770$@com> References: <20080302232735.GC24586@fetter.org> <000701c8ae52$e8e32250$baa966f0$@com> <000001c8b3e0$9dc5c7d0$d9515770$@com> Message-ID: <48288810.6060005@redhotpenguin.com> Neil Heller wrote: > Has anybody used curl? Yep :) > If so, what did you use it for? I used it to write an https load tester. > Did you use it from the command line or from a Perl script? I used it from the command line for initial diagnostics, then used the WWW::Curl::Easy module in a program. The interface isn't as intuitive as LWP, but it is still pretty slick. It ran using a threaded version of Perl 5.8.8, each new thread consumed about 10 MB of memory (I created a new WWW::Curl::Easy object for each thread). It was significantly faster than the forking implementation I wrote using Parallel::ForkManager, and I was able to spawn about 200 threads before I ran out of memory on a 2 gig machine > Neil Heller > > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm -- Red Hot Penguin Consulting LLC mod_perl consulting and implementation http://www.redhotpenguin.com/ From andy at petdance.com Mon May 12 11:10:41 2008 From: andy at petdance.com (Andy Lester) Date: Mon, 12 May 2008 13:10:41 -0500 Subject: [sf-perl] Escalation or something else? In-Reply-To: <951CDB68-8F4C-449E-B6CA-ACFF721AA503@highwire.stanford.edu> References: <20080302232735.GC24586@fetter.org> <000701c8ae52$e8e32250$baa966f0$@com> <000001c8b3e0$9dc5c7d0$d9515770$@com> <951CDB68-8F4C-449E-B6CA-ACFF721AA503@highwire.stanford.edu> Message-ID: On May 12, 2008, at 1:01 PM, Michael Friedman wrote: > curl is a great command-line program for grabbing files from a URL. > But if you're going to write a Perl script, why not use LibWWWPerl > (LWP::*) instead? That gets you a lot more error handling and > features. And if anything relies on further exploration of the web based on what's on that page, you'll want to take a look at WWW::Mechanize which makes all that butt-simple. -- Andy Lester => andy at petdance.com => www.petdance.com => AIM:petdance From andy at petdance.com Mon May 12 11:11:52 2008 From: andy at petdance.com (Andy Lester) Date: Mon, 12 May 2008 13:11:52 -0500 Subject: [sf-perl] perl curl [ was Re: Escalation or something else?] In-Reply-To: <48288810.6060005@redhotpenguin.com> References: <20080302232735.GC24586@fetter.org> <000701c8ae52$e8e32250$baa966f0$@com> <000001c8b3e0$9dc5c7d0$d9515770$@com> <48288810.6060005@redhotpenguin.com> Message-ID: <046175FC-86B9-4A80-83C5-5A6AB6924B71@petdance.com> On May 12, 2008, at 1:10 PM, Fred Moyer wrote: >> If so, what did you use it for? > > I used it to write an https load tester. Did ab that comes with Apache not do for you? I'm curious as to how if that's the case. -- Andy Lester => andy at petdance.com => www.petdance.com => AIM:petdance From fred at redhotpenguin.com Mon May 12 11:26:39 2008 From: fred at redhotpenguin.com (Fred Moyer) Date: Mon, 12 May 2008 11:26:39 -0700 Subject: [sf-perl] perl curl [ was Re: Escalation or something else?] In-Reply-To: <046175FC-86B9-4A80-83C5-5A6AB6924B71@petdance.com> References: <20080302232735.GC24586@fetter.org> <000701c8ae52$e8e32250$baa966f0$@com> <000001c8b3e0$9dc5c7d0$d9515770$@com> <48288810.6060005@redhotpenguin.com> <046175FC-86B9-4A80-83C5-5A6AB6924B71@petdance.com> Message-ID: <48288BDF.40005@redhotpenguin.com> Andy Lester wrote: > On May 12, 2008, at 1:10 PM, Fred Moyer wrote: > >>> If so, what did you use it for? >> I used it to write an https load tester. > > > Did ab that comes with Apache not do for you? I'm curious as to how > if that's the case. I needed to use a client side ssl certificate to connect to the server, which ab didn't support. Additionally there was this nice warning in the ab docs :) http://httpd.apache.org/docs/2.2/programs/ab.html -s When compiled in (ab -h will show you) use the SSL protected https rather than the http protocol. This feature is experimental and very rudimentary. You probably do not want to use it. So the WWW::Curl::Easy option seemed like a good approach. The production client was curl based also, so that was an additional consideration in favor of the curl approach. > -- > Andy Lester => andy at petdance.com => www.petdance.com => AIM:petdance > > > > > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm -- Red Hot Penguin Consulting LLC mod_perl consulting and implementation http://www.redhotpenguin.com/ From sphink at gmail.com Tue May 13 13:13:02 2008 From: sphink at gmail.com (Steve Fink) Date: Tue, 13 May 2008 13:13:02 -0700 Subject: [sf-perl] Escalation or something else? In-Reply-To: <000001c8b3e0$9dc5c7d0$d9515770$@com> References: <20080302232735.GC24586@fetter.org> <000701c8ae52$e8e32250$baa966f0$@com> <000001c8b3e0$9dc5c7d0$d9515770$@com> Message-ID: <7d7f2e8c0805131313s540804beoe22264ef781ad14a@mail.gmail.com> On Sun, May 11, 2008 at 8:31 PM, Neil Heller wrote: > If so, what did you use it for? Access to HTTPS web API calls. Posting files. > Did you use it from the command line or from a Perl script? Both. I've run into issues with it a few times where it hangs, blocking on stdin. My suspicion is that some part of the SSL cert stuff is asking for a password or something, but I don't really know. From nheller at silcon.com Tue May 13 13:30:15 2008 From: nheller at silcon.com (Neil Heller) Date: Tue, 13 May 2008 13:30:15 -0700 Subject: [sf-perl] curl in perl In-Reply-To: <7d7f2e8c0805131313s540804beoe22264ef781ad14a@mail.gmail.com> References: <20080302232735.GC24586@fetter.org> <000701c8ae52$e8e32250$baa966f0$@com> <000001c8b3e0$9dc5c7d0$d9515770$@com> <7d7f2e8c0805131313s540804beoe22264ef781ad14a@mail.gmail.com> Message-ID: <006901c8b538$26e5f5a0$74b1e0e0$@com> With curl, can you use it in a conversational-type script where: You send something The host responds You read the response and respond to the host Neil Heller -----Original Message----- From: sanfrancisco-pm-bounces+nheller=silcon.com at pm.org [mailto:sanfrancisco-pm-bounces+nheller=silcon.com at pm.org] On Behalf Of Steve Fink Sent: Tuesday, May 13, 2008 1:13 PM To: San Francisco Perl Mongers User Group Subject: Re: [sf-perl] Escalation or something else? On Sun, May 11, 2008 at 8:31 PM, Neil Heller wrote: > If so, what did you use it for? Access to HTTPS web API calls. Posting files. > Did you use it from the command line or from a Perl script? Both. I've run into issues with it a few times where it hangs, blocking on stdin. My suspicion is that some part of the SSL cert stuff is asking for a password or something, but I don't really know. _______________________________________________ SanFrancisco-pm mailing list SanFrancisco-pm at pm.org http://mail.pm.org/mailman/listinfo/sanfrancisco-pm From extasia at extasia.org Tue May 13 13:34:12 2008 From: extasia at extasia.org (David Alban) Date: Tue, 13 May 2008 13:34:12 -0700 Subject: [sf-perl] $Data::Dumper::Useqq Message-ID: <4c714a9c0805131334y331f6f2eg786effd445ce49e8@mail.gmail.com> greetings, sending this in case you've made the same mistaken assumption i made... by default, Data::Dumper will print the empty string for non-printable characters. you have to set $Data::Dumper::Useqq to true to have it render non-printable characters. when it does this, it prints them as escaped octal numbers. note that under certain circumstances it will print ascii nul as a single escaped zero and under others, as an escaped string of three zeroes. $ perl -MData::Dumper -de 1 Loading DB routines from perl5db.pl version 1.27 Editor support available. Enter h or `h h' for help, or `man perldebug' for more help. main::(-e:1): 1 DB<1> x $Data::Dumper::Useqq 0 0 DB<2> print Dumper chr 0 $VAR1 = ''; DB<3> $Data::Dumper::Useqq = 1 DB<4> !2 print Dumper chr 0 $VAR1 = "\0"; DB<5> $x = "\x00" . '0' DB<6> print Dumper $x $VAR1 = "\0000"; it mildly disturbs me that if you don't know about Useqq you'll see values printed without any non-printable characters they might contain. but then i didn't write Data::Dumper and am not sure what i might have done differently. anyway, don't assume what i assumed. :-) david -- Live in a world of your own, but always welcome visitors. From friedman at highwire.stanford.edu Tue May 13 13:43:50 2008 From: friedman at highwire.stanford.edu (Michael Friedman) Date: Tue, 13 May 2008 13:43:50 -0700 Subject: [sf-perl] curl in perl In-Reply-To: <006901c8b538$26e5f5a0$74b1e0e0$@com> References: <20080302232735.GC24586@fetter.org> <000701c8ae52$e8e32250$baa966f0$@com> <000001c8b3e0$9dc5c7d0$d9515770$@com> <7d7f2e8c0805131313s540804beoe22264ef781ad14a@mail.gmail.com> <006901c8b538$26e5f5a0$74b1e0e0$@com> Message-ID: <456A54C9-A19F-4FA4-81AF-2BDE4615E5C4@highwire.stanford.edu> Sure, but it won't handle any state for you, since you'll be calling it separately each time. If you want to save cookies, for example, you will need to use a more full-featured Perl implementation. (There are many, of which LWP is one.) -- Mike On May 13, 2008, at 1:30 PM, Neil Heller wrote: > With curl, can you use it in a conversational-type script where: > You send something > The host responds > You read the response and respond to the host > > Neil Heller > > > -----Original Message----- > From: sanfrancisco-pm-bounces+nheller=silcon.com at pm.org > [mailto:sanfrancisco-pm-bounces+nheller=silcon.com at pm.org] On Behalf > Of > Steve Fink > Sent: Tuesday, May 13, 2008 1:13 PM > To: San Francisco Perl Mongers User Group > Subject: Re: [sf-perl] Escalation or something else? > > On Sun, May 11, 2008 at 8:31 PM, Neil Heller > wrote: >> If so, what did you use it for? > > Access to HTTPS web API calls. Posting files. > >> Did you use it from the command line or from a Perl script? > > Both. > > I've run into issues with it a few times where it hangs, blocking on > stdin. My suspicion is that some part of the SSL cert stuff is asking > for a password or something, but I don't really know. > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm > > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm --------------------------------------------------------------------- Michael Friedman HighWire Press Phone: 650-725-1974 Stanford University FAX: 270-721-8034 --------------------------------------------------------------------- From afife at untangle.com Wed May 14 23:04:38 2008 From: afife at untangle.com (Andrew Fife) Date: Wed, 14 May 2008 23:04:38 -0700 (PDT) Subject: [sf-perl] BALUG Dinner: WiFi Mesh Networking (Tuesday) Message-ID: <01b501c8b651$8613f440$4101a8c0@afmeatloaf> Howdy Folks: Balug on Tuesday will host a new speaker, Thomas Belote. Tom will be talking about wireless mesh networking. As a grad student at San Jose State, Thomas has worked on Wireless Mesh Networking and Mobile Ad Hoc Networking. His talk will compare solutions like OLSR and Microsoft's semi open source Mesh Connectivity Layer (that doesn't run on Linux). He will discuss why WDS is not sufficient and a mesh protocol is needed, and discuss the lack of openness thus far in 802.11s even though it is included in the OLPC, as well as security issues and implications. If you'd like to come, please RSVP: RSVP at balug.org Meeting Details... 6:30pm April 20th, 2008 (Tuesday) Four Seas Restaurant 731 Grant Ave. San Francisco, CA 94108 Easy $5 Parking: http://www.portsmouthsquaregarage.com/ Cost = $13 for dinner, but the meeting itself is free Upcoming 2008 speakers include: June - Andrew Morton (Linux Kernel) July - Mike Linksyaver (Creative Commons) Aug - TBD Sept - Ian Murdock (Debian & Sun) Signup for BALUG's extremely low volume announce list: http://lists.balug.org/listinfo.cgi/balug-announce-balug.org About BALUG: ------------ BALUG is lively gathering of Linux users & free software enthusiasts that combines great food, community & intimate access to featured speakers. We meet in the bar of the Four Seas Restaurant from 6:30pm. At 7pm, we share a family-style Chinese dinner, which is followed by our guest speaker. BALUG Mailing list Policy: -------------------------- BALUG promises not to abuse other LUGs mailing lists. Our current policy is to make one monthly announcement on other Bay Area LUGs mailing lists. If you feel this is not appropriate for a particular list, please tell us which list and what you feel would be a more appropriate policy for that list. Please send feedback to balug-contact at balug.org. -- Andrew Fife Untangle - The Open Source Network Gateway www.untangle.com/download 650.425.3327 desk 415.806.6028 cell -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/sanfrancisco-pm/attachments/20080514/2375d1cb/attachment.html From biztos at mac.com Tue May 20 12:54:50 2008 From: biztos at mac.com (frosty) Date: Tue, 20 May 2008 12:54:50 -0700 Subject: [sf-perl] search.cpan.org broken, or am I? Message-ID: <147B5406-011A-1000-8E4E-C454647EA51B-Webmail-10011@mac.com> Is anybody else getting failures from search.cpan.org? I have a bug ready to file against it, but on the off chance it's something weird with the MegaCorp firewall I want to do a quick sanity check. For example, this finds nothing for CGI: http://search.cpan.org/search?query=cgi&mode=all Until a few minutes ago it was returning a "No matches" page, and now it's returning a 502 Proxy Error. And while I don't think it's a proxy problem on my end, I'd really appreciate it if someone on the list could double check it. But of course the module's there: http://search.cpan.org/dist/CGI.pm/CGI.pm Thanks -- frosty From nheller at silcon.com Tue May 20 12:58:24 2008 From: nheller at silcon.com (Neil Heller) Date: Tue, 20 May 2008 12:58:24 -0700 Subject: [sf-perl] search.cpan.org broken, or am I? In-Reply-To: <147B5406-011A-1000-8E4E-C454647EA51B-Webmail-10011@mac.com> References: <147B5406-011A-1000-8E4E-C454647EA51B-Webmail-10011@mac.com> Message-ID: <001901c8bab3$dcc5ec10$9651c430$@com> Using the link you supplied below, I got Proxy Error Error reading from remote server Neil Heller -----Original Message----- From: sanfrancisco-pm-bounces+nheller=silcon.com at pm.org [mailto:sanfrancisco-pm-bounces+nheller=silcon.com at pm.org] On Behalf Of frosty Sent: Tuesday, May 20, 2008 12:55 PM To: San Francisco Perl Mongers User Group Subject: [sf-perl] search.cpan.org broken, or am I? Is anybody else getting failures from search.cpan.org? I have a bug ready to file against it, but on the off chance it's something weird with the MegaCorp firewall I want to do a quick sanity check. For example, this finds nothing for CGI: http://search.cpan.org/search?query=cgi&mode=all Until a few minutes ago it was returning a "No matches" page, and now it's returning a 502 Proxy Error. And while I don't think it's a proxy problem on my end, I'd really appreciate it if someone on the list could double check it. But of course the module's there: http://search.cpan.org/dist/CGI.pm/CGI.pm Thanks -- frosty _______________________________________________ SanFrancisco-pm mailing list SanFrancisco-pm at pm.org http://mail.pm.org/mailman/listinfo/sanfrancisco-pm From biztos at mac.com Tue May 20 13:05:00 2008 From: biztos at mac.com (frosty) Date: Tue, 20 May 2008 13:05:00 -0700 Subject: [sf-perl] search.cpan.org broken, or am I? In-Reply-To: <001901c8bab3$dcc5ec10$9651c430$@com> References: <147B5406-011A-1000-8E4E-C454647EA51B-Webmail-10011@mac.com> <001901c8bab3$dcc5ec10$9651c430$@com> Message-ID: <147B5406-011A-1000-8EB7-C454647EA51B-Webmail-10011@mac.com> Thanks Neil. I'm filing a bug per the FAQ, hopefully somebody will go down to the basement and give the server a whack. -- frosty On Tuesday, May 20, 2008, at 12:58PM, "Neil Heller" wrote: >Using the link you supplied below, I got >Proxy Error >Error reading from remote server > >Neil Heller > > >-----Original Message----- >From: sanfrancisco-pm-bounces+nheller=silcon.com at pm.org >[mailto:sanfrancisco-pm-bounces+nheller=silcon.com at pm.org] On Behalf Of >frosty >Sent: Tuesday, May 20, 2008 12:55 PM >To: San Francisco Perl Mongers User Group >Subject: [sf-perl] search.cpan.org broken, or am I? > >Is anybody else getting failures from search.cpan.org? I have a bug ready >to file against it, but on the off chance it's something weird with the >MegaCorp firewall I want to do a quick sanity check. > >For example, this finds nothing for CGI: > >http://search.cpan.org/search?query=cgi&mode=all > >Until a few minutes ago it was returning a "No matches" page, and now it's >returning a 502 Proxy Error. And while I don't think it's a proxy problem >on my end, I'd really appreciate it if someone on the list could double >check it. > >But of course the module's there: > >http://search.cpan.org/dist/CGI.pm/CGI.pm > >Thanks > >-- frosty > > >_______________________________________________ >SanFrancisco-pm mailing list >SanFrancisco-pm at pm.org >http://mail.pm.org/mailman/listinfo/sanfrancisco-pm > >_______________________________________________ >SanFrancisco-pm mailing list >SanFrancisco-pm at pm.org >http://mail.pm.org/mailman/listinfo/sanfrancisco-pm > > From biztos at mac.com Tue May 20 13:09:34 2008 From: biztos at mac.com (frosty) Date: Tue, 20 May 2008 13:09:34 -0700 Subject: [sf-perl] search.cpan.org broken, or am I? In-Reply-To: <147B5406-011A-1000-8EB7-C454647EA51B-Webmail-10011@mac.com> References: <147B5406-011A-1000-8E4E-C454647EA51B-Webmail-10011@mac.com> <001901c8bab3$dcc5ec10$9651c430$@com> <147B5406-011A-1000-8EB7-C454647EA51B-Webmail-10011@mac.com> Message-ID: <147B5406-011A-1000-8ED1-C454647EA51B-Webmail-10011@mac.com> Awesome, search-rt at perl.org bounces, so now I have two bugs to file. Anybody have a suggestion where best to raise a red flag on this? I'm going to try perlmonks I guess. -- f. On Tuesday, May 20, 2008, at 01:05PM, "frosty" wrote: >Thanks Neil. > >I'm filing a bug per the FAQ, hopefully somebody will go down to the basement and give the server a whack. > >-- frosty > >On Tuesday, May 20, 2008, at 12:58PM, "Neil Heller" wrote: >>Using the link you supplied below, I got >>Proxy Error >>Error reading from remote server >> >>Neil Heller >> >> >>-----Original Message----- >>From: sanfrancisco-pm-bounces+nheller=silcon.com at pm.org >>[mailto:sanfrancisco-pm-bounces+nheller=silcon.com at pm.org] On Behalf Of >>frosty >>Sent: Tuesday, May 20, 2008 12:55 PM >>To: San Francisco Perl Mongers User Group >>Subject: [sf-perl] search.cpan.org broken, or am I? >> >>Is anybody else getting failures from search.cpan.org? I have a bug ready >>to file against it, but on the off chance it's something weird with the >>MegaCorp firewall I want to do a quick sanity check. >> >>For example, this finds nothing for CGI: >> >>http://search.cpan.org/search?query=cgi&mode=all >> >>Until a few minutes ago it was returning a "No matches" page, and now it's >>returning a 502 Proxy Error. And while I don't think it's a proxy problem >>on my end, I'd really appreciate it if someone on the list could double >>check it. >> >>But of course the module's there: >> >>http://search.cpan.org/dist/CGI.pm/CGI.pm >> >>Thanks >> >>-- frosty >> >> >>_______________________________________________ >>SanFrancisco-pm mailing list >>SanFrancisco-pm at pm.org >>http://mail.pm.org/mailman/listinfo/sanfrancisco-pm >> >>_______________________________________________ >>SanFrancisco-pm mailing list >>SanFrancisco-pm at pm.org >>http://mail.pm.org/mailman/listinfo/sanfrancisco-pm >> >> >_______________________________________________ >SanFrancisco-pm mailing list >SanFrancisco-pm at pm.org >http://mail.pm.org/mailman/listinfo/sanfrancisco-pm > > From doom at kzsu.stanford.edu Tue May 20 23:57:40 2008 From: doom at kzsu.stanford.edu (Joe Brenner) Date: Tue, 20 May 2008 23:57:40 -0700 Subject: [sf-perl] search.cpan.org broken, or am I? In-Reply-To: <147B5406-011A-1000-8E4E-C454647EA51B-Webmail-10011@mac.com> References: <147B5406-011A-1000-8E4E-C454647EA51B-Webmail-10011@mac.com> Message-ID: <200805210657.m4L6ve2l031447@kzsu.stanford.edu> frosty wrote: > Is anybody else getting failures from search.cpan.org? I have a bug > ready to file against it, but on the off chance it's something weird > with the MegaCorp firewall I want to do a quick sanity check. > > For example, this finds nothing for CGI: > > http://search.cpan.org/search?query=cgi&mode=all Works for me: http://search.cpan.org/search?query=cgi&mode=all From biztos at mac.com Wed May 21 00:03:36 2008 From: biztos at mac.com (Kevin Frost) Date: Wed, 21 May 2008 00:03:36 -0700 Subject: [sf-perl] search.cpan.org broken, or am I? In-Reply-To: <200805210657.m4L6ve2l031447@kzsu.stanford.edu> References: <147B5406-011A-1000-8E4E-C454647EA51B-Webmail-10011@mac.com> <200805210657.m4L6ve2l031447@kzsu.stanford.edu> Message-ID: <10ECAFBA-277C-471D-8C7F-FD0F3C00F5C0@mac.com> It got fixed, thanks. -- frosty (via iPhone) On May 20, 2008, at 11:57 PM, Joe Brenner wrote: > > frosty wrote: > >> Is anybody else getting failures from search.cpan.org? I have a bug >> ready to file against it, but on the off chance it's something weird >> with the MegaCorp firewall I want to do a quick sanity check. >> >> For example, this finds nothing for CGI: >> >> http://search.cpan.org/search?query=cgi&mode=all > > Works for me: > > http://search.cpan.org/search?query=cgi&mode=all > > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm From george at metaart.org Wed May 21 16:33:06 2008 From: george at metaart.org (George Woolley) Date: Wed, 21 May 2008 16:33:06 -0700 Subject: [sf-perl] Missing Groups List? Message-ID: <200805211633.06467.george@metaart.org> hi all, as of earlier today, this group is on the pm census 2008 - missing groups list at http://mag-sol.com/census2008/missing.cgi does anyone know what's up with that? skoal, george From nheller at silcon.com Thu May 22 15:11:06 2008 From: nheller at silcon.com (Neil Heller) Date: Thu, 22 May 2008 15:11:06 -0700 Subject: [sf-perl] Plucking from a string Message-ID: <003201c8bc58$bb8dde80$32a99b80$@com> I just wrote the code below and was wondering how I could make a inner loop A LOT simpler. I would appreciate any suggestions. Basically the code works like this: Given an arbitrary string, that string contains a single identifier (in this case "bcd=") followed by a numeric value. I would like to pull out the identifier and the value so the resulting display is (for example): bcd=7 bcd=88 bcd=999 bcd=1000 Neil Heller #! usr/bin/perl use warnings; use strict; my $counter = 0; my $theline = "vvvbcd=7wwwbcd=88xxxbcd=999yyybcd=1000zzz"; my $TARGETSTR = "bcd="; my $spot = 0; my $done = 0; my $fragment; my ($inner_done, $inner_char, $inner_count); my $NUMERIC = "0123456789"; while (!$done) { $spot = index $theline, $TARGETSTR; if ($spot == -1) { $done = 1; } else { $fragment = substr $theline, $spot; print $TARGETSTR; $inner_done = 0; $inner_count = 4; while (!$inner_done) { $inner_char = substr $fragment, $inner_count, 1; if ((index $NUMERIC, $inner_char) > -1) { print $inner_char; $inner_count++; } else { $inner_done = 1; } } print "\n"; $fragment = substr $fragment, 5; $theline = $fragment; } } -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/sanfrancisco-pm/attachments/20080522/1419e2f6/attachment.html From sergey.fetisov at ask.com Thu May 22 15:24:38 2008 From: sergey.fetisov at ask.com (Sergey Fetisov) Date: Thu, 22 May 2008 15:24:38 -0700 Subject: [sf-perl] Plucking from a string In-Reply-To: <003201c8bc58$bb8dde80$32a99b80$@com> References: <003201c8bc58$bb8dde80$32a99b80$@com> Message-ID: <09AD1BE32C2FCF47A8049BDA1D0449ED02BB25D4@Site1Mail04.jeeves.ask.info> Hi, Just do it in a Perl-oriented style - use the regular expressions: #!/usr/bin/perl use warnings; use strict; my $theline = "vvvbcd=7wwwbcd=88xxxbcd=999yyybcd=1000zzz"; my $TARGETSTR = "bcd="; while ($theline =~ /($TARGETSTR\d+)/gi) { print "$1\n"; } Regards, Sergey ________________________________ From: sanfrancisco-pm-bounces+sergey.fetisov=ask.com at pm.org [mailto:sanfrancisco-pm-bounces+sergey.fetisov=ask.com at pm.org] On Behalf Of Neil Heller Sent: Thursday, May 22, 2008 3:11 PM To: 'San Francisco Perl Mongers User Group' Subject: [sf-perl] Plucking from a string I just wrote the code below and was wondering how I could make a inner loop A LOT simpler. I would appreciate any suggestions. Basically the code works like this: Given an arbitrary string, that string contains a single identifier (in this case "bcd=") followed by a numeric value. I would like to pull out the identifier and the value so the resulting display is (for example): bcd=7 bcd=88 bcd=999 bcd=1000 Neil Heller #! usr/bin/perl use warnings; use strict; my $counter = 0; my $theline = "vvvbcd=7wwwbcd=88xxxbcd=999yyybcd=1000zzz"; my $TARGETSTR = "bcd="; my $spot = 0; my $done = 0; my $fragment; my ($inner_done, $inner_char, $inner_count); my $NUMERIC = "0123456789"; while (!$done) { $spot = index $theline, $TARGETSTR; if ($spot == -1) { $done = 1; } else { $fragment = substr $theline, $spot; print $TARGETSTR; $inner_done = 0; $inner_count = 4; while (!$inner_done) { $inner_char = substr $fragment, $inner_count, 1; if ((index $NUMERIC, $inner_char) > -1) { print $inner_char; $inner_count++; } else { $inner_done = 1; } } print "\n"; $fragment = substr $fragment, 5; $theline = $fragment; } } -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/sanfrancisco-pm/attachments/20080522/dde7ea92/attachment.html From fred at redhotpenguin.com Thu May 22 15:25:38 2008 From: fred at redhotpenguin.com (Fred Moyer) Date: Thu, 22 May 2008 15:25:38 -0700 Subject: [sf-perl] Plucking from a string In-Reply-To: <003201c8bc58$bb8dde80$32a99b80$@com> References: <003201c8bc58$bb8dde80$32a99b80$@com> Message-ID: <4835F2E2.1000009@redhotpenguin.com> Neil Heller wrote: > I just wrote the code below and was wondering how I could make a inner > loop A LOT simpler. > > I would appreciate any suggestions. I was able to do it with a regex and a map statement - is this what you wanted? I hacked it out in the perl debugger. phred at pooky ~ $ perl -d -e 0 Loading DB routines from perl5db.pl version 1.28 Editor support available. Enter h or `h h' for help, or `man perldebug' for more help. main::(-e:1): 0 DB<1> $string = 'vvvbcd=7wwwbcd=88xxxbcd=999yyybcd=1000zzz' DB<2> x $foo = 'bcd=' 0 'bcd=' DB<3> x @foos = map { $foo . $_ } $string =~ m/$foo(\d+)/g 0 'bcd=7' 1 'bcd=88' 2 'bcd=999' 3 'bcd=1000' > > Basically the code works like this: > > Given an arbitrary string, that string contains a single identifier (in > this case ?bcd=?) followed by a numeric value. > > I would like to pull out the identifier and the value so the resulting > display is (for example): > > bcd=7 > > bcd=88 > > bcd=999 > > bcd=1000 > > > > Neil Heller > > > > > > #! usr/bin/perl > > > > use warnings; > > use strict; > > > > my $counter = 0; > > my $theline = "vvvbcd=7wwwbcd=88xxxbcd=999yyybcd=1000zzz"; > > my $TARGETSTR = "bcd="; > > my $spot = 0; > > my $done = 0; > > my $fragment; > > my ($inner_done, $inner_char, $inner_count); > > my $NUMERIC = "0123456789"; > > > > while (!$done) { > > $spot = index $theline, $TARGETSTR; > > if ($spot == -1) { > > $done = 1; > > } else { > > $fragment = substr $theline, $spot; > > print $TARGETSTR; > > $inner_done = 0; > > $inner_count = 4; > > while (!$inner_done) { > > $inner_char = substr $fragment, $inner_count, 1; > > if ((index $NUMERIC, $inner_char) > -1) { > > print $inner_char; > > $inner_count++; > > } else { > > $inner_done = 1; > > } > > } > > print "\n"; > > $fragment = substr $fragment, 5; > > $theline = $fragment; > > } > > } > > > ------------------------------------------------------------------------ > > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm -- Red Hot Penguin Consulting LLC mod_perl/PostgreSQL consulting and implementation http://www.redhotpenguin.com/ From nheller at silcon.com Thu May 22 16:40:26 2008 From: nheller at silcon.com (Neil Heller) Date: Thu, 22 May 2008 16:40:26 -0700 Subject: [sf-perl] Plucking from a string In-Reply-To: <09AD1BE32C2FCF47A8049BDA1D0449ED02BB25D4@Site1Mail04.jeeves.ask.info> References: <003201c8bc58$bb8dde80$32a99b80$@com> <09AD1BE32C2FCF47A8049BDA1D0449ED02BB25D4@Site1Mail04.jeeves.ask.info> Message-ID: <003001c8bc65$36345fe0$a29d1fa0$@com> You win the gold star! One question though. In the line while ($theline =~ /($TARGETSTR\d+)/gi) { print "$1\n"; } why did you use the parens "(" and ")" inside the real expression? Neil Heller From: sanfrancisco-pm-bounces+nheller=silcon.com at pm.org [mailto:sanfrancisco-pm-bounces+nheller=silcon.com at pm.org] On Behalf Of Sergey Fetisov Sent: Thursday, May 22, 2008 3:25 PM To: San Francisco Perl Mongers User Group Subject: Re: [sf-perl] Plucking from a string Hi, Just do it in a Perl-oriented style - use the regular expressions: #!/usr/bin/perl use warnings; use strict; my $theline = "vvvbcd=7wwwbcd=88xxxbcd=999yyybcd=1000zzz"; my $TARGETSTR = "bcd="; while ($theline =~ /($TARGETSTR\d+)/gi) { print "$1\n"; } Regards, Sergey _____ From: sanfrancisco-pm-bounces+sergey.fetisov=ask.com at pm.org [mailto:sanfrancisco-pm-bounces+sergey.fetisov=ask.com at pm.org] On Behalf Of Neil Heller Sent: Thursday, May 22, 2008 3:11 PM To: 'San Francisco Perl Mongers User Group' Subject: [sf-perl] Plucking from a string I just wrote the code below and was wondering how I could make a inner loop A LOT simpler. I would appreciate any suggestions. Basically the code works like this: Given an arbitrary string, that string contains a single identifier (in this case "bcd=") followed by a numeric value. I would like to pull out the identifier and the value so the resulting display is (for example): bcd=7 bcd=88 bcd=999 bcd=1000 Neil Heller #! usr/bin/perl use warnings; use strict; my $counter = 0; my $theline = "vvvbcd=7wwwbcd=88xxxbcd=999yyybcd=1000zzz"; my $TARGETSTR = "bcd="; my $spot = 0; my $done = 0; my $fragment; my ($inner_done, $inner_char, $inner_count); my $NUMERIC = "0123456789"; while (!$done) { $spot = index $theline, $TARGETSTR; if ($spot == -1) { $done = 1; } else { $fragment = substr $theline, $spot; print $TARGETSTR; $inner_done = 0; $inner_count = 4; while (!$inner_done) { $inner_char = substr $fragment, $inner_count, 1; if ((index $NUMERIC, $inner_char) > -1) { print $inner_char; $inner_count++; } else { $inner_done = 1; } } print "\n"; $fragment = substr $fragment, 5; $theline = $fragment; } } -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/sanfrancisco-pm/attachments/20080522/4a72ed45/attachment.html From not.com at gmail.com Thu May 22 16:43:41 2008 From: not.com at gmail.com (yary) Date: Thu, 22 May 2008 16:43:41 -0700 Subject: [sf-perl] Plucking from a string In-Reply-To: <003001c8bc65$36345fe0$a29d1fa0$@com> References: <003201c8bc58$bb8dde80$32a99b80$@com> <09AD1BE32C2FCF47A8049BDA1D0449ED02BB25D4@Site1Mail04.jeeves.ask.info> <003001c8bc65$36345fe0$a29d1fa0$@com> Message-ID: <75cbfa570805221643u5d61cc87g9172606f1b80f3b1@mail.gmail.com> On Thu, May 22, 2008 at 4:40 PM, Neil Heller wrote: > You win the gold star! > > One question though. In the line > > > > while ($theline =~ /($TARGETSTR\d+)/gi) { print "$1\n"; } > > > > why did you use the parens "(" and ")" inside the real expression? to set $1 see if the command "perldoc perlre" works on your system, it may be helpful in explaining. From biztos at mac.com Thu May 22 18:35:24 2008 From: biztos at mac.com (frosty) Date: Thu, 22 May 2008 18:35:24 -0700 Subject: [sf-perl] Plucking from a string In-Reply-To: <75cbfa570805221643u5d61cc87g9172606f1b80f3b1@mail.gmail.com> References: <003201c8bc58$bb8dde80$32a99b80$@com> <09AD1BE32C2FCF47A8049BDA1D0449ED02BB25D4@Site1Mail04.jeeves.ask.info> <003001c8bc65$36345fe0$a29d1fa0$@com> <75cbfa570805221643u5d61cc87g9172606f1b80f3b1@mail.gmail.com> Message-ID: <0509400D-011A-1000-A32B-C3691FB1E4E2-Webmail-10019@mac.com> Here's a minor variation, which I think should be a little faster. my $theline = "vvvbcd=7wwwbcd=88xxxbcd=999yyybcd=1000zzz"; my $TARGET = qr/(?:bcd=\d+)/; # safer to precompile the whole regex print "$_\n" for ( $theline =~ /$TARGET/g ); -- f. On Thursday, May 22, 2008, at 04:44PM, "yary" wrote: >On Thu, May 22, 2008 at 4:40 PM, Neil Heller wrote: >> You win the gold star! >> >> One question though. In the line >> >> >> >> while ($theline =~ /($TARGETSTR\d+)/gi) { print "$1\n"; } >> >> >> >> why did you use the parens "(" and ")" inside the real expression? > >to set $1 > >see if the command "perldoc perlre" works on your system, it may be >helpful in explaining. >_______________________________________________ >SanFrancisco-pm mailing list >SanFrancisco-pm at pm.org >http://mail.pm.org/mailman/listinfo/sanfrancisco-pm > > From nheller at silcon.com Fri May 23 07:30:05 2008 From: nheller at silcon.com (Neil Heller) Date: Fri, 23 May 2008 07:30:05 -0700 Subject: [sf-perl] Plucking from a string In-Reply-To: <09AD1BE32C2FCF47A8049BDA1D0449ED02BB25D4@Site1Mail04.jeeves.ask.info> References: <003201c8bc58$bb8dde80$32a99b80$@com> <09AD1BE32C2FCF47A8049BDA1D0449ED02BB25D4@Site1Mail04.jeeves.ask.info> Message-ID: <000001c8bce1$7ea47630$7bed6290$@com> Just one more question. In the line: while ($theline =~ /($TARGETSTR\d+)/gi) { print "$1\n"; } why is the d+ escaped? Neil Heller 510-862-4387 From: sanfrancisco-pm-bounces+nheller=silcon.com at pm.org [mailto:sanfrancisco-pm-bounces+nheller=silcon.com at pm.org] On Behalf Of Sergey Fetisov Sent: Thursday, May 22, 2008 3:25 PM To: San Francisco Perl Mongers User Group Subject: Re: [sf-perl] Plucking from a string Hi, Just do it in a Perl-oriented style - use the regular expressions: #!/usr/bin/perl use warnings; use strict; my $theline = "vvvbcd=7wwwbcd=88xxxbcd=999yyybcd=1000zzz"; my $TARGETSTR = "bcd="; while ($theline =~ /($TARGETSTR\d+)/gi) { print "$1\n"; } Regards, Sergey _____ From: sanfrancisco-pm-bounces+sergey.fetisov=ask.com at pm.org [mailto:sanfrancisco-pm-bounces+sergey.fetisov=ask.com at pm.org] On Behalf Of Neil Heller Sent: Thursday, May 22, 2008 3:11 PM To: 'San Francisco Perl Mongers User Group' Subject: [sf-perl] Plucking from a string I just wrote the code below and was wondering how I could make a inner loop A LOT simpler. I would appreciate any suggestions. Basically the code works like this: Given an arbitrary string, that string contains a single identifier (in this case "bcd=") followed by a numeric value. I would like to pull out the identifier and the value so the resulting display is (for example): bcd=7 bcd=88 bcd=999 bcd=1000 Neil Heller #! usr/bin/perl use warnings; use strict; my $counter = 0; my $theline = "vvvbcd=7wwwbcd=88xxxbcd=999yyybcd=1000zzz"; my $TARGETSTR = "bcd="; my $spot = 0; my $done = 0; my $fragment; my ($inner_done, $inner_char, $inner_count); my $NUMERIC = "0123456789"; while (!$done) { $spot = index $theline, $TARGETSTR; if ($spot == -1) { $done = 1; } else { $fragment = substr $theline, $spot; print $TARGETSTR; $inner_done = 0; $inner_count = 4; while (!$inner_done) { $inner_char = substr $fragment, $inner_count, 1; if ((index $NUMERIC, $inner_char) > -1) { print $inner_char; $inner_count++; } else { $inner_done = 1; } } print "\n"; $fragment = substr $fragment, 5; $theline = $fragment; } } -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/sanfrancisco-pm/attachments/20080523/5c2b5aa1/attachment-0001.html From david at fetter.org Fri May 23 07:47:14 2008 From: david at fetter.org (David Fetter) Date: Fri, 23 May 2008 07:47:14 -0700 Subject: [sf-perl] Plucking from a string In-Reply-To: <000001c8bce1$7ea47630$7bed6290$@com> References: <003201c8bc58$bb8dde80$32a99b80$@com> <09AD1BE32C2FCF47A8049BDA1D0449ED02BB25D4@Site1Mail04.jeeves.ask.info> <000001c8bce1$7ea47630$7bed6290$@com> Message-ID: <20080523144714.GB12504@fetter.org> On Fri, May 23, 2008 at 07:30:05AM -0700, Neil Heller wrote: > Just one more question. > > In the line: > > while ($theline =~ /($TARGETSTR\d+)/gi) { print "$1\n"; } > > why is the d+ escaped? > It's not "d+ escaped." It actually reads as "digit" (\d), "one or more of" (+) Cheers, David. -- David Fetter http://fetter.org/ Phone: +1 415 235 3778 AIM: dfetter666 Yahoo!: dfetter Skype: davidfetter XMPP: david.fetter at gmail.com Remember to vote! Consider donating to Postgres: http://www.postgresql.org/about/donate From not.com at gmail.com Fri May 23 07:47:22 2008 From: not.com at gmail.com (yary) Date: Fri, 23 May 2008 07:47:22 -0700 Subject: [sf-perl] Plucking from a string In-Reply-To: <000001c8bce1$7ea47630$7bed6290$@com> References: <003201c8bc58$bb8dde80$32a99b80$@com> <09AD1BE32C2FCF47A8049BDA1D0449ED02BB25D4@Site1Mail04.jeeves.ask.info> <000001c8bce1$7ea47630$7bed6290$@com> Message-ID: <75cbfa570805230747m33f61e99o5764da158c0c5ee0@mail.gmail.com> On Fri, May 23, 2008 at 7:30 AM, Neil Heller wrote: > Just one more question? > > > > In the line: > > while ($theline =~ /($TARGETSTR\d+)/gi) { print "$1\n"; } > > > > why is the d+ escaped? Try it without the backslash, and then try replacing the numbers in the input with the letter "d". It's an eye opener! Perhaps the command "perldoc perlre" isn't working on your system (bad install?)- so try this page- http://www.perl.com/doc/manual/html/pod/perlre.html and search for "\d" -y From not.com at gmail.com Fri May 23 07:50:48 2008 From: not.com at gmail.com (yary) Date: Fri, 23 May 2008 07:50:48 -0700 Subject: [sf-perl] Plucking from a string In-Reply-To: <75cbfa570805230747m33f61e99o5764da158c0c5ee0@mail.gmail.com> References: <003201c8bc58$bb8dde80$32a99b80$@com> <09AD1BE32C2FCF47A8049BDA1D0449ED02BB25D4@Site1Mail04.jeeves.ask.info> <000001c8bce1$7ea47630$7bed6290$@com> <75cbfa570805230747m33f61e99o5764da158c0c5ee0@mail.gmail.com> Message-ID: <75cbfa570805230750u123a258dse939955cf849fdba@mail.gmail.com> On Fri, May 23, 2008 at 7:47 AM, yary wrote: > On Fri, May 23, 2008 at 7:30 AM, Neil Heller wrote: ..>> why is the d+ escaped? > > Try it without the backslash, and then try replacing the numbers in > the input with the letter "d". It's an eye opener! oops, what I should have said was Try this while ($theline =~ /(${TARGETSTR}d+)/gi) { print "$1\n"; } once you remove the backslash, you have to add the brackets around the variable to prevent the "d" from becoming part of the variable. From john.a.penkethman at lmco.com Fri May 23 10:36:54 2008 From: john.a.penkethman at lmco.com (Penkethman, John A) Date: Fri, 23 May 2008 10:36:54 -0700 Subject: [sf-perl] Plucking from a string In-Reply-To: <75cbfa570805230747m33f61e99o5764da158c0c5ee0@mail.gmail.com> References: <000001c8bce1$7ea47630$7bed6290$@com> <75cbfa570805230747m33f61e99o5764da158c0c5ee0@mail.gmail.com> Message-ID: <600FBD79D2619F4FB9301F9E08E3D7340C70C746@emss01m14.us.lmco.com> Good stuff. But what's happening internally with while ($theline =~ /($TARGETSTR\d+)/gi) { print "$1\n"; } Within the while loop, is the matching expression "$theline =~ /($TARGETSTR\d+)/gi" returning one match at a time for each loop iteration? It would seem so since it then assigns the result to $1 each time. On the other hand, in frosty's my $TARGET = qr/(?:bcd=\d+)/; print "$_\n" for ( $theline =~ /$TARGET/g ); the "$theline =~ /$TARGET/g" statement seems to be returning a whole array, which then gets assigned to $_ one at a time. Why the difference? Is there a difference? I think this is great, but I would not have expected this behavior in the while loop. Thanks, jack -----Original Message----- From: sanfrancisco-pm-bounces+john.a.penkethman=lmco.com at pm.org [mailto:sanfrancisco-pm-bounces+john.a.penkethman=lmco.com at pm.org] On Behalf Of yary Sent: Friday, May 23, 2008 7:47 AM To: San Francisco Perl Mongers User Group Subject: Re: [sf-perl] Plucking from a string On Fri, May 23, 2008 at 7:30 AM, Neil Heller wrote: > Just one more question... > > > > In the line: > > while ($theline =~ /($TARGETSTR\d+)/gi) { print "$1\n"; } > > > > why is the d+ escaped? Try it without the backslash, and then try replacing the numbers in the input with the letter "d". It's an eye opener! Perhaps the command "perldoc perlre" isn't working on your system (bad install?)- so try this page- http://www.perl.com/doc/manual/html/pod/perlre.html and search for "\d" -y _______________________________________________ SanFrancisco-pm mailing list SanFrancisco-pm at pm.org http://mail.pm.org/mailman/listinfo/sanfrancisco-pm From garth.webb at gmail.com Fri May 23 11:32:48 2008 From: garth.webb at gmail.com (Garth Webb) Date: Fri, 23 May 2008 11:32:48 -0700 Subject: [sf-perl] Plucking from a string In-Reply-To: <600FBD79D2619F4FB9301F9E08E3D7340C70C746@emss01m14.us.lmco.com> References: <000001c8bce1$7ea47630$7bed6290$@com> <75cbfa570805230747m33f61e99o5764da158c0c5ee0@mail.gmail.com> <600FBD79D2619F4FB9301F9E08E3D7340C70C746@emss01m14.us.lmco.com> Message-ID: On Fri, May 23, 2008 at 10:36 AM, Penkethman, John A wrote: > Good stuff. > > But what's happening internally with > > while ($theline =~ /($TARGETSTR\d+)/gi) { print "$1\n"; } > > > Within the while loop, is the matching expression "$theline =~ > /($TARGETSTR\d+)/gi" returning one match at a time for each loop > iteration? It would seem so since it then assigns the result to $1 each > time. > > On the other hand, in frosty's > > my $TARGET = qr/(?:bcd=\d+)/; > > print "$_\n" for ( $theline =~ /$TARGET/g ); > > the "$theline =~ /$TARGET/g" statement seems to be returning a whole > array, which then gets assigned to $_ one at a time. Why the difference? > Is there a difference? I think this is great, but I would not have > expected this behavior in the while loop. The regex responds to scalar vs. array context. In an array context, all the matches are returned. In a scalar context, just one at a time is returned. Garth > Thanks, > jack > > > -----Original Message----- > From: sanfrancisco-pm-bounces+john.a.penkethman=lmco.com at pm.org > [mailto:sanfrancisco-pm-bounces+john.a.penkethman=lmco.com at pm.org] On > Behalf Of yary > Sent: Friday, May 23, 2008 7:47 AM > To: San Francisco Perl Mongers User Group > Subject: Re: [sf-perl] Plucking from a string > > On Fri, May 23, 2008 at 7:30 AM, Neil Heller wrote: >> Just one more question... >> >> >> >> In the line: >> >> while ($theline =~ /($TARGETSTR\d+)/gi) { print "$1\n"; } >> >> >> >> why is the d+ escaped? > > Try it without the backslash, and then try replacing the numbers in > the input with the letter "d". It's an eye opener! > > Perhaps the command "perldoc perlre" isn't working on your system (bad > install?)- so try this page- > http://www.perl.com/doc/manual/html/pod/perlre.html > and search for "\d" > > -y > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm > From john.a.penkethman at lmco.com Fri May 23 14:20:13 2008 From: john.a.penkethman at lmco.com (Penkethman, John A) Date: Fri, 23 May 2008 14:20:13 -0700 Subject: [sf-perl] Plucking from a string In-Reply-To: References: <000001c8bce1$7ea47630$7bed6290$@com> <75cbfa570805230747m33f61e99o5764da158c0c5ee0@mail.gmail.com> <600FBD79D2619F4FB9301F9E08E3D7340C70C746@emss01m14.us.lmco.com> Message-ID: <600FBD79D2619F4FB9301F9E08E3D7340C70C749@emss01m14.us.lmco.com> As a beginner in Perl, there have been three areas that have been most troublesome to learn (aside from general cryticity): 1) scalar vs. list context, as in the thing below 2) variable scoping, as in name space, packages etc. I understand lexical now, I guess. 3) variable lifetime, with respect to when Perl destroys or keeps data depending on whether or not a reference still exists to it. Jack -----Original Message----- From: sanfrancisco-pm-bounces+john.a.penkethman=lmco.com at pm.org [mailto:sanfrancisco-pm-bounces+john.a.penkethman=lmco.com at pm.org] On Behalf Of Garth Webb Sent: Friday, May 23, 2008 11:33 AM To: San Francisco Perl Mongers User Group Subject: Re: [sf-perl] Plucking from a string On Fri, May 23, 2008 at 10:36 AM, Penkethman, John A wrote: > Good stuff. > > But what's happening internally with > > while ($theline =~ /($TARGETSTR\d+)/gi) { print "$1\n"; } > > > Within the while loop, is the matching expression "$theline =~ > /($TARGETSTR\d+)/gi" returning one match at a time for each loop > iteration? It would seem so since it then assigns the result to $1 each > time. > > On the other hand, in frosty's > > my $TARGET = qr/(?:bcd=\d+)/; > > print "$_\n" for ( $theline =~ /$TARGET/g ); > > the "$theline =~ /$TARGET/g" statement seems to be returning a whole > array, which then gets assigned to $_ one at a time. Why the difference? > Is there a difference? I think this is great, but I would not have > expected this behavior in the while loop. The regex responds to scalar vs. array context. In an array context, all the matches are returned. In a scalar context, just one at a time is returned. Garth > Thanks, > jack > > > -----Original Message----- > From: sanfrancisco-pm-bounces+john.a.penkethman=lmco.com at pm.org > [mailto:sanfrancisco-pm-bounces+john.a.penkethman=lmco.com at pm.org] On > Behalf Of yary > Sent: Friday, May 23, 2008 7:47 AM > To: San Francisco Perl Mongers User Group > Subject: Re: [sf-perl] Plucking from a string > > On Fri, May 23, 2008 at 7:30 AM, Neil Heller wrote: >> Just one more question... >> >> >> >> In the line: >> >> while ($theline =~ /($TARGETSTR\d+)/gi) { print "$1\n"; } >> >> >> >> why is the d+ escaped? > > Try it without the backslash, and then try replacing the numbers in > the input with the letter "d". It's an eye opener! > > Perhaps the command "perldoc perlre" isn't working on your system (bad > install?)- so try this page- > http://www.perl.com/doc/manual/html/pod/perlre.html > and search for "\d" > > -y > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm > _______________________________________________ SanFrancisco-pm mailing list SanFrancisco-pm at pm.org http://mail.pm.org/mailman/listinfo/sanfrancisco-pm From sergey.fetisov at ask.com Fri May 23 16:01:36 2008 From: sergey.fetisov at ask.com (Sergey Fetisov) Date: Fri, 23 May 2008 16:01:36 -0700 Subject: [sf-perl] Plucking from a string In-Reply-To: <0509400D-011A-1000-A32B-C3691FB1E4E2-Webmail-10019@mac.com> References: <003201c8bc58$bb8dde80$32a99b80$@com><09AD1BE32C2FCF47A8049BDA1D0449ED02BB25D4@Site1Mail04.jeeves.ask.info><003001c8bc65$36345fe0$a29d1fa0$@com><75cbfa570805221643u5d61cc87g9172606f1b80f3b1@mail.gmail.com> <0509400D-011A-1000-A32B-C3691FB1E4E2-Webmail-10019@mac.com> Message-ID: <09AD1BE32C2FCF47A8049BDA1D0449ED02C4BD76@Site1Mail04.jeeves.ask.info> Hi, Faster, but not always (as far as much more memory is required in an array context). So it depends from the string size and how much memory has been allocated by the script before. Occasionally the memory allocation takes some time :) and adds some cost Below my small example and I hope it shows the difference #!/usr/bin/perl -wT use Time::HiRes qw(gettimeofday tv_interval); # CPAN: http://search.cpan.org/dist/Time-HiRes/ use strict; my $theline = "vvvbcd=7wwwbcd=88xxxbcd=999yyybcd=1000zzz"; my $TARGETSTR = "bcd="; for my $i (1..3) { $theline .= $theline foreach (0..($i-1)*6); print "EXPERIMENT $i: Length of the string ${\length($theline)}\n"; methodA(); methodB(); } print "LAST EXPERIMENT REPEAT: Length of the string ${\length($theline)}\n"; methodA(); methodB(); sub methodA { my ($interval, $count); $interval = [gettimeofday]; while ($theline =~ /($TARGETSTR\d+)/gi) { $count++; } $interval = tv_interval ( $interval ); print "\tMethod A: $count matches found, processing time: $interval\n"; } sub methodB { my ($interval, $count); $interval = [gettimeofday]; my $TARGET = qr/(?i:bcd=\d+)/; $count++ for ( $theline =~ /$TARGET/g ); $interval = tv_interval ( $interval ); print "\tMethod B: $count matches found, processing time: $interval\n"; } = Sergey -----Original Message----- From: sanfrancisco-pm-bounces+sergey.fetisov=ask.com at pm.org [mailto:sanfrancisco-pm-bounces+sergey.fetisov=ask.com at pm.org] On Behalf Of frosty Sent: Thursday, May 22, 2008 6:35 PM To: San Francisco Perl Mongers User Group Subject: Re: [sf-perl] Plucking from a string Here's a minor variation, which I think should be a little faster. my $theline = "vvvbcd=7wwwbcd=88xxxbcd=999yyybcd=1000zzz"; my $TARGET = qr/(?:bcd=\d+)/; # safer to precompile the whole regex print "$_\n" for ( $theline =~ /$TARGET/g ); -- f. From rdm at cfcl.com Sat May 24 08:29:32 2008 From: rdm at cfcl.com (Rich Morin) Date: Sat, 24 May 2008 08:29:32 -0700 Subject: [sf-perl] BASS Meeting (SF), Wed. May 28 Message-ID: The Beer and Scripting SIG rides again! If you'd like to eat good Italian food, chat with other local scripters, and possibly take a look at laptop-demoed scripting hacks, this is the place to do it! For your convenience, here are the critical details: Date: Wednesday, May 28, 2008 (4th. Wed.) Time: 8:00 pm Place: Pasquales Pizzeria 701 Irving St. (At 8th. Ave.) San Francisco, California, USA 415/661-2140 See the BASS web page for more information: http://cfcl.com/rdm/bass/ -r -- http://www.cfcl.com/rdm Rich Morin http://www.cfcl.com/rdm/resume rdm at cfcl.com http://www.cfcl.com/rdm/weblog +1 650-873-7841 Technical editing and writing, programming, and web development From nheller at silcon.com Tue May 27 09:52:37 2008 From: nheller at silcon.com (Neil Heller) Date: Tue, 27 May 2008 09:52:37 -0700 Subject: [sf-perl] Pushing and Popping an array on the heap Message-ID: <001201c8c01a$11af1a30$350d4e90$@com> Some of the advantages of using an array are the push and pop functions. The following instantiates a reference on the stack that points to an (anonymous) empty array on the heap: What I would like to do is: 1. Instantiate a reference on the stack that points to an empty, anonymous array on the heap. 2. "push" a reference ($a2ref) into the original anonymous array that points to a secondary, anonymous array 3. "push" a series of references into the array referenced by $a2ref An example might look something like the following: $a1ref = [undef]; (The values to be pushed are as follows); Washington $a1ref->[0] Seattle $a1ref[0]->[0] Olympia $a1ref[0]->[1] Tacoma $a1ref[0]->[2] Oregon $a1ref->[1] Portland Salem Beaverton Finally, I would like to pop (or shift) values from $a1ref followed by the individual members of the secondary array (such as $a1ref[0]->[0]). The problem is that I don't have a clue (nor am I able to find) how to use (or the syntax involved to) "push" (or unshift) and "pop" (or shift) values into and out of this described data structure. I appreciate any help I can get. Neil Heller -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/sanfrancisco-pm/attachments/20080527/f0cad809/attachment.html From dan at peeron.com Tue May 27 10:11:03 2008 From: dan at peeron.com (Dan Boger) Date: Tue, 27 May 2008 10:11:03 -0700 Subject: [sf-perl] Pushing and Popping an array on the heap In-Reply-To: <001201c8c01a$11af1a30$350d4e90$@com> References: <001201c8c01a$11af1a30$350d4e90$@com> Message-ID: On Tue, May 27, 2008 at 9:52 AM, Neil Heller wrote: > The problem is that I don't have a clue (nor am I able to find) how to > use (or the syntax involved to) "push" (or unshift) and "pop" (or shift) > values into and out of this described data structure. > I think (but can't be sure since you didn't post what you tried) that you're running into a precedence issue. If you type: push $a1ref[0]->[0], "value"; Push will complain since it wants an array as it's first argument, not an array reference. The way to get around it is to dereference the array: push @{$a1ref[0]->[0]}, "value"; Same will work for any of the array manipulation commands (shift, pop, unshift, splice, etc). HTH! Dan -- Dan Boger -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/sanfrancisco-pm/attachments/20080527/94f5dc4b/attachment.html From dan at peeron.com Tue May 27 10:17:13 2008 From: dan at peeron.com (Dan Boger) Date: Tue, 27 May 2008 10:17:13 -0700 Subject: [sf-perl] Meeting tonight? Message-ID: Is there a meeting tonight? http://sf.pm.org/weblog/ doesn't seem to mention one... I moved to the area recently from Boston and am missing my monthly AA^h^hPM meetings. Dan -- Dan Boger -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/sanfrancisco-pm/attachments/20080527/7e0434e7/attachment.html From josh at agliodbs.com Tue May 27 10:59:41 2008 From: josh at agliodbs.com (Josh Berkus) Date: Tue, 27 May 2008 10:59:41 -0700 Subject: [sf-perl] Meeting tonight? In-Reply-To: References: Message-ID: <200805271059.41921.josh@agliodbs.com> On Tuesday 27 May 2008 10:17, Dan Boger wrote: > Is there a meeting tonight? http://sf.pm.org/weblog/ doesn't seem to > mention one... Apparently not. There hasn't been an announcement. -- --Josh Josh Berkus PostgreSQL @ Sun San Francisco From quinn at fairpath.com Tue May 27 11:19:03 2008 From: quinn at fairpath.com (Quinn Weaver) Date: Tue, 27 May 2008 11:19:03 -0700 Subject: [sf-perl] Meeting tonight? In-Reply-To: References: Message-ID: <5B66003B-CA56-4FE0-8172-9B0558C2F1CB@fairpath.com> Sorry, no meeting this month... Unless Rich wants to call a shotgun meeting. Rich? In any case, regular meetings will resume in June. Sorry for the confusion - next time thus happens, I'll mail an announcement to say there's NOT a meeting. Thanks, -- Quinn Weaver Full-stack web consultant http://fairpath.com/ 510-520-5217 (mobile) On May 27, 2008, at 10:17 AM, "Dan Boger" wrote: > Is there a meeting tonight? http://sf.pm.org/weblog/ doesn't seem > to mention one... > > I moved to the area recently from Boston and am missing my monthly > AA^h^hPM meetings. > > Dan > > -- > Dan Boger > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/sanfrancisco-pm/attachments/20080527/78dc9b81/attachment.html From sergey.fetisov at ask.com Tue May 27 11:32:40 2008 From: sergey.fetisov at ask.com (Sergey Fetisov) Date: Tue, 27 May 2008 11:32:40 -0700 Subject: [sf-perl] Pushing and Popping an array on the heap In-Reply-To: <001201c8c01a$11af1a30$350d4e90$@com> References: <001201c8c01a$11af1a30$350d4e90$@com> Message-ID: <09AD1BE32C2FCF47A8049BDA1D0449ED02C4BE9D@Site1Mail04.jeeves.ask.info> Hi, The next works too: push @$a1ref, ["Seattle", "Olympia", "Tacoma"]; print $a1ref->[0][0] . "\n"; But $alref->[0] is array and you can not push a scalar (e.g. "Washington") there. I think the next structure fits better to your goal: push @{$a1ref->{Washington}}, ("Seattle", "Olympia", "Tacoma"); print $a1ref->{Washington}[0] . "\n"; -- Sergey ________________________________ From: sanfrancisco-pm-bounces+sergey.fetisov=ask.com at pm.org [mailto:sanfrancisco-pm-bounces+sergey.fetisov=ask.com at pm.org] On Behalf Of Dan Boger Sent: Tuesday, May 27, 2008 10:11 AM To: San Francisco Perl Mongers User Group Subject: Re: [sf-perl] Pushing and Popping an array on the heap On Tue, May 27, 2008 at 9:52 AM, Neil Heller > wrote: The problem is that I don't have a clue (nor am I able to find) how to use (or the syntax involved to) "push" (or unshift) and "pop" (or shift) values into and out of this described data structure. I think (but can't be sure since you didn't post what you tried) that you're running into a precedence issue. If you type: push $a1ref[0]->[0], "value"; Push will complain since it wants an array as it's first argument, not an array reference. The way to get around it is to dereference the array: push @{$a1ref[0]->[0]}, "value"; Same will work for any of the array manipulation commands (shift, pop, unshift, splice, etc). HTH! Dan -- Dan Boger ________________________________ From: sanfrancisco-pm-bounces+sergey.fetisov=ask.com at pm.org [mailto:sanfrancisco-pm-bounces+sergey.fetisov=ask.com at pm.org] On Behalf Of Neil Heller Sent: Tuesday, May 27, 2008 9:53 AM To: 'San Francisco Perl Mongers User Group' Subject: [sf-perl] Pushing and Popping an array on the heap Some of the advantages of using an array are the push and pop functions. The following instantiates a reference on the stack that points to an (anonymous) empty array on the heap: What I would like to do is: 1. Instantiate a reference on the stack that points to an empty, anonymous array on the heap. 2. "push" a reference ($a2ref) into the original anonymous array that points to a secondary, anonymous array 3. "push" a series of references into the array referenced by $a2ref An example might look something like the following: $a1ref = [undef]; (The values to be pushed are as follows); Washington $a1ref->[0] Seattle $a1ref[0]->[0] Olympia $a1ref[0]->[1] Tacoma $a1ref[0]->[2] Oregon $a1ref->[1] Portland Salem Beaverton Finally, I would like to pop (or shift) values from $a1ref followed by the individual members of the secondary array (such as $a1ref[0]->[0]). The problem is that I don't have a clue (nor am I able to find) how to use (or the syntax involved to) "push" (or unshift) and "pop" (or shift) values into and out of this described data structure. I appreciate any help I can get. Neil Heller -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/sanfrancisco-pm/attachments/20080527/d86b5b2e/attachment-0001.html From garth.webb at gmail.com Tue May 27 11:35:43 2008 From: garth.webb at gmail.com (Garth Webb) Date: Tue, 27 May 2008 11:35:43 -0700 Subject: [sf-perl] Pushing and Popping an array on the heap In-Reply-To: <001201c8c01a$11af1a30$350d4e90$@com> References: <001201c8c01a$11af1a30$350d4e90$@com> Message-ID: On Tue, May 27, 2008 at 9:52 AM, Neil Heller wrote: > Some of the advantages of using an array are the push and pop functions. > > > > The following instantiates a reference on the stack that points to an > (anonymous) empty array on the heap: > > > > What I would like to do is: > > > > 1. Instantiate a reference on the stack that points to an empty, > anonymous array on the heap. > > 2. "push" a reference ($a2ref) into the original anonymous array that > points to a secondary, anonymous array > > 3. "push" a series of references into the array referenced by $a2ref > > > > An example might look something like the following: > > > > $a1ref = [undef]; > > (The values to be pushed are as follows); > > > > Washington $a1ref->[0] > > Seattle $a1ref[0]->[0] > > Olympia $a1ref[0]->[1] > > Tacoma $a1ref[0]->[2] > > > > Oregon $a1ref->[1] > > Portland > > Salem > > Beaverton > > > > > > Finally, I would like to pop (or shift) values from $a1ref followed by the > individual members of the secondary array (such as $a1ref[0]->[0]). > > > > The problem is that I don't have a clue (nor am I able to find) how to use > (or the syntax involved to) "push" (or unshift) and "pop" (or shift) values > into and out of this described data structure. Where have you looked so far? Where did those sources fall short? What have you tried already? Examples of all these things will help get you better answers since: * It shows how you've already helped yourself; many people with good answers won't respond if they think they'll be used a replacement for 'man', 'perldoc -q' or google. * It helps people not give answers to things you've already figured out. A first reading of this question makes it sound like you haven't read 'man perlfunc' to discover the 'pop' and 'push' methods, but it maybe you already have and are just having a problem with the syntax of multidimensional arrays. * If there's a specific bit of documentation that you tried but didn't make sense we can help clarify that rather than just point you back at it because we didn't know you already read it. So, what have you tried? What docs didn't make sense? Garth > > > I appreciate any help I can get. > > > > Neil Heller > > > > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm > > From david_v_wright at yahoo.com Tue May 27 12:02:37 2008 From: david_v_wright at yahoo.com (david wright) Date: Tue, 27 May 2008 12:02:37 -0700 (PDT) Subject: [sf-perl] Pushing and Popping an array on the heap In-Reply-To: <09AD1BE32C2FCF47A8049BDA1D0449ED02C4BE9D@Site1Mail04.jeeves.ask.info> Message-ID: <900121.77636.qm@web31805.mail.mud.yahoo.com> > I think the next structure fits better to your goal: > > push @{$a1ref->{Washington}}, ("Seattle", > "Olympia", "Tacoma"); > print $a1ref->{Washington}[0] . "\n"; I agree with Sergey, push @{$a1ref->{Washington}}, ("Seattle", "Olympia", "Tacoma"); warn Dumper $a1ref; $VAR1 = { 'Washington' => [ 'Seattle', 'Olympia', 'Tacoma' ] }; There are a few indispensable resources I use for dealing with perl data structures: perldoc perldsc (perldsc - Perl Data Structures Cookbook) and the module (in perl base) Data::Dumper (an example as used above) +David --- On Tue, 5/27/08, Sergey Fetisov wrote: > From: Sergey Fetisov > Subject: Re: [sf-perl] Pushing and Popping an array on the heap > To: "San Francisco Perl Mongers User Group" > Date: Tuesday, May 27, 2008, 2:32 PM > Hi, > > The next works too: > push @$a1ref, ["Seattle", "Olympia", > "Tacoma"]; > print $a1ref->[0][0] . "\n"; > > But $alref->[0] is array and you can not push a scalar > (e.g. > "Washington") there. > I think the next structure fits better to your goal: > > push @{$a1ref->{Washington}}, ("Seattle", > "Olympia", "Tacoma"); > print $a1ref->{Washington}[0] . "\n"; > > > -- Sergey > > ________________________________ > > From: sanfrancisco-pm-bounces+sergey.fetisov=ask.com at pm.org > [mailto:sanfrancisco-pm-bounces+sergey.fetisov=ask.com at pm.org] > On Behalf > Of Dan Boger > Sent: Tuesday, May 27, 2008 10:11 AM > To: San Francisco Perl Mongers User Group > Subject: Re: [sf-perl] Pushing and Popping an array on the > heap > > > > On Tue, May 27, 2008 at 9:52 AM, Neil Heller > > wrote: > > > The problem is that I don't have a clue (nor am I able > to find) > how to use (or the syntax involved to) "push" (or > unshift) and "pop" (or > shift) values into and out of this described data > structure. > > I think (but can't be sure since you didn't post > what you tried) that > you're running into a precedence issue. If you type: > > push $a1ref[0]->[0], "value"; > > Push will complain since it wants an array as it's > first argument, not > an array reference. The way to get around it is to > dereference the > array: > > push @{$a1ref[0]->[0]}, "value"; > > Same will work for any of the array manipulation commands > (shift, pop, > unshift, splice, etc). > > HTH! > > Dan > > -- > Dan Boger > > ________________________________ > > From: sanfrancisco-pm-bounces+sergey.fetisov=ask.com at pm.org > [mailto:sanfrancisco-pm-bounces+sergey.fetisov=ask.com at pm.org] > On Behalf > Of Neil Heller > Sent: Tuesday, May 27, 2008 9:53 AM > To: 'San Francisco Perl Mongers User Group' > Subject: [sf-perl] Pushing and Popping an array on the heap > > > > Some of the advantages of using an array are the push and > pop functions. > > > > The following instantiates a reference on the stack that > points to an > (anonymous) empty array on the heap: > > > > What I would like to do is: > > > > 1. Instantiate a reference on the stack that points > to an empty, > anonymous array on the heap. > > 2. "push" a reference ($a2ref) into the > original anonymous array > that points to a secondary, anonymous array > > 3. "push" a series of references into the > array referenced by > $a2ref > > > > An example might look something like the following: > > > > $a1ref = [undef]; > > (The values to be pushed are as follows); > > > > Washington $a1ref->[0] > > Seattle $a1ref[0]->[0] > > Olympia $a1ref[0]->[1] > > Tacoma $a1ref[0]->[2] > > > > Oregon $a1ref->[1] > > Portland > > Salem > > Beaverton > > > > > > Finally, I would like to pop (or shift) values from $a1ref > followed by > the individual members of the secondary array (such as > $a1ref[0]->[0]). > > > > The problem is that I don't have a clue (nor am I able > to find) how to > use (or the syntax involved to) "push" (or > unshift) and "pop" (or shift) > values into and out of this described data structure. > > > > I appreciate any help I can get. > > > > Neil Heller_______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm From david_v_wright at yahoo.com Tue May 27 12:43:13 2008 From: david_v_wright at yahoo.com (david wright) Date: Tue, 27 May 2008 12:43:13 -0700 (PDT) Subject: [sf-perl] Pushing and Popping an array on the heap In-Reply-To: <900121.77636.qm@web31805.mail.mud.yahoo.com> Message-ID: <298361.11329.qm@web31806.mail.mud.yahoo.com> > > Washington $a1ref->[0] > > > > Seattle $a1ref[0]->[0] > > > > Olympia $a1ref[0]->[1] > > > > Tacoma $a1ref[0]->[2] this is as close to your original desired data structure as I can get: assuming you mean, $a1ref->[0], $a1ref->[0]->[1] use strict; use warnings; use Data::Dumper; my $a1ref = (); $a1ref->[0] = ['Washington']; push( @{ $a1ref->[0]->[1] }, (qw/Seattle Olympia Tacoma /) ); warn Dumper $a1ref; $VAR1 = [ [ 'Washington', [ 'Seattle', 'Olympia', 'Tacoma' ] ] ]; +David --- On Tue, 5/27/08, david wright wrote: > From: david wright > Subject: Re: [sf-perl] Pushing and Popping an array on the heap > To: "San Francisco Perl Mongers User Group" > Date: Tuesday, May 27, 2008, 3:02 PM > > I think the next structure fits better to your goal: > > > > push @{$a1ref->{Washington}}, ("Seattle", > > "Olympia", "Tacoma"); > > print $a1ref->{Washington}[0] . "\n"; > > I agree with Sergey, > > push @{$a1ref->{Washington}}, ("Seattle", > "Olympia", "Tacoma"); > warn Dumper $a1ref; > > $VAR1 = { > 'Washington' => [ > 'Seattle', > 'Olympia', > 'Tacoma' > ] > }; > > > There are a few indispensable resources I use for dealing > with perl data structures: > > perldoc perldsc (perldsc - Perl Data Structures Cookbook) > > and the module (in perl base) Data::Dumper (an example as > used above) > > > +David > > > --- On Tue, 5/27/08, Sergey Fetisov > wrote: > > > From: Sergey Fetisov > > Subject: Re: [sf-perl] Pushing and Popping an array on > the heap > > To: "San Francisco Perl Mongers User Group" > > > Date: Tuesday, May 27, 2008, 2:32 PM > > Hi, > > > > The next works too: > > push @$a1ref, ["Seattle", > "Olympia", > > "Tacoma"]; > > print $a1ref->[0][0] . "\n"; > > > > But $alref->[0] is array and you can not push a > scalar > > (e.g. > > "Washington") there. > > I think the next structure fits better to your goal: > > > > push @{$a1ref->{Washington}}, ("Seattle", > > "Olympia", "Tacoma"); > > print $a1ref->{Washington}[0] . "\n"; > > > > > > -- Sergey > > > > ________________________________ > > > > From: > sanfrancisco-pm-bounces+sergey.fetisov=ask.com at pm.org > > > [mailto:sanfrancisco-pm-bounces+sergey.fetisov=ask.com at pm.org] > > On Behalf > > Of Dan Boger > > Sent: Tuesday, May 27, 2008 10:11 AM > > To: San Francisco Perl Mongers User Group > > Subject: Re: [sf-perl] Pushing and Popping an array on > the > > heap > > > > > > > > On Tue, May 27, 2008 at 9:52 AM, Neil Heller > > > > wrote: > > > > > > The problem is that I don't have a clue (nor am I > able > > to find) > > how to use (or the syntax involved to) > "push" (or > > unshift) and "pop" (or > > shift) values into and out of this described data > > structure. > > > > I think (but can't be sure since you didn't > post > > what you tried) that > > you're running into a precedence issue. If you > type: > > > > push $a1ref[0]->[0], "value"; > > > > Push will complain since it wants an array as it's > > first argument, not > > an array reference. The way to get around it is to > > dereference the > > array: > > > > push @{$a1ref[0]->[0]}, "value"; > > > > Same will work for any of the array manipulation > commands > > (shift, pop, > > unshift, splice, etc). > > > > HTH! > > > > Dan > > > > -- > > Dan Boger > > > > ________________________________ > > > > From: > sanfrancisco-pm-bounces+sergey.fetisov=ask.com at pm.org > > > [mailto:sanfrancisco-pm-bounces+sergey.fetisov=ask.com at pm.org] > > On Behalf > > Of Neil Heller > > Sent: Tuesday, May 27, 2008 9:53 AM > > To: 'San Francisco Perl Mongers User Group' > > Subject: [sf-perl] Pushing and Popping an array on the > heap > > > > > > > > Some of the advantages of using an array are the push > and > > pop functions. > > > > > > > > The following instantiates a reference on the stack > that > > points to an > > (anonymous) empty array on the heap: > > > > > > > > What I would like to do is: > > > > > > > > 1. Instantiate a reference on the stack that > points > > to an empty, > > anonymous array on the heap. > > > > 2. "push" a reference ($a2ref) into > the > > original anonymous array > > that points to a secondary, anonymous array > > > > 3. "push" a series of references into > the > > array referenced by > > $a2ref > > > > > > > > An example might look something like the following: > > > > > > > > $a1ref = [undef]; > > > > (The values to be pushed are as follows); > > > > > > > > Washington $a1ref->[0] > > > > Seattle $a1ref[0]->[0] > > > > Olympia $a1ref[0]->[1] > > > > Tacoma $a1ref[0]->[2] > > > > > > > > Oregon $a1ref->[1] > > > > Portland > > > > Salem > > > > Beaverton > > > > > > > > > > > > Finally, I would like to pop (or shift) values from > $a1ref > > followed by > > the individual members of the secondary array (such as > > $a1ref[0]->[0]). > > > > > > > > The problem is that I don't have a clue (nor am I > able > > to find) how to > > use (or the syntax involved to) "push" (or > > unshift) and "pop" (or shift) > > values into and out of this described data structure. > > > > > > > > I appreciate any help I can get. > > > > > > > > Neil > Heller_______________________________________________ > > SanFrancisco-pm mailing list > > SanFrancisco-pm at pm.org > > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm From extasia at extasia.org Tue May 27 13:19:45 2008 From: extasia at extasia.org (David Alban) Date: Tue, 27 May 2008 13:19:45 -0700 Subject: [sf-perl] Meeting tonight? In-Reply-To: <5B66003B-CA56-4FE0-8172-9B0558C2F1CB@fairpath.com> References: <5B66003B-CA56-4FE0-8172-9B0558C2F1CB@fairpath.com> Message-ID: <4c714a9c0805271319h5e7376dcr2bfb80f5eb6173dc@mail.gmail.com> "This meeting slot intentionally left blank". :-) On Tue, May 27, 2008 at 11:19 AM, Quinn Weaver wrote: > next time thus happens, I'll mail an announcement > to say there's NOT a meeting. -- Live in a world of your own, but always welcome visitors. From not.com at gmail.com Tue May 27 13:33:37 2008 From: not.com at gmail.com (yary) Date: Tue, 27 May 2008 13:33:37 -0700 Subject: [sf-perl] Pushing and Popping an array on the heap In-Reply-To: References: <001201c8c01a$11af1a30$350d4e90$@com> Message-ID: <75cbfa570805271333l796b8d05k596731f59c476ef9@mail.gmail.com> On Tue, May 27, 2008 at 11:35 AM, Garth Webb wrote: .. > Where have you looked so far? Where did those sources fall short? > What have you tried already? +1. I tried helping out Neil last week with another beginner's question, and also gave a pointer to the docs. Now I get the feeling we're answering homework questions. Still, I'll try and be nice. "$a1ref = [];" is a reference to an empty anonymous list. "$a1ref = [undef];" is a reference to anonymous list with one undefined element in it. That, plus the help you've already received, should help you on your way... From nheller at silcon.com Tue May 27 13:38:32 2008 From: nheller at silcon.com (Neil Heller) Date: Tue, 27 May 2008 13:38:32 -0700 Subject: [sf-perl] Pushing and Popping an array on the heap In-Reply-To: <75cbfa570805271333l796b8d05k596731f59c476ef9@mail.gmail.com> References: <001201c8c01a$11af1a30$350d4e90$@com> <75cbfa570805271333l796b8d05k596731f59c476ef9@mail.gmail.com> Message-ID: <003d01c8c039$a1264d90$e372e8b0$@com> Thank you very much. That's nice coming from someone who is probably younger than my grandchildren. Neil Heller 510-862-4387 -----Original Message----- From: sanfrancisco-pm-bounces+nheller=silcon.com at pm.org [mailto:sanfrancisco-pm-bounces+nheller=silcon.com at pm.org] On Behalf Of yary Sent: Tuesday, May 27, 2008 1:34 PM To: San Francisco Perl Mongers User Group Subject: Re: [sf-perl] Pushing and Popping an array on the heap On Tue, May 27, 2008 at 11:35 AM, Garth Webb wrote: .. > Where have you looked so far? Where did those sources fall short? > What have you tried already? +1. I tried helping out Neil last week with another beginner's question, and also gave a pointer to the docs. Now I get the feeling we're answering homework questions. Still, I'll try and be nice. "$a1ref = [];" is a reference to an empty anonymous list. "$a1ref = [undef];" is a reference to anonymous list with one undefined element in it. That, plus the help you've already received, should help you on your way... _______________________________________________ SanFrancisco-pm mailing list SanFrancisco-pm at pm.org http://mail.pm.org/mailman/listinfo/sanfrancisco-pm From extasia at extasia.org Tue May 27 13:46:23 2008 From: extasia at extasia.org (David Alban) Date: Tue, 27 May 2008 13:46:23 -0700 Subject: [sf-perl] Getting Help [was: Pushing and Popping an array on the heap] Message-ID: <4c714a9c0805271346h41ea7a06m674833acd1632678@mail.gmail.com> apparently this was left out of the list below and should be inserted before the last list item. don't be cranky, or send flamey bits to anyone. ---------- Forwarded message ---------- Date: Sat, Mar 8, 2008 at 3:09 PM Subject: Re: [sf-perl] Getting Help (was Re: Debugging a CGI script - how) To: San Francisco Perl Mongers User Group * demonstrate a serious effort on your part before posting your questions (see 'rtfm'); at the very least, have done a web search and have consulted the available documentation (see 'perldoc', 'man', and friends) * specific questions will get much better results than extremely high level / vague / general questions or questions without detail * don't post anything that even appears that you want someone else to do your work for free; note the use of the word "appears"; you may not intend it, but if it appears that you do you will probably not get the information you need * try and come up with the smallest and simplest code that demonstrates your problem (if applicable), you'll get fewer responses if folks have to spend more then five or ten minutes grokking your problem. * if someone cranky flames you, don't respond to the flamey bits. just don't. On Tue, May 27, 2008 at 1:38 PM, Neil Heller wrote: > Thank you very much. > That's nice coming from someone who is probably younger than my > grandchildren. -- Live in a world of your own, but always welcome visitors. From kpatters at berkeley.edu Wed May 28 11:06:39 2008 From: kpatters at berkeley.edu (Kevin Patterson) Date: Wed, 28 May 2008 11:06:39 -0700 Subject: [sf-perl] TLS over AUTH In-Reply-To: <900121.77636.qm@web31805.mail.mud.yahoo.com> References: <09AD1BE32C2FCF47A8049BDA1D0449ED02C4BE9D@Site1Mail04.jeeves.ask.info> <900121.77636.qm@web31805.mail.mud.yahoo.com> Message-ID: <00c501c8c0ed$945c2cb0$bd148610$@edu> Hello... I am having a hard time trying to do send emails in Perl using SSL/TLS over AUTH. I attempt to install this feature in every way possible, but cannot find all the components. When I find one in CPAN, it does not have the other things I need to make this work. Is there a perl installation software (FREE) out there which has everything in one package for SSL/TLS??? Thanks.. From thomas at brightbill.net Thu May 29 16:16:08 2008 From: thomas at brightbill.net (Thomas Brightbill) Date: Thu, 29 May 2008 16:16:08 -0700 (PDT) Subject: [sf-perl] TLS over AUTH In-Reply-To: <003801c8c1d8$31870c90$949525b0$@edu> References: <09AD1BE32C2FCF47A8049BDA1D0449ED02C4BE9D@Site1Mail04.jeeves.ask.info> <900121.77636.qm@web31805.mail.mud.yahoo.com> <00c501c8c0ed$945c2cb0$bd148610$@edu> <003801c8c1d8$31870c90$949525b0$@edu> Message-ID: On Thu, 29 May 2008, Kevin Patterson wrote: > I tried the CPAN installer, but I am still coming up short of missing > some modules.. Hi Kevin, I'm hoping someone with better experience jumps in.... To confirm a couple things: - is the module you're trying to install Net::SMTP::TLS? - do you have root privledges on the machine you're trying to install it on? I just tried to install Net::SMTP::TLS using the CPAN shell while logged in as a non-root user and it looked like it died trying to install Net::SSLeay. I also tried to install just Net::SSLeay and that failed as well. Thomas Thomas Brightbill thomas at brightbill.net http://www.brightbill.net From kpatters at berkeley.edu Thu May 29 16:55:32 2008 From: kpatters at berkeley.edu (Kevin Patterson) Date: Thu, 29 May 2008 16:55:32 -0700 Subject: [sf-perl] TLS over AUTH In-Reply-To: References: <09AD1BE32C2FCF47A8049BDA1D0449ED02C4BE9D@Site1Mail04.jeeves.ask.info> <900121.77636.qm@web31805.mail.mud.yahoo.com> <00c501c8c0ed$945c2cb0$bd148610$@edu> <003801c8c1d8$31870c90$949525b0$@edu> Message-ID: <004201c8c1e7$7b091ca0$711b55e0$@edu> Thanks Thomas... Yes, I have FULL admin rights to my desktop.. When I install the NET::SMTP::TLS and the SSLeay, It says everything is installed ok.. But when I try to run, there is an .ix file missing and a couple of modules.. When I do a search on the files, they are not there.. -----Original Message----- From: sanfrancisco-pm-bounces+kpatters=berkeley.edu at pm.org [mailto:sanfrancisco-pm-bounces+kpatters=berkeley.edu at pm.org] On Behalf Of Thomas Brightbill Sent: Thursday, May 29, 2008 4:16 PM To: sanfrancisco-pm at pm.org Subject: Re: [sf-perl] TLS over AUTH On Thu, 29 May 2008, Kevin Patterson wrote: > I tried the CPAN installer, but I am still coming up short of missing > some modules.. Hi Kevin, I'm hoping someone with better experience jumps in.... To confirm a couple things: - is the module you're trying to install Net::SMTP::TLS? - do you have root privledges on the machine you're trying to install it on? I just tried to install Net::SMTP::TLS using the CPAN shell while logged in as a non-root user and it looked like it died trying to install Net::SSLeay. I also tried to install just Net::SSLeay and that failed as well. Thomas Thomas Brightbill thomas at brightbill.net http://www.brightbill.net _______________________________________________ SanFrancisco-pm mailing list SanFrancisco-pm at pm.org http://mail.pm.org/mailman/listinfo/sanfrancisco-pm From kpatters at berkeley.edu Thu May 29 17:29:48 2008 From: kpatters at berkeley.edu (Kevin Patterson) Date: Thu, 29 May 2008 17:29:48 -0700 Subject: [sf-perl] calling Perl routines into another Perl program In-Reply-To: <004201c8c1e7$7b091ca0$711b55e0$@edu> References: <09AD1BE32C2FCF47A8049BDA1D0449ED02C4BE9D@Site1Mail04.jeeves.ask.info> <900121.77636.qm@web31805.mail.mud.yahoo.com> <00c501c8c0ed$945c2cb0$bd148610$@edu> <003801c8c1d8$31870c90$949525b0$@edu> <004201c8c1e7$7b091ca0$711b55e0$@edu> Message-ID: <004f01c8c1ec$44567ae0$cd0370a0$@edu> Is it possible to call a Perl routine into another Perl program ?? From matisse at matisse.net Thu May 29 17:39:46 2008 From: matisse at matisse.net (Matisse Enzer) Date: Thu, 29 May 2008 17:39:46 -0700 Subject: [sf-perl] calling Perl routines into another Perl program In-Reply-To: <004f01c8c1ec$44567ae0$cd0370a0$@edu> References: <09AD1BE32C2FCF47A8049BDA1D0449ED02C4BE9D@Site1Mail04.jeeves.ask.info> <900121.77636.qm@web31805.mail.mud.yahoo.com> <00c501c8c0ed$945c2cb0$bd148610$@edu> <003801c8c1d8$31870c90$949525b0$@edu> <004201c8c1e7$7b091ca0$711b55e0$@edu> <004f01c8c1ec$44567ae0$cd0370a0$@edu> Message-ID: Can you give an example of what you mean by "into another Perl program" That doesn't quite make sense in English, maybe try rephrasing that? Sent from my iPhone On May 29, 2008, at 5:29 PM, "Kevin Patterson" wrote: > Is it possible to call a Perl routine into another Perl program ?? > > > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm From doom at kzsu.stanford.edu Thu May 29 17:43:47 2008 From: doom at kzsu.stanford.edu (Joe Brenner) Date: Thu, 29 May 2008 17:43:47 -0700 Subject: [sf-perl] calling Perl routines into another Perl program In-Reply-To: <004f01c8c1ec$44567ae0$cd0370a0$@edu> References: <09AD1BE32C2FCF47A8049BDA1D0449ED02C4BE9D@Site1Mail04.jeeves.ask.info> <900121.77636.qm@web31805.mail.mud.yahoo.com> <00c501c8c0ed$945c2cb0$bd148610$@edu> <003801c8c1d8$31870c90$949525b0$@edu> <004201c8c1e7$7b091ca0$711b55e0$@edu> <004f01c8c1ec$44567ae0$cd0370a0$@edu> Message-ID: <200805300043.m4U0hlcJ082117@kzsu.stanford.edu> Kevin Patterson wrote: > Is it possible to call a Perl routine into another Perl program ?? Yes. I'm tempted to stop there, but we're supposed to be nice here. Typically, we would say you "call the routine *from* another program", does that sound like what you mean? The right way to do this is to put the routine in a module and "use" it in the program that is going to call the routine. You might try doing a "perldoc perlmod", and see if that makes sense to you. From kpatters at berkeley.edu Thu May 29 18:44:38 2008 From: kpatters at berkeley.edu (Kevin Patterson) Date: Thu, 29 May 2008 18:44:38 -0700 Subject: [sf-perl] calling Perl routines into another Perl program In-Reply-To: <200805300043.m4U0hlcJ082117@kzsu.stanford.edu> References: <09AD1BE32C2FCF47A8049BDA1D0449ED02C4BE9D@Site1Mail04.jeeves.ask.info> <900121.77636.qm@web31805.mail.mud.yahoo.com> <00c501c8c0ed$945c2cb0$bd148610$@edu> <003801c8c1d8$31870c90$949525b0$@edu> <004201c8c1e7$7b091ca0$711b55e0$@edu> <004f01c8c1ec$44567ae0$cd0370a0$@edu> <200805300043.m4U0hlcJ082117@kzsu.stanford.edu> Message-ID: <005001c8c1f6$b8d87c10$2a897430$@edu> Sorry.. I am a newbie... But thanks for the education!!! -----Original Message----- From: Joe Brenner [mailto:doom at kzsu.stanford.edu] Sent: Thursday, May 29, 2008 5:44 PM To: kpatters at berkeley.edu; San Francisco Perl Mongers User Group Subject: Re: [sf-perl] calling Perl routines into another Perl program Kevin Patterson wrote: > Is it possible to call a Perl routine into another Perl program ?? Yes. I'm tempted to stop there, but we're supposed to be nice here. Typically, we would say you "call the routine *from* another program", does that sound like what you mean? The right way to do this is to put the routine in a module and "use" it in the program that is going to call the routine. You might try doing a "perldoc perlmod", and see if that makes sense to you. From quinn at fairpath.com Fri May 30 21:18:29 2008 From: quinn at fairpath.com (Quinn Weaver) Date: Fri, 30 May 2008 21:18:29 -0700 Subject: [sf-perl] Missing Groups List? In-Reply-To: <200805211633.06467.george@metaart.org> References: <200805211633.06467.george@metaart.org> Message-ID: On May 21, 2008, at 4:33 PM, George Woolley wrote: > hi all, > as of earlier today, > this group is on the pm census 2008 - missing groups list at > http://mag-sol.com/census2008/missing.cgi > does anyone know what's up with that? I've answered the census now, so we should be removed from the "missing" list soonish. Thanks for pointing this out. From george at metaart.org Sat May 31 12:07:10 2008 From: george at metaart.org (George Woolley) Date: Sat, 31 May 2008 12:07:10 -0700 Subject: [sf-perl] Missing Groups List? In-Reply-To: References: <200805211633.06467.george@metaart.org> Message-ID: <200805311207.10596.george@metaart.org> On Friday 30 May 2008 21:18, Quinn Weaver wrote: > On May 21, 2008, at 4:33 PM, George Woolley wrote: > > hi all, > > as of earlier today, > > this group is on the pm census 2008 - missing groups list at > > http://mag-sol.com/census2008/missing.cgi > > does anyone know what's up with that? > > I've answered the census now, so we should be removed from the > "missing" list soonish. Thanks for pointing this out. ---------------------------------------------------- hi quinn, thanks for filling out the census. when i looked earlier today, san francisco was no longer on the missing groups list. re your thanks: you are welcome. george