From extasia at extasia.org Mon Feb 4 17:36:53 2008 From: extasia at extasia.org (David Alban) Date: Mon, 4 Feb 2008 17:36:53 -0800 Subject: [sf-perl] [job] contract position at stubhub/ebay in san francisco In-Reply-To: <4c714a9c0802041645t26ac940ckd2bd25e588c5e30b@mail.gmail.com> References: <4c714a9c0802041645t26ac940ckd2bd25e588c5e30b@mail.gmail.com> Message-ID: <4c714a9c0802041736k65ec3c07v730f73040889fb75@mail.gmail.com> heh. i forgot my audience. here is a text version of the job req. RELEASE ENGINEER The Company StubHub is an online ticket exchange where fans buy or sell sports, concert, theater, and exclusive event tickets. StubHub offers fans exclusive event packages and charity auctions that no other Website offers. All transactions on StubHub are 100% guaranteed and we offer FedEx tracking, managed logistics, and live customer service. Summary of Duties: StubHub is seeking a talented Release Engineer that has skills and experience in developing internal tools for automation and managing build/deploy process. The Release Engineer will have a proven track record developing automated tools and processes to build and deploy releases in a managed service environment. The role will exist within Release Management. Essential Duties and Responsibilities: ? Skilled in Perl and UNIX shell programming (or other appropriate tools languages) ? Able to design and implement a robust web support system for communicating build issues and status ? Able to administer, manage and maintain source control system (CVS, Perforce, etc.); experience in sizing, tuning, backup, rollouts, etc. ? Collaborate with Development to implement and develop nightly build process (Ant, CruiseControl) ? Familiar with late night/overnight deployments to production ? Experience generating deployment plans and managing releases ? Excellent communication skills; able to interface with multiple groups across the company ? Provide expertise to the rest of the engineering organization regarding build tools and source control ? Advocate new tools and processes to continuously improve build and source control efficiency ? Mentor and assist junior members of the team as necessary Skills and Abilities Needed: ? BSCS or other technical degree or equivalent experience ? Extensive experience in a UNIX / LINUX environment ? 5+ years hands-on experience as a build or release engineer ? Experience with Open-Source development tools and systems e.g. Ant, Java, CruiseControl ? Expert knowledge of build, release and configuration management practices ? Familiarity with Windows desktop environment ? Experience working in a startup environment ? Demonstrated problem solving and troubleshooting skills ? Self-Starter; ability to quickly learn new tools and products ? Cooperative attitude and style ? Excellent verbal and written communication skills On Feb 4, 2008 4:45 PM, David Alban wrote: > [applicants please email Cynthia Walston ] > > greetings, > > my group at stubhub (a subsidiary of ebay) is looking to fill a > contract position in the release engineering group. > > the official req is attached. we're looking for someone to write / > test / maintain perl tools and web interfaces to them in support of > release engineering processes. we're looking for candidates who have > extensive perl and unix experience. we're also looking for someone > who can fairly easily put cgi front ends on our backend tools. > platform is linux. > > familiarity with perforce and/or ant is a plus. > > we're located a couple blocks from the embarcadero bart station. > > if you're interested, and of course qualified, please send your resume > to my manager Cynthia Walston at . > > thanks, > david > > p.s. do you know someone else who might be qualified/interested? > > [applicants please Cynthia Walston -- Live in a world of your own, but always welcome visitors. From afife at untangle.com Tue Feb 5 22:53:29 2008 From: afife at untangle.com (Andrew Fife) Date: Tue, 5 Feb 2008 22:53:29 -0800 (PST) Subject: [sf-perl] Bruce Perens @ BALUG (Feb 19th) Message-ID: <003801c8688d$0a9f7940$4301a8c0@Untangle.local> Howdy Folks: Bruce Perens will be giving a talk titled "Innovation Goes Public" at the Bay Area Linux Users Group (BALUG) on February 19th. (See the abstract below) If you'd like to come, please RSVP: RSVP at balug.org If you haven't been to BALUG in a while, this a great opportunity to check out what we're up to... and who knows you may just wind up eating dinner with Bruce Perens at your table. Upcoming 2008 speakers include: Feb 19th - Bruce Perens March 25th (New Date) - Mark Shuttleworth (Ubuntu/Canonical) April 15th - Eric Allman (Sendmail) May 20th - Jeremy Allison (Samba) June 17th - Andrew Morton (Linux kernel) July 15th - Mike Linksvayer (Creative Commons) So why not signup for BALUG's extremely low volume announce list: http://lists.balug.org/listinfo.cgi/balug-announce-balug.org Meeting Details... 6:30pm February 19th, 2008 Four Seas Restaurant 731 Grant Ave. San Francisco, CA 94108 PARKING: http://www.portsmouthsquaregarage.com/ Cost: The meetings are always free, but dinner is $13 ABSTRACT: "Innovation Goes Public" Presented by Bruce Perens, co-founder of the Open Source initiative insoftware. Open Source provides much of the software infrastructure for many of the world's largest companies and organizations: Merrill Lynch, Google, Pixar, Amazon, the City of New York, and probably you - although you might not know it. Innovative products like Linux, Firefox, and Apache are the market-leaders in their sectors, but there are tens of thousands of Open Source programs, used for just about everything. But the economics of Open Source are non-intuitive: how can you make money by giving software away? Why did IBM de-emphasize AIX, after spending Billions, in favor of Linux, the product of a loose collaboration of programmers that it can never control? How can the world's greatest city trust Open Source to help manage its jails? Bruce Perens will show how Open Source is often the most effective strategy for creating and utilizing new innovation. He will explain the economics of Open Source and how it works for profit-generating companies. His talk will be clear to beginners yet informative even for Open Source pros. 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 - Open Source Security Gateway download.untangle.com 650.425.3327 (O) 415.806.6028 (C) afife at untangle.com From cba at groundworkopensource.com Wed Feb 6 14:33:48 2008 From: cba at groundworkopensource.com (Chris B. Anderson) Date: Wed, 6 Feb 2008 14:33:48 -0800 Subject: [sf-perl] BayLISA Monitoring SIG: Weds, Feb 13 2008, 7PM Message-ID: (Hi: You're invited to the BayLISA Monitoring SIG, Weds, Feb 13 2008, 7PM. See the meeting announcement pasted below: feel free to post it and/or forward it along to anyone else who might be interested. Many thanks, and hope to see you there!) ================================================= Monitoring SIG XIV: Ganglia Monitoring and Integration Thomas Stocking will present an overview of Ganglia and showcase the Ganglia Integration Module that adds innovative thresholding functions to the Ganglia monitoring system. Then Peter Loh will show some enhancements he's developed to extend ganglia with alarms and filtered console views. This SIG will be a kick-off to the Ganglia "Project in Residence" event Feb 28-29: more details at the meeting. What: BayLISA Monitoring SIG XIV: Ganglia Monitoring and Integration Who: Anyone interested in IT monitoring issues and tools (newbies particularly welcome!) When: Wednesday, Feb 13 2008, 7PM Where: GroundWork Open Source, 139 Townsend St., San Francisco How: 139 Townsend St. is very near AT&T Ballpark. It is one and a half blocks from the CalTrain Depot. Take the MUNI N, T or J trolley to 2nd and King (ballpark stop) or take the 30 or 45 bus (among others) crosstown. Free evening street parking can probably be found, and there are several fee-based parking garages around in case of parking difficulty. Cost: Free!! Presidents' Day pizza, carbonated and non-carbonated liquid refreshments, and healthy (and questionably healthy) snacks provided by GroundWork. We'll open up the doors at 6:30 or so and start the formal part of the meeting promptly at 7PM. RSVP (not necessary, but helpful): Peter Mui, pmui at groundworkopensource.com, 415-992-4573, www.groundworkopensource.com Can't attend in person? We'll try to broadcast live via WebEx: contact Peter if you want more info on this. ================================================= -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/sanfrancisco-pm/attachments/20080206/4479588e/attachment.html From spidaman at arachna.com Fri Feb 15 08:47:51 2008 From: spidaman at arachna.com (spidaman at arachna.com) Date: Fri, 15 Feb 2008 08:47:51 -0800 (PST) Subject: [sf-perl] "Giving the internet a good spanking." Message-ID: This blog may be Not-Safe-For-Work, the content and the design may be too juvenile for my tastes but the logo in the upper right hand corner is a chuckle http://www.itballerz.com/wordpress/ -- Ian Kallen | Yahoo/AIM: iankallen http://www.arachna.com/roller/page/spidaman From gj262 at yahoo.com Fri Feb 15 09:33:26 2008 From: gj262 at yahoo.com (Gavin Jefferies) Date: Fri, 15 Feb 2008 09:33:26 -0800 (PST) Subject: [sf-perl] "Giving the internet a good spanking." Message-ID: <557819.18349.qm@web37107.mail.mud.yahoo.com> http://www.itballerz.com/wordpress/wp-content/themes/default/images/header_pic.jpg ----- Original Message ---- From: "spidaman at arachna.com" To: San Francisco Perl Mongers User Group Sent: Friday, February 15, 2008 8:47:51 AM Subject: [sf-perl] "Giving the internet a good spanking." This blog may be Not-Safe-For-Work, the content and the design may be too juvenile for my tastes but the logo in the upper right hand corner is a chuckle http://www.itballerz.com/wordpress/ -- Ian Kallen | Yahoo/AIM: iankallen http://www.arachna.com/roller/page/spidaman _______________________________________________ SanFrancisco-pm mailing list SanFrancisco-pm at pm.org http://mail.pm.org/mailman/listinfo/sanfrancisco-pm From josh at agliodbs.com Fri Feb 15 09:48:45 2008 From: josh at agliodbs.com (Josh Berkus) Date: Fri, 15 Feb 2008 09:48:45 -0800 Subject: [sf-perl] "Giving the internet a good spanking." In-Reply-To: <557819.18349.qm@web37107.mail.mud.yahoo.com> References: <557819.18349.qm@web37107.mail.mud.yahoo.com> Message-ID: <200802150948.45595.josh@agliodbs.com> On Friday 15 February 2008 09:33, Gavin Jefferies wrote: > http://www.itballerz.com/wordpress/wp-content/themes/default/images/header_ >pic.jpg Somebody needs to send that to Randal. -- Josh Berkus PostgreSQL @ Sun San Francisco From duane.obrien at gmail.com Fri Feb 15 09:58:22 2008 From: duane.obrien at gmail.com (Duane Obrien) Date: Fri, 15 Feb 2008 09:58:22 -0800 Subject: [sf-perl] "Giving the internet a good spanking." In-Reply-To: <200802150948.45595.josh@agliodbs.com> References: <557819.18349.qm@web37107.mail.mud.yahoo.com> <200802150948.45595.josh@agliodbs.com> Message-ID: I think it's every author's dream to have their book used in that fashion. On Fri, Feb 15, 2008 at 9:48 AM, Josh Berkus wrote: > On Friday 15 February 2008 09:33, Gavin Jefferies wrote: > > http://www.itballerz.com/wordpress/wp-content/themes/default/images/header_ > >pic.jpg > > Somebody needs to send that to Randal. > > -- > Josh Berkus > PostgreSQL @ Sun > San Francisco > > > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm > -- +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+ Don't ever tell anybody anything. If you do, you start missing everybody. From andy at petdance.com Fri Feb 15 10:37:32 2008 From: andy at petdance.com (Andy Lester) Date: Fri, 15 Feb 2008 12:37:32 -0600 Subject: [sf-perl] "Giving the internet a good spanking." In-Reply-To: <200802150948.45595.josh@agliodbs.com> References: <557819.18349.qm@web37107.mail.mud.yahoo.com> <200802150948.45595.josh@agliodbs.com> Message-ID: <4E0AE382-1DC5-47A2-8C83-DD9D5D9024EC@petdance.com> On Feb 15, 2008, at 11:48 AM, Josh Berkus wrote: >> http://www.itballerz.com/wordpress/wp-content/themes/default/images/header_pic.jpg > > Somebody needs to send that to Randal. The pic has been around for years, but I thank you for posting it so I can put it on my Flickr account. -- Andy Lester => andy at petdance.com => www.petdance.com => AIM:petdance From merlyn at stonehenge.com Fri Feb 15 10:36:00 2008 From: merlyn at stonehenge.com (Randal L. Schwartz) Date: Fri, 15 Feb 2008 10:36:00 -0800 Subject: [sf-perl] "Giving the internet a good spanking." In-Reply-To: <200802150948.45595.josh@agliodbs.com> (Josh Berkus's message of "Fri, 15 Feb 2008 09:48:45 -0800") References: <557819.18349.qm@web37107.mail.mud.yahoo.com> <200802150948.45595.josh@agliodbs.com> Message-ID: <86d4qyvzhr.fsf@blue.stonehenge.com> >>>>> "Josh" == Josh Berkus writes: Josh> Somebody needs to send that to Randal. I first saw that picture about three years ago or so. Old News. -- Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095 Perl/Unix/security consulting, Technical writing, Comedy, etc. etc. See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training! From the_shift8 at yahoo.com Fri Feb 15 11:33:16 2008 From: the_shift8 at yahoo.com (shift8) Date: Fri, 15 Feb 2008 11:33:16 -0800 (PST) Subject: [sf-perl] "Giving the internet a good spanking." Message-ID: <699148.19646.qm@web56401.mail.re3.yahoo.com> "riot prrl"! ----- Original Message ---- From: Andy Lester To: San Francisco Perl Mongers User Group Sent: Friday, February 15, 2008 10:37:32 AM Subject: Re: [sf-perl] "Giving the internet a good spanking." On Feb 15, 2008, at 11:48 AM, Josh Berkus wrote: >> http://www.itballerz.com/wordpress/wp-content/themes/default/images/header_pic.jpg > > Somebody needs to send that to Randal. The pic has been around for years, but I thank you for posting it so I can put it on my Flickr account. -- 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 ____________________________________________________________________________________ Never miss a thing. Make Yahoo your home page. http://www.yahoo.com/r/hs -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/sanfrancisco-pm/attachments/20080215/a2f3405b/attachment.html From afife at untangle.com Sat Feb 16 09:58:10 2008 From: afife at untangle.com (Andrew Fife) Date: Sat, 16 Feb 2008 09:58:10 -0800 (PST) Subject: [sf-perl] Massive Ubuntu Installfest for Schools (March 1st) Message-ID: <004101c870c5$90968170$4301a8c0@Untangle.local> On Saturday March 1st, Untangle and the ACCRC are organizing a massive installfest for Bay Area schools. We are refurbishing hundreds of older/discarded computers with Ubuntu and donating them to Bay Area schools. We need your help from Linux users installing Ubuntu at the 4 locations, which are San Francisco, Berkeley, San Mateo & Marin County. Signup sheets for each location are here: http://wiki.untangle.com/index.php/Installfest If you can make the installfest, you can still help by driving participation by blogging about the event or voting for it on Digg or Slashdot. http://slashdot.org/bookmark.pl?url=http://www.untangle.com/installfest http://www.digg.com/submit?url=http://www.untangle.com/installfest&phase=2 More info on the installfest here: www.untangle.com/installfest Why the event is cool: Helps spread F/OSS (Ubuntu, Firefox, OpenOffice & more) Helps bridges the Digital Divide with underprivileged users Keeps toxic computer equipment out of landfills (Aprox 25,000 pounds) Is a cool community effort Thanks in advance for your help! -Andrew ---------------------------------------- Andrew Fife Untangle - Open Source Security Gateway download.untangle.com 650.425.3327 (O) 415.806.6028 (C) afife at untangle.com From bh1 at light42.com Sat Feb 16 10:14:00 2008 From: bh1 at light42.com (Brian Hamlin) Date: Sat, 16 Feb 2008 10:14:00 -0800 Subject: [sf-perl] Massive Ubuntu Installfest for Schools (March 1st) In-Reply-To: <004101c870c5$90968170$4301a8c0@Untangle.local> References: <004101c870c5$90968170$4301a8c0@Untangle.local> Message-ID: Hey good news.. BUT That guy at ACCRC, James Burgett has been claiming for *years* to be driving machines to schools and hospitals and helping people out. yet, as Chair of the EWaste Technical Council for the California Resource Recovery Association in 2005, I worked with *the biggest* computer for schools orgs *in the United States*, and no one could find or name schools that ACCRC had actually helped out. Not to say that *something* hadnt happened, but this is real work, and I was seeing more lip movement than machines shipped from Berkeley. Plus, James was often personally hostile. I have said to James personally, you are cool because you did this back when it was impossible to do. I stand by that. However, things changed. I dont want to get into he said, she said, but I cant let this go by without comment. Now ACCRC has some good Linux folks doing a good event. Certainly publicize it and make the best of it. However, I urge you to keep the rhetoric down when heaping praises on the effort. There are multiple grassroots orgs that have been doing the hard work for *years* that dont get enough good press. Brian Hamlin (415) 717-4462 (cell) On Feb 16, 2008, at 9:58 AM, Andrew Fife wrote: > On Saturday March 1st, Untangle and the ACCRC are organizing a massive > installfest for Bay Area schools. We are refurbishing hundreds of > older/discarded computers with Ubuntu and donating them to Bay Area > schools. We need your help from Linux users installing Ubuntu at the 4 > locations, which are San Francisco, Berkeley, San Mateo & Marin County. > > Signup sheets for each location are here: > > http://wiki.untangle.com/index.php/Installfest > > If you can make the installfest, you can still help by driving > participation by blogging about the event or voting for it on Digg or > Slashdot. > > http://slashdot.org/bookmark.pl?url=http://www.untangle.com/installfest > > http://www.digg.com/submit?url=http://www.untangle.com/ > installfest&phase=2 > > More info on the installfest here: > > www.untangle.com/installfest > > Why the event is cool: > > Helps spread F/OSS (Ubuntu, Firefox, OpenOffice & more) > > Helps bridges the Digital Divide with underprivileged users > > Keeps toxic computer equipment out of landfills (Aprox 25,000 pounds) > > Is a cool community effort > > Thanks in advance for your help! > > -Andrew > > ---------------------------------------- > Andrew Fife > Untangle - Open Source Security Gateway > download.untangle.com > > 650.425.3327 (O) > 415.806.6028 (C) > afife at untangle.com > > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm From fluxnet at gmail.com Sun Feb 17 16:39:59 2008 From: fluxnet at gmail.com (Bern) Date: Sun, 17 Feb 2008 19:39:59 -0500 Subject: [sf-perl] next meeting Message-ID: hi I am on sfo on holiday will love to attend the next meeting, any idea when it will be ? Thanks Bern -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/sanfrancisco-pm/attachments/20080217/0b6c67da/attachment.html From quinn at fairpath.com Mon Feb 18 13:13:47 2008 From: quinn at fairpath.com (Quinn Weaver) Date: Mon, 18 Feb 2008 13:13:47 -0800 Subject: [sf-perl] Massive Ubuntu Installfest for Schools (March 1st) In-Reply-To: References: <004101c870c5$90968170$4301a8c0@Untangle.local> Message-ID: <20080218211347.GA43231@fu.funkspiel.org> On Sat, Feb 16, 2008 at 10:14:00AM -0800, Brian Hamlin wrote: > Hey good news.. BUT > > That guy at ACCRC, James Burgett has been claiming for *years* to be > driving machines to schools and hospitals and helping people out. > [...] Hi, everyone, This is a serious accusation. If it's false, it's libel. If it's true, it's a scandal. Please do your homework before making claims like this. Unless you can really prove what you say, it's irresponsible to throw around claims that could ruin a nonprofit's reputation (or, if false, backfire and ruin yours). -- Quinn Weaver, independent contractor | President, San Francisco Perl Mongers http://fairpath.com/quinn/resume/ | http://sf.pm.org/ 510-520-5217 From bh1 at light42.com Mon Feb 18 14:53:42 2008 From: bh1 at light42.com (Brian Hamlin) Date: Mon, 18 Feb 2008 14:53:42 -0800 Subject: [sf-perl] Massive Ubuntu Installfest for Schools (March 1st) In-Reply-To: <20080218211347.GA43231@fu.funkspiel.org> References: <004101c870c5$90968170$4301a8c0@Untangle.local> <20080218211347.GA43231@fu.funkspiel.org> Message-ID: <5A6BADC6-DE74-11DC-8E7C-000A277A733C@light42.com> Quinn- I guess you missed the article in the Indendent Press whch ripped ACCRC in no uncertain terms, and led to a state investigation of his 501c3 tax status. I wrote a column for years and I never said a word about James, because I basically support his endeavor. BUT thats not to say that I am not annoyed now and then, and in this case, spoke up when a naive new player was ready to proclaim to the world... *I* did not say he didnt DO ANYTHING, I said he didnt do AS MUCH as he SAYS he DOES. Now you go and pour gasoline on the fire with the word libel. Great. below is what i wrote off the top of my head... Do you know how much dirty cheating there is in that business? James is just right in the middle compared to some major operators that have gone to JAIL over the last years in this business, with the smart ones still operating. Scandal or no Scandal.. you are new, you are just finding out how things really are. I MEANT to just speak up and say that James is not all that great ... now what to do?? Libel? ^%&@#&!^% This is how I am rewarded for my efforts in the industry ---- OK, let me clarify... Before you tell me I made libel, perhaps I can be clearer about what I was saying.. ACCRC has claimed for years to be making a big difference. I worked with the people that do make a big difference. ACCRC was not one of them. ACCRC has certainly done what ACCRC has done. There is a a gap between the bragging and the actual reality. Thats what I said. 10s to 100s of systems of years vs 1000s of systems .. get it? Meanwhile I wrote off list to the original poster and introduced him to one of the best contacts in the industry for FOSS in Schools. Ruin the Reputation of ACCRC?? I have been civil for years with my neighbor. I wish all such operations well. I am not a whistle blower, either. I am not going to stand by and let a newbie get pulled into thinking that they are the first ever to do this great thing, and look at my great partner. I gave my phone number in the post. Anyone can contact me at any time. Computer Recycling is a hard job that I dedicated more than two years of my life to.. I have an opinion based on direct knowledge and experience, and I am not tip-toeing around ACCRC. Have you read my column? 120+ posts http://ewasteInsights.info best regards -Brian Hamlin (415) 717-4462 (c) Brian Hamlin * was a columnist on the topic of Electronics Recycling for almost two years * participated at length for almost two years in Sacramento in EPA hearings on a series of proposals, one of which became law, one of the first in the country * was Chair of the Electronic Waste Technical Council for the CRRA for one term On Feb 18, 2008, at 1:13 PM, Quinn Weaver wrote: > On Sat, Feb 16, 2008 at 10:14:00AM -0800, Brian Hamlin wrote: >> Hey good news.. BUT >> >> That guy at ACCRC, James Burgett has been claiming for *years* to be >> driving machines to schools and hospitals and helping people out. > >> [...] > > Hi, everyone, > > This is a serious accusation. If it's false, it's libel. If it's > true, it's a scandal. > > Please do your homework before making claims like this. Unless you > can really prove what you say, it's irresponsible to throw around > claims > that could ruin a nonprofit's reputation (or, if false, backfire and > ruin yours). > > -- > Quinn Weaver, independent contractor | President, San Francisco Perl > Mongers > http://fairpath.com/quinn/resume/ | http://sf.pm.org/ > 510-520-5217 > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm From quinn at fairpath.com Mon Feb 18 15:23:53 2008 From: quinn at fairpath.com (Quinn Weaver) Date: Mon, 18 Feb 2008 15:23:53 -0800 Subject: [sf-perl] Massive Ubuntu Installfest for Schools (March 1st) In-Reply-To: <5A6BADC6-DE74-11DC-8E7C-000A277A733C@light42.com> References: <004101c870c5$90968170$4301a8c0@Untangle.local> <20080218211347.GA43231@fu.funkspiel.org> <5A6BADC6-DE74-11DC-8E7C-000A277A733C@light42.com> Message-ID: <20080218232353.GA43921@fu.funkspiel.org> Hi, everyone, Brian and I just talked on the phone (right after his second post). We agreed that this topic has become too heated, and we'd like to move on. We've both pretty much said what we wanted to say, even if the way we've said it hasn't been perfect. For those who are interested in reading the details and deciding for themselves, Brian is going to try to find a link to that Independent article. Thanks, -- Quinn Weaver, independent contractor | President, San Francisco Perl Mongers http://fairpath.com/quinn/resume/ | http://sf.pm.org/ 510-520-5217 From quinn at fairpath.com Tue Feb 19 11:06:13 2008 From: quinn at fairpath.com (Quinn Weaver) Date: Tue, 19 Feb 2008 11:06:13 -0800 Subject: [sf-perl] next meeting In-Reply-To: References: Message-ID: <20080219190613.GC53444@fu.funkspiel.org> On Sun, Feb 17, 2008 at 07:39:59PM -0500, Bern wrote: > hi I am on sfo on holiday will love to attend the next meeting, any idea > when it will be ? Hi, Bern, Wednesday, February 27 is the Beer and Scripting SIG, an informal dinner meeting of Perl (and other) people. There's no real agenda, just food and chatting. Last time we had fun playing with some OLPC laptops. http://www.cfcl.com/rdm/bass/ There's no formal Perl Mongers meeting this month, so BASS is your best bet. 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 Tue Feb 19 11:50:11 2008 From: rjray at blackperl.com (Randy J. Ray) Date: Tue, 19 Feb 2008 11:50:11 -0800 Subject: [sf-perl] Job listings policy? Message-ID: <47BB32F3.9090006@blackperl.com> What is the policy on sending job listings? My company is trying to fill a Perl position and we haven't gotten any decent response from a jobs.perl.org listing thus far. Does everyone here check that resource? Would posting it here be redundant, or perhaps just posting the URL to the j.p.o listing? (The position is in Palo Alto, but it's a reasonable walk from the Palo Alto Caltrain station.) Randy -- """"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""" Randy J. Ray Sunnyvale, CA http://www.rjray.org rjray at blackperl.com Silicon Valley Scale Modelers: http://www.svsm.org From josh at agliodbs.com Tue Feb 19 12:33:06 2008 From: josh at agliodbs.com (Josh Berkus) Date: Tue, 19 Feb 2008 12:33:06 -0800 Subject: [sf-perl] Job listings policy? In-Reply-To: <47BB32F3.9090006@blackperl.com> References: <47BB32F3.9090006@blackperl.com> Message-ID: <200802191233.07575.josh@agliodbs.com> randy, > What is the policy on sending job listings? Post away, but add a "[job]" tag to your subject line. That allows FTE folks to filter it out. -- --Josh Josh Berkus PostgreSQL @ Sun San Francisco From quinn at fairpath.com Tue Feb 19 14:22:38 2008 From: quinn at fairpath.com (Quinn Weaver) Date: Tue, 19 Feb 2008 14:22:38 -0800 Subject: [sf-perl] Job listings policy? In-Reply-To: <47BB32F3.9090006@blackperl.com> References: <47BB32F3.9090006@blackperl.com> Message-ID: <20080219222238.GA54169@fu.funkspiel.org> On Tue, Feb 19, 2008 at 11:50:11AM -0800, Randy J. Ray wrote: > What is the policy on sending job listings? My company is trying to fill a Perl > position and we haven't gotten any decent response from a jobs.perl.org listing > thus far. Does everyone here check that resource? Would posting it here be > redundant, or perhaps just posting the URL to the j.p.o listing? Thanks for asking. Our policy allows job postings as long as 1) their subject line starts with [job] (for those who wish to filter them out) and 2) the same ad is not reposted too often--about once every two months is OK. Posting a URL is fine, but you probably want to use URLs from your own web site, since jobs.perl.org postings expire quickly. Often it's helpful to add a couple of lines of summary in the post, followed by the URL. Thanks and good luck, -- Quinn Weaver, independent contractor | President, San Francisco Perl Mongers http://fairpath.com/quinn/resume/ | http://sf.pm.org/ 510-520-5217 From fluxnet at gmail.com Tue Feb 19 18:29:05 2008 From: fluxnet at gmail.com (Bern) Date: Tue, 19 Feb 2008 21:29:05 -0500 Subject: [sf-perl] next meeting In-Reply-To: <20080219190613.GC53444@fu.funkspiel.org> References: <20080219190613.GC53444@fu.funkspiel.org> Message-ID: Hi Quinn thanks so much for the info On Feb 19, 2008 2:06 PM, Quinn Weaver wrote: > On Sun, Feb 17, 2008 at 07:39:59PM -0500, Bern wrote: > > hi I am on sfo on holiday will love to attend the next meeting, any idea > > when it will be ? > > Hi, Bern, > > Wednesday, February 27 is the Beer and Scripting SIG, an informal dinner > meeting of Perl (and other) people. There's no real agenda, just food > and chatting. Last time we had fun playing with some OLPC laptops. > > http://www.cfcl.com/rdm/bass/ > > There's no formal Perl Mongers meeting this month, so BASS is your > best bet. > > Thanks, > > -- > Quinn Weaver, independent contractor | President, San Francisco Perl > Mongers > http://fairpath.com/quinn/resume/ | http://sf.pm.org/ > 510-520-5217 > _______________________________________________ > 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/20080219/bf4733d4/attachment.html From extasia at extasia.org Wed Feb 20 18:18:22 2008 From: extasia at extasia.org (David Alban) Date: Wed, 20 Feb 2008 18:18:22 -0800 Subject: [sf-perl] trying to constantize a compiled regex Message-ID: <4c714a9c0802201818j423377m52e4f64eafe677d2@mail.gmail.com> greetings, i'm trying to make a constant of a compiled regex. i've done it before, but i can't seem to make it work today. the code below prints: aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa does not match $VAR1 = qr/(?-xism: m{ \A [a-f\d]{32} \z }xms )/; 11111111111111111111111111111111 does not match $VAR1 = qr/(?-xism: m{ \A [a-f\d]{32} \z }xms )/; aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa does not match $VAR1 = qr/(?-xism: m{ \A [a-f\d]{32} \z }xms )/; 11111111111111111111111111111111 does not match $VAR1 = qr/(?-xism: m{ \A [a-f\d]{32} \z }xms )/; 11111111111111111111111111111111 matches rgx the test code producing the output is: #!/usr/bin/perl use warnings; use strict; use Data::Dumper; use Readonly; # an md5sum should match this regular expression Readonly::Scalar my $MD5SUM_RGX => qr{ m{ \A [a-f\d]{32} \z }xms }; my $s = 'a' x 32; if ( $s =~ $MD5SUM_RGX ) { print "$s matches ", Dumper $MD5SUM_RGX; } # if else { print "$s does not match ", Dumper $MD5SUM_RGX; } # if $s = '1' x 32; if ( $s =~ $MD5SUM_RGX ) { print "$s matches ", Dumper $MD5SUM_RGX; } # if else { print "$s does not match ", Dumper $MD5SUM_RGX; } # if # try as a non-readonly variable my $md5sum_rgx = qr{ m{ \A [a-f\d]{32} \z }xms }; $s = 'a' x 32; if ( $s =~ $md5sum_rgx ) { print "$s matches ", Dumper $md5sum_rgx; } # if else { print "$s does not match ", Dumper $md5sum_rgx; } # if $s = '1' x 32; if ( $s =~ $md5sum_rgx ) { print "$s matches ", Dumper $md5sum_rgx; } # if else { print "$s does not match ", Dumper $md5sum_rgx; } # if if ( $s =~ m{ \A [a-f\d]{32} \z }xms ) { print "$s matches rgx\n"; } # if else { print "$s does not match rgx\n"; } # if i can make the regex match, but not as a readonly constant. i'm sure i'm missing something obvious... thanks. p.s. dropping the 'ms' from the qualifiers doesn't change the output. -- Live in a world of your own, but always welcome visitors. From miyagawa at gmail.com Wed Feb 20 18:25:27 2008 From: miyagawa at gmail.com (Tatsuhiko Miyagawa) Date: Wed, 20 Feb 2008 18:25:27 -0800 Subject: [sf-perl] trying to constantize a compiled regex In-Reply-To: <4c714a9c0802201818j423377m52e4f64eafe677d2@mail.gmail.com> References: <4c714a9c0802201818j423377m52e4f64eafe677d2@mail.gmail.com> Message-ID: <693254b90802201825j5d994207yf999e64a348809b0@mail.gmail.com> On Wed, Feb 20, 2008 at 6:18 PM, David Alban wrote: > aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa does not match $VAR1 = qr/(?-xism: m{ > \A [a-f\d]{32} \z }xms )/; ... > # an md5sum should match this regular expression > Readonly::Scalar my $MD5SUM_RGX => qr{ m{ \A [a-f\d]{32} \z }xms }; Take a look at what perl says. it has "m{ }xms" inside the regexp. Since it's wrapped in qr{} already, you don't need it. Readonly::Scalar my $MD5SUM_RGX => qr{ \A [a-f\d]{32} \z }xms; should do that. -- Tatsuhiko Miyagawa From extasia at extasia.org Wed Feb 20 18:36:41 2008 From: extasia at extasia.org (David Alban) Date: Wed, 20 Feb 2008 18:36:41 -0800 Subject: [sf-perl] trying to constantize a compiled regex In-Reply-To: <693254b90802201825j5d994207yf999e64a348809b0@mail.gmail.com> References: <4c714a9c0802201818j423377m52e4f64eafe677d2@mail.gmail.com> <693254b90802201825j5d994207yf999e64a348809b0@mail.gmail.com> Message-ID: <4c714a9c0802201836k489c8086t567e46f86b49f9d9@mail.gmail.com> heh. i knew i was missing something. it's like working with string all day and forgetting how to tie your shoes. thanks!! On Wed, Feb 20, 2008 at 6:25 PM, Tatsuhiko Miyagawa wrote: > Take a look at what perl says. it has "m{ }xms" inside the regexp. > Since it's wrapped in qr{} already, you don't need it. -- Live in a world of your own, but always welcome visitors. From nheller at silcon.com Sun Feb 24 10:45:10 2008 From: nheller at silcon.com (Neil Heller) Date: Sun, 24 Feb 2008 10:45:10 -0800 Subject: [sf-perl] Help with a downloaded module In-Reply-To: <4c714a9c0801062042v2cc92db6nc9c86b45aa33e878@mail.gmail.com> References: <4c714a9c0612291517y7ce7f52cn5e2f1d7edc9f5b9c@mail.gmail.com> <4c714a9c0801051909m79035ac5p1d265a5c21c32346@mail.gmail.com> <000001c8501e$60acfdd0$2206f970$@com> <4c714a9c0801060753h731872d5sd1341d3df00e39a6@mail.gmail.com> <001001c850a0$b0e47210$12ad5630$@com> <8E476DF7-6A26-4ACD-9B56-58EB75B75547@mac.com> <29F504A3-1BC6-46AB-874C-FF6EC4E7E3F6@nolex.com> <1E26FF5C-BCA7-11DC-9E67-000A277A733C@light42.com> <86prwe1qgt.fsf@blue.stonehenge.com> <4c714a9c0801062042v2cc92db6nc9c86b45aa33e878@mail.gmail.com> Message-ID: <000301c87715$625279d0$26f76d70$@com> I'm a relative newbie at Perl. I downloaded a module, TestReporter.pm, from CPAN. On my Wintel machine I created a directory, c:\test\TestReporter. I plopped the module (without change) into that directory and issued a couple of command line calls. [begin command line] C:\test\TestReporter>perl -ver This is perl, v5.10.0 built for MSWin32-x86-multi-thread (with 3 registered patches, see perl -V for more detail) Copyright 1987-2007, Larry Wall Binary build 1002 [283697] provided by ActiveState http://www.ActiveState.com Built Jan 10 2008 11:00:53 Perl may be copied only under the terms of either the Artistic License... C:\test\TestReporter>perl -c TestReporter.pm TestReporter.pm syntax OK C:\test\TestReporter>perl TestReporter.pm C:\test\TestReporter> [end command line] I noticed that near the top of the module there was this line: Uses Module::Build::TestReporter I don't have such a path on my machine. Shouldn't this report an error of some kind? Where can I go from here (and what can I do) to get this module working on my system. I tried it at work on (Active State) Perl version 5.8.0 and got all sorts of errors. The source code is 349 lines long so I'm not including it here. I would appreciate any help you could give me. Neil Heller From asheesh at asheesh.org Sun Feb 24 12:10:20 2008 From: asheesh at asheesh.org (Asheesh Laroia) Date: Sun, 24 Feb 2008 12:10:20 -0800 (PST) Subject: [sf-perl] Help with a downloaded module In-Reply-To: <000301c87715$625279d0$26f76d70$@com> References: <4c714a9c0612291517y7ce7f52cn5e2f1d7edc9f5b9c@mail.gmail.com> <4c714a9c0801051909m79035ac5p1d265a5c21c32346@mail.gmail.com> <000001c8501e$60acfdd0$2206f970$@com> <4c714a9c0801060753h731872d5sd1341d3df00e39a6@mail.gmail.com> <001001c850a0$b0e47210$12ad5630$@com> <8E476DF7-6A26-4ACD-9B56-58EB75B75547@mac.com> <29F504A3-1BC6-46AB-874C-FF6EC4E7E3F6@nolex.com> <1E26FF5C-BCA7-11DC-9E67-000A277A733C@light42.com> <86prwe1qgt.fsf@blue.stonehenge.com> <4c714a9c0801062042v2cc92db6nc9c86b45aa33e878@mail.gmail.com> <000301c87715$625279d0$26f76d70$@com> Message-ID: On Sun, 24 Feb 2008, Neil Heller wrote: > > I'm a relative newbie at Perl. > I downloaded a module, TestReporter.pm, from CPAN. > On my Wintel machine I created a directory, c:\test\TestReporter. > I plopped the module (without change) into that directory and issued a > couple of command line calls. That's not the right way to install CPAN modules. Do you know about the CPAN shell? Try this: perl -MCPAN -e shell That will give you a prompt at which you can ask it: install __name__of_module_you_want__ -- Asheesh. -- Do clones have navels? From nheller at silcon.com Sun Feb 24 14:06:14 2008 From: nheller at silcon.com (Neil Heller) Date: Sun, 24 Feb 2008 14:06:14 -0800 Subject: [sf-perl] Help with a downloaded module In-Reply-To: References: <4c714a9c0612291517y7ce7f52cn5e2f1d7edc9f5b9c@mail.gmail.com> <4c714a9c0801051909m79035ac5p1d265a5c21c32346@mail.gmail.com> <000001c8501e$60acfdd0$2206f970$@com> <4c714a9c0801060753h731872d5sd1341d3df00e39a6@mail.gmail.com> <001001c850a0$b0e47210$12ad5630$@com> <8E476DF7-6A26-4ACD-9B56-58EB75B75547@mac.com> <29F504A3-1BC6-46AB-874C-FF6EC4E7E3F6@nolex.com> <1E26FF5C-BCA7-11DC-9E67-000A277A733C@light42.com> <86prwe1qgt.fsf@blue.stonehenge.com> <4c714a9c0801062042v2cc92db6nc9c86b45aa33e878@mail.gmail.com> <000301c87715$625279d0$26f76d70$@com> Message-ID: <000001c87731$78ea4120$6abec360$@com> Thank you for the help. I tried installing the file as you mentioned but got only errors. The transcript follows. Do you have any feeling for what my trouble may be? [start install] C:\test\TestReporter>perl -MCPAN -e shell Exiting subroutine via last at C:/Perl/lib/CPAN.pm line 1450. cpan shell -- CPAN exploration and modules installation (v1.9205) ReadLine support enabled cpan> install TestReporter.pm CPAN: Storable loaded ok (v2.18) Use of uninitialized value $_ in transliteration (tr///) at C:/Perl/lib/File/Spe c/Win32.pm line 141. Use of uninitialized value $_ in pattern match (m//) at C:/Perl/lib/File/Spec/Wi n32.pm line 143. CPAN: LWP::UserAgent loaded ok (v2.036) CPAN: Time::HiRes loaded ok (v1.9711) Fetching with LWP: http://ppm.activestate.com/CPAN/authors/01mailrc.txt.gz Going to read C:\Perl\cpan\sources\authors\01mailrc.txt.gz ............................................................................ DONE Use of uninitialized value $_ in transliteration (tr///) at C:/Perl/lib/File/Spe c/Win32.pm line 141. Use of uninitialized value $_ in pattern match (m//) at C:/Perl/lib/File/Spec/Wi n32.pm line 143. Fetching with LWP: http://ppm.activestate.com/CPAN/modules/02packages.details.txt.gz Going to read C:\Perl\cpan\sources\modules\02packages.details.txt.gz Database was generated on Sun, 24 Feb 2008 11:30:42 GMT ............................................................................ DONE Use of uninitialized value $_ in transliteration (tr///) at C:/Perl/lib/File/Spe c/Win32.pm line 141. Use of uninitialized value $_ in pattern match (m//) at C:/Perl/lib/File/Spec/Wi n32.pm line 143. Fetching with LWP: http://ppm.activestate.com/CPAN/modules/03modlist.data.gz Going to read C:\Perl\cpan\sources\modules\03modlist.data.gz ............................................................................ DONE Going to write C:\Perl\cpan\Metadata Warning: Cannot install TestReporter.pm, don't know what it is. Try the command i /TestReporter.pm/ to find objects with matching identifiers. cpan> [end install] 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 Asheesh Laroia Sent: Sunday, February 24, 2008 12:10 PM To: San Francisco Perl Mongers User Group Subject: Re: [sf-perl] Help with a downloaded module On Sun, 24 Feb 2008, Neil Heller wrote: > > I'm a relative newbie at Perl. > I downloaded a module, TestReporter.pm, from CPAN. > On my Wintel machine I created a directory, c:\test\TestReporter. > I plopped the module (without change) into that directory and issued a > couple of command line calls. That's not the right way to install CPAN modules. Do you know about the CPAN shell? Try this: perl -MCPAN -e shell That will give you a prompt at which you can ask it: install __name__of_module_you_want__ -- Asheesh. -- Do clones have navels? _______________________________________________ SanFrancisco-pm mailing list SanFrancisco-pm at pm.org http://mail.pm.org/mailman/listinfo/sanfrancisco-pm From friedman at highwire.stanford.edu Sun Feb 24 14:42:47 2008 From: friedman at highwire.stanford.edu (Michael Friedman) Date: Sun, 24 Feb 2008 14:42:47 -0800 Subject: [sf-perl] Help with a downloaded module In-Reply-To: <000001c87731$78ea4120$6abec360$@com> References: <4c714a9c0612291517y7ce7f52cn5e2f1d7edc9f5b9c@mail.gmail.com> <4c714a9c0801051909m79035ac5p1d265a5c21c32346@mail.gmail.com> <000001c8501e$60acfdd0$2206f970$@com> <4c714a9c0801060753h731872d5sd1341d3df00e39a6@mail.gmail.com> <001001c850a0$b0e47210$12ad5630$@com> <8E476DF7-6A26-4ACD-9B56-58EB75B75547@mac.com> <29F504A3-1BC6-46AB-874C-FF6EC4E7E3F6@nolex.com> <1E26FF5C-BCA7-11DC-9E67-000A277A733C@light42.com> <86prwe1qgt.fsf@blue.stonehenge.com> <4c714a9c0801062042v2cc92db6nc9c86b45aa33e878@mail.gmail.com> <000301c87715$625279d0$26f76d70$@com> <000001c87731$78ea4120$6abec360$@com> Message-ID: Neil, CPAN modules don't really stand on their own. They come in packages. If you follow CPAN's suggestion and do cpan> i/TestReporter/ Distribution C/CH/CHROMATIC/Module-Build-TestReporter-1.00.tar.gz Module Module::Build::TestReporter (C/CH/CHROMATIC/Module- Build-TestReporter-1.00.tar.gz) 2 items found That tells you that it's part of "C/CH/CHROMATIC/Module-Build- TestReporter-1.00", as "Module::Build::TestReporter". You need that full "path" so that CPAN can find the module. Knowing that, you can ask CPAN to install it by doing cpan> install Module::Build::TestReporter which should work better. Note that there are a number of prerequisites for this module, so it may start off by loading a pile of seemingly unrelated stuff, but it'll get to TestReporter at the end. -- Mike On Feb 24, 2008, at 2:06 PM, Neil Heller wrote: > Thank you for the help. > I tried installing the file as you mentioned but got only errors. > The transcript follows. Do you have any feeling for what my trouble > may be? > > [start install] > > > C:\test\TestReporter>perl -MCPAN -e shell > Exiting subroutine via last at C:/Perl/lib/CPAN.pm line 1450. > > cpan shell -- CPAN exploration and modules installation (v1.9205) > ReadLine support enabled > > > cpan> install TestReporter.pm > CPAN: Storable loaded ok (v2.18) > Use of uninitialized value $_ in transliteration (tr///) at > C:/Perl/lib/File/Spe > c/Win32.pm line 141. > Use of uninitialized value $_ in pattern match (m//) at > C:/Perl/lib/File/Spec/Wi > n32.pm line 143. > CPAN: LWP::UserAgent loaded ok (v2.036) > CPAN: Time::HiRes loaded ok (v1.9711) > Fetching with LWP: > http://ppm.activestate.com/CPAN/authors/01mailrc.txt.gz > Going to read C:\Perl\cpan\sources\authors\01mailrc.txt.gz > ............................................................................ > DONE > > Use of uninitialized value $_ in transliteration (tr///) at > C:/Perl/lib/File/Spe > c/Win32.pm line 141. > Use of uninitialized value $_ in pattern match (m//) at > C:/Perl/lib/File/Spec/Wi > n32.pm line 143. > Fetching with LWP: > http://ppm.activestate.com/CPAN/modules/02packages.details.txt.gz > Going to read C:\Perl\cpan\sources\modules\02packages.details.txt.gz > Database was generated on Sun, 24 Feb 2008 11:30:42 GMT > ............................................................................ > DONE > > Use of uninitialized value $_ in transliteration (tr///) at > C:/Perl/lib/File/Spe > c/Win32.pm line 141. > Use of uninitialized value $_ in pattern match (m//) at > C:/Perl/lib/File/Spec/Wi > n32.pm line 143. > Fetching with LWP: > http://ppm.activestate.com/CPAN/modules/03modlist.data.gz > Going to read C:\Perl\cpan\sources\modules\03modlist.data.gz > ............................................................................ > DONE > > Going to write C:\Perl\cpan\Metadata > Warning: Cannot install TestReporter.pm, don't know what it is. > Try the command > > i /TestReporter.pm/ > > to find objects with matching identifiers. > > > cpan> > > [end install] > > 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 > Asheesh Laroia > Sent: Sunday, February 24, 2008 12:10 PM > To: San Francisco Perl Mongers User Group > Subject: Re: [sf-perl] Help with a downloaded module > > On Sun, 24 Feb 2008, Neil Heller wrote: > >> >> I'm a relative newbie at Perl. >> I downloaded a module, TestReporter.pm, from CPAN. >> On my Wintel machine I created a directory, c:\test\TestReporter. >> I plopped the module (without change) into that directory and >> issued a >> couple of command line calls. > > That's not the right way to install CPAN modules. > > Do you know about the CPAN shell? Try this: > > perl -MCPAN -e shell > > That will give you a prompt at which you can ask it: > > install __name__of_module_you_want__ > > -- Asheesh. > > -- > Do clones have navels? > _______________________________________________ > 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 rdm at cfcl.com Sun Feb 24 18:21:29 2008 From: rdm at cfcl.com (Rich Morin) Date: Sun, 24 Feb 2008 18:21:29 -0800 Subject: [sf-perl] BASS Meeting (SF), Wed. February 27 Message-ID: We continue to have fun playing with XO (OLPC) computers; we'll be bringing ours to BASS again. We've also had fun talking with the MetaWeb folks about their Python/MQL/... knowledge base, FreeBase (http://www.freebase.com). The Beer and Scripting SIG rides again! If you'd like to eat good Chinese 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, February 27, 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 Sun Feb 24 18:40:39 2008 From: nheller at silcon.com (Neil Heller) Date: Sun, 24 Feb 2008 18:40:39 -0800 Subject: [sf-perl] Help with a downloaded module In-Reply-To: References: <4c714a9c0612291517y7ce7f52cn5e2f1d7edc9f5b9c@mail.gmail.com> <4c714a9c0801051909m79035ac5p1d265a5c21c32346@mail.gmail.com> <000001c8501e$60acfdd0$2206f970$@com> <4c714a9c0801060753h731872d5sd1341d3df00e39a6@mail.gmail.com> <001001c850a0$b0e47210$12ad5630$@com> <8E476DF7-6A26-4ACD-9B56-58EB75B75547@mac.com> <29F504A3-1BC6-46AB-874C-FF6EC4E7E3F6@nolex.com> <1E26FF5C-BCA7-11DC-9E67-000A277A733C@light42.com> <86prwe1qgt.fsf@blue.stonehenge.com> <4c714a9c0801062042v2cc92db6nc9c86b45aa33e878@mail.gmail.com> <000301c87715$625279d0$26f76d70$@com> <000001c87731$78ea4120$6abec360$@com> Message-ID: <000001c87757$cf1e2ae0$6d5a80a0$@com> This is looking promising... I think. I'll modify the uses Module::Build::TestReporter to make it reflect my path and then build. Can you think of anything else off the top of your head? Will I have to create a Perl/cpan/Metadata path? 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 Michael Friedman Sent: Sunday, February 24, 2008 2:43 PM To: San Francisco Perl Mongers User Group Subject: Re: [sf-perl] Help with a downloaded module Neil, CPAN modules don't really stand on their own. They come in packages. If you follow CPAN's suggestion and do cpan> i/TestReporter/ Distribution C/CH/CHROMATIC/Module-Build-TestReporter-1.00.tar.gz Module Module::Build::TestReporter (C/CH/CHROMATIC/Module- Build-TestReporter-1.00.tar.gz) 2 items found That tells you that it's part of "C/CH/CHROMATIC/Module-Build- TestReporter-1.00", as "Module::Build::TestReporter". You need that full "path" so that CPAN can find the module. Knowing that, you can ask CPAN to install it by doing cpan> install Module::Build::TestReporter which should work better. Note that there are a number of prerequisites for this module, so it may start off by loading a pile of seemingly unrelated stuff, but it'll get to TestReporter at the end. -- Mike On Feb 24, 2008, at 2:06 PM, Neil Heller wrote: > Thank you for the help. > I tried installing the file as you mentioned but got only errors. > The transcript follows. Do you have any feeling for what my trouble > may be? > > [start install] > > > C:\test\TestReporter>perl -MCPAN -e shell > Exiting subroutine via last at C:/Perl/lib/CPAN.pm line 1450. > > cpan shell -- CPAN exploration and modules installation (v1.9205) > ReadLine support enabled > > > cpan> install TestReporter.pm > CPAN: Storable loaded ok (v2.18) > Use of uninitialized value $_ in transliteration (tr///) at > C:/Perl/lib/File/Spe > c/Win32.pm line 141. > Use of uninitialized value $_ in pattern match (m//) at > C:/Perl/lib/File/Spec/Wi > n32.pm line 143. > CPAN: LWP::UserAgent loaded ok (v2.036) > CPAN: Time::HiRes loaded ok (v1.9711) > Fetching with LWP: > http://ppm.activestate.com/CPAN/authors/01mailrc.txt.gz > Going to read C:\Perl\cpan\sources\authors\01mailrc.txt.gz > ............................................................................ > DONE > > Use of uninitialized value $_ in transliteration (tr///) at > C:/Perl/lib/File/Spe > c/Win32.pm line 141. > Use of uninitialized value $_ in pattern match (m//) at > C:/Perl/lib/File/Spec/Wi > n32.pm line 143. > Fetching with LWP: > http://ppm.activestate.com/CPAN/modules/02packages.details.txt.gz > Going to read C:\Perl\cpan\sources\modules\02packages.details.txt.gz > Database was generated on Sun, 24 Feb 2008 11:30:42 GMT > ............................................................................ > DONE > > Use of uninitialized value $_ in transliteration (tr///) at > C:/Perl/lib/File/Spe > c/Win32.pm line 141. > Use of uninitialized value $_ in pattern match (m//) at > C:/Perl/lib/File/Spec/Wi > n32.pm line 143. > Fetching with LWP: > http://ppm.activestate.com/CPAN/modules/03modlist.data.gz > Going to read C:\Perl\cpan\sources\modules\03modlist.data.gz > ............................................................................ > DONE > > Going to write C:\Perl\cpan\Metadata > Warning: Cannot install TestReporter.pm, don't know what it is. > Try the command > > i /TestReporter.pm/ > > to find objects with matching identifiers. > > > cpan> > > [end install] > > 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 > Asheesh Laroia > Sent: Sunday, February 24, 2008 12:10 PM > To: San Francisco Perl Mongers User Group > Subject: Re: [sf-perl] Help with a downloaded module > > On Sun, 24 Feb 2008, Neil Heller wrote: > >> >> I'm a relative newbie at Perl. >> I downloaded a module, TestReporter.pm, from CPAN. >> On my Wintel machine I created a directory, c:\test\TestReporter. >> I plopped the module (without change) into that directory and >> issued a >> couple of command line calls. > > That's not the right way to install CPAN modules. > > Do you know about the CPAN shell? Try this: > > perl -MCPAN -e shell > > That will give you a prompt at which you can ask it: > > install __name__of_module_you_want__ > > -- Asheesh. > > -- > Do clones have navels? > _______________________________________________ > 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 --------------------------------------------------------------------- _______________________________________________ SanFrancisco-pm mailing list SanFrancisco-pm at pm.org http://mail.pm.org/mailman/listinfo/sanfrancisco-pm From friedman at highwire.stanford.edu Mon Feb 25 09:36:24 2008 From: friedman at highwire.stanford.edu (Michael Friedman) Date: Mon, 25 Feb 2008 09:36:24 -0800 Subject: [sf-perl] Help with a downloaded module In-Reply-To: <000001c87757$cf1e2ae0$6d5a80a0$@com> References: <4c714a9c0612291517y7ce7f52cn5e2f1d7edc9f5b9c@mail.gmail.com> <4c714a9c0801051909m79035ac5p1d265a5c21c32346@mail.gmail.com> <000001c8501e$60acfdd0$2206f970$@com> <4c714a9c0801060753h731872d5sd1341d3df00e39a6@mail.gmail.com> <001001c850a0$b0e47210$12ad5630$@com> <8E476DF7-6A26-4ACD-9B56-58EB75B75547@mac.com> <29F504A3-1BC6-46AB-874C-FF6EC4E7E3F6@nolex.com> <1E26FF5C-BCA7-11DC-9E67-000A277A733C@light42.com> <86prwe1qgt.fsf@blue.stonehenge.com> <4c714a9c0801062042v2cc92db6nc9c86b45aa33e878@mail.gmail.com> <000301c87715$625279d0$26f76d70$@com> <000001c87731$78ea4120$6abec360$@com> <000001c87757$cf1e2ae0$6d5a80a0$@com> Message-ID: Neil, If you load a module using the CPAN module, it will put it in the location for shared modules that perl already knows about. Thus, once you've installed it, you shouldn't need to change your path or anything. Just 'use' the module by its full name: use Module::Build::TestReporter; and it should "just work". (I've never worked with Active State Perl before, but I assume it's like every other distribution that way. Someone will correct me if I'm wrong, I am sure. :-) ) BTW, did you know that _Beginning Perl_, by Simon Cozens, is available free on the web? From your questions, you may find it very helpful to read a couple of chapters of it. For example, the chapter on Modules covers installing from CPAN and how to "find" a module once you've installed it. http://www.perl.org/books/beginning-perl/ http://blob.perl.org/books/beginning-perl/3145_Chap10.pdf There's also a great website that gathers up a bunch of resources and people who love to help people new to perl. You will find friendly folks and lots of FAQ and answers at http://learn.perl.org/ http://www.nntp.perl.org/group/perl.beginners/ and I think there's an IRC channel for learning perl too, but I haven't used that before. Good luck! -- Mike On Feb 24, 2008, at 6:40 PM, Neil Heller wrote: > This is looking promising... I think. > I'll modify the uses Module::Build::TestReporter to make it reflect > my path > and then build. > Can you think of anything else off the top of your head? > Will I have to create a Perl/cpan/Metadata path? > > 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 > Michael Friedman > Sent: Sunday, February 24, 2008 2:43 PM > To: San Francisco Perl Mongers User Group > Subject: Re: [sf-perl] Help with a downloaded module > > Neil, > > CPAN modules don't really stand on their own. They come in packages. > If you follow CPAN's suggestion and do > > cpan> i/TestReporter/ > Distribution C/CH/CHROMATIC/Module-Build-TestReporter-1.00.tar.gz > Module Module::Build::TestReporter (C/CH/CHROMATIC/Module- > Build-TestReporter-1.00.tar.gz) > 2 items found > > > That tells you that it's part of "C/CH/CHROMATIC/Module-Build- > TestReporter-1.00", as "Module::Build::TestReporter". You need that > full "path" so that CPAN can find the module. > > Knowing that, you can ask CPAN to install it by doing > > cpan> install Module::Build::TestReporter > > which should work better. Note that there are a number of > prerequisites for this module, so it may start off by loading a pile > of seemingly unrelated stuff, but it'll get to TestReporter at the > end. > > -- Mike > > On Feb 24, 2008, at 2:06 PM, Neil Heller wrote: > >> Thank you for the help. >> I tried installing the file as you mentioned but got only errors. >> The transcript follows. Do you have any feeling for what my trouble >> may be? >> >> [start install] >> >> >> C:\test\TestReporter>perl -MCPAN -e shell >> Exiting subroutine via last at C:/Perl/lib/CPAN.pm line 1450. >> >> cpan shell -- CPAN exploration and modules installation (v1.9205) >> ReadLine support enabled >> >> >> cpan> install TestReporter.pm >> CPAN: Storable loaded ok (v2.18) >> Use of uninitialized value $_ in transliteration (tr///) at >> C:/Perl/lib/File/Spe >> c/Win32.pm line 141. >> Use of uninitialized value $_ in pattern match (m//) at >> C:/Perl/lib/File/Spec/Wi >> n32.pm line 143. >> CPAN: LWP::UserAgent loaded ok (v2.036) >> CPAN: Time::HiRes loaded ok (v1.9711) >> Fetching with LWP: >> http://ppm.activestate.com/CPAN/authors/01mailrc.txt.gz >> Going to read C:\Perl\cpan\sources\authors\01mailrc.txt.gz >> > ............................................................................ >> DONE >> >> Use of uninitialized value $_ in transliteration (tr///) at >> C:/Perl/lib/File/Spe >> c/Win32.pm line 141. >> Use of uninitialized value $_ in pattern match (m//) at >> C:/Perl/lib/File/Spec/Wi >> n32.pm line 143. >> Fetching with LWP: >> http://ppm.activestate.com/CPAN/modules/02packages.details.txt.gz >> Going to read C:\Perl\cpan\sources\modules\02packages.details.txt.gz >> Database was generated on Sun, 24 Feb 2008 11:30:42 GMT >> > ............................................................................ >> DONE >> >> Use of uninitialized value $_ in transliteration (tr///) at >> C:/Perl/lib/File/Spe >> c/Win32.pm line 141. >> Use of uninitialized value $_ in pattern match (m//) at >> C:/Perl/lib/File/Spec/Wi >> n32.pm line 143. >> Fetching with LWP: >> http://ppm.activestate.com/CPAN/modules/03modlist.data.gz >> Going to read C:\Perl\cpan\sources\modules\03modlist.data.gz >> > ............................................................................ >> DONE >> >> Going to write C:\Perl\cpan\Metadata >> Warning: Cannot install TestReporter.pm, don't know what it is. >> Try the command >> >> i /TestReporter.pm/ >> >> to find objects with matching identifiers. >> >> >> cpan> >> >> [end install] >> >> 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 >> Asheesh Laroia >> Sent: Sunday, February 24, 2008 12:10 PM >> To: San Francisco Perl Mongers User Group >> Subject: Re: [sf-perl] Help with a downloaded module >> >> On Sun, 24 Feb 2008, Neil Heller wrote: >> >>> >>> I'm a relative newbie at Perl. >>> I downloaded a module, TestReporter.pm, from CPAN. >>> On my Wintel machine I created a directory, c:\test\TestReporter. >>> I plopped the module (without change) into that directory and >>> issued a >>> couple of command line calls. >> >> That's not the right way to install CPAN modules. >> >> Do you know about the CPAN shell? Try this: >> >> perl -MCPAN -e shell >> >> That will give you a prompt at which you can ask it: >> >> install __name__of_module_you_want__ >> >> -- Asheesh. >> >> -- >> Do clones have navels? >> _______________________________________________ >> 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 > --------------------------------------------------------------------- > > > _______________________________________________ > 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 nheller at silcon.com Mon Feb 25 11:34:09 2008 From: nheller at silcon.com (nheller at silcon.com) Date: Mon, 25 Feb 2008 11:34:09 -0800 (PST) Subject: [sf-perl] Help with a downloaded module In-Reply-To: References: <4c714a9c0612291517y7ce7f52cn5e2f1d7edc9f5b9c@mail.gmail.com> <4c714a9c0801051909m79035ac5p1d265a5c21c32346@mail.gmail.com> <000001c8501e$60acfdd0$2206f970$@com> <4c714a9c0801060753h731872d5sd1341d3df00e39a6@mail.gmail.com> <001001c850a0$b0e47210$12ad5630$@com> <8E476DF7-6A26-4ACD-9B56-58EB75B75547@mac.com> <29F504A3-1BC6-46AB-874C-FF6EC4E7E3F6@nolex.com> <1E26FF5C-BCA7-11DC-9E67-000A277A733C@light42.com> <86prwe1qgt.fsf@blue.stonehenge.com> <4c714a9c0801062042v2cc92db6nc9c86b45aa33e878@mail.gmail.com> <000301c87715$625279d0$26f76d70$@com> <000001c87731$78ea4120$6abec360$@com> <000001c87757$cf1e2ae0$6d5a80a0$@com> Message-ID: <2436.66.93.171.131.1203968049.squirrel@webmail.silcon.com> Thanks for the help so far. I re-downloaded through CPAN. I then extracted all the contents into the correct directories. I noticed that there are two files, Make.pl and Build.pl, in the target directory. Can you tell me what these are and what they're for? I feel like I'm a whole lot closer but have a way to go. BTW, thanks for the links to Cozens' book. I'll read the the chapter on modules next; hopefully that will answer more of my questions. Neil Heller > Neil, > > If you load a module using the CPAN module, it will put it in the > location for shared modules that perl already knows about. Thus, once > you've installed it, you shouldn't need to change your path or > anything. Just 'use' the module by its full name: > > use Module::Build::TestReporter; > > and it should "just work". > > (I've never worked with Active State Perl before, but I assume it's > like every other distribution that way. Someone will correct me if I'm > wrong, I am sure. :-) ) > > BTW, did you know that _Beginning Perl_, by Simon Cozens, is available > free on the web? From your questions, you may find it very helpful to > read a couple of chapters of it. For example, the chapter on Modules > covers installing from CPAN and how to "find" a module once you've > installed it. > > http://www.perl.org/books/beginning-perl/ > http://blob.perl.org/books/beginning-perl/3145_Chap10.pdf > > There's also a great website that gathers up a bunch of resources and > people who love to help people new to perl. You will find friendly > folks and lots of FAQ and answers at > > http://learn.perl.org/ > http://www.nntp.perl.org/group/perl.beginners/ > > and I think there's an IRC channel for learning perl too, but I > haven't used that before. > > Good luck! > -- Mike > > > On Feb 24, 2008, at 6:40 PM, Neil Heller wrote: > >> This is looking promising... I think. >> I'll modify the uses Module::Build::TestReporter to make it reflect >> my path >> and then build. >> Can you think of anything else off the top of your head? >> Will I have to create a Perl/cpan/Metadata path? >> >> 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 >> Michael Friedman >> Sent: Sunday, February 24, 2008 2:43 PM >> To: San Francisco Perl Mongers User Group >> Subject: Re: [sf-perl] Help with a downloaded module >> >> Neil, >> >> CPAN modules don't really stand on their own. They come in packages. >> If you follow CPAN's suggestion and do >> >> cpan> i/TestReporter/ >> Distribution C/CH/CHROMATIC/Module-Build-TestReporter-1.00.tar.gz >> Module Module::Build::TestReporter (C/CH/CHROMATIC/Module- >> Build-TestReporter-1.00.tar.gz) >> 2 items found >> >> >> That tells you that it's part of "C/CH/CHROMATIC/Module-Build- >> TestReporter-1.00", as "Module::Build::TestReporter". You need that >> full "path" so that CPAN can find the module. >> >> Knowing that, you can ask CPAN to install it by doing >> >> cpan> install Module::Build::TestReporter >> >> which should work better. Note that there are a number of >> prerequisites for this module, so it may start off by loading a pile >> of seemingly unrelated stuff, but it'll get to TestReporter at the >> end. >> >> -- Mike >> >> On Feb 24, 2008, at 2:06 PM, Neil Heller wrote: >> >>> Thank you for the help. >>> I tried installing the file as you mentioned but got only errors. >>> The transcript follows. Do you have any feeling for what my trouble >>> may be? >>> >>> [start install] >>> >>> >>> C:\test\TestReporter>perl -MCPAN -e shell >>> Exiting subroutine via last at C:/Perl/lib/CPAN.pm line 1450. >>> >>> cpan shell -- CPAN exploration and modules installation (v1.9205) >>> ReadLine support enabled >>> >>> >>> cpan> install TestReporter.pm >>> CPAN: Storable loaded ok (v2.18) >>> Use of uninitialized value $_ in transliteration (tr///) at >>> C:/Perl/lib/File/Spe >>> c/Win32.pm line 141. >>> Use of uninitialized value $_ in pattern match (m//) at >>> C:/Perl/lib/File/Spec/Wi >>> n32.pm line 143. >>> CPAN: LWP::UserAgent loaded ok (v2.036) >>> CPAN: Time::HiRes loaded ok (v1.9711) >>> Fetching with LWP: >>> http://ppm.activestate.com/CPAN/authors/01mailrc.txt.gz >>> Going to read C:\Perl\cpan\sources\authors\01mailrc.txt.gz >>> >> ............................................................................ >>> DONE >>> >>> Use of uninitialized value $_ in transliteration (tr///) at >>> C:/Perl/lib/File/Spe >>> c/Win32.pm line 141. >>> Use of uninitialized value $_ in pattern match (m//) at >>> C:/Perl/lib/File/Spec/Wi >>> n32.pm line 143. >>> Fetching with LWP: >>> http://ppm.activestate.com/CPAN/modules/02packages.details.txt.gz >>> Going to read C:\Perl\cpan\sources\modules\02packages.details.txt.gz >>> Database was generated on Sun, 24 Feb 2008 11:30:42 GMT >>> >> ............................................................................ >>> DONE >>> >>> Use of uninitialized value $_ in transliteration (tr///) at >>> C:/Perl/lib/File/Spe >>> c/Win32.pm line 141. >>> Use of uninitialized value $_ in pattern match (m//) at >>> C:/Perl/lib/File/Spec/Wi >>> n32.pm line 143. >>> Fetching with LWP: >>> http://ppm.activestate.com/CPAN/modules/03modlist.data.gz >>> Going to read C:\Perl\cpan\sources\modules\03modlist.data.gz >>> >> ............................................................................ >>> DONE >>> >>> Going to write C:\Perl\cpan\Metadata >>> Warning: Cannot install TestReporter.pm, don't know what it is. >>> Try the command >>> >>> i /TestReporter.pm/ >>> >>> to find objects with matching identifiers. >>> >>> >>> cpan> >>> >>> [end install] >>> >>> 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 >>> Asheesh Laroia >>> Sent: Sunday, February 24, 2008 12:10 PM >>> To: San Francisco Perl Mongers User Group >>> Subject: Re: [sf-perl] Help with a downloaded module >>> >>> On Sun, 24 Feb 2008, Neil Heller wrote: >>> >>>> >>>> I'm a relative newbie at Perl. >>>> I downloaded a module, TestReporter.pm, from CPAN. >>>> On my Wintel machine I created a directory, c:\test\TestReporter. >>>> I plopped the module (without change) into that directory and >>>> issued a >>>> couple of command line calls. >>> >>> That's not the right way to install CPAN modules. >>> >>> Do you know about the CPAN shell? Try this: >>> >>> perl -MCPAN -e shell >>> >>> That will give you a prompt at which you can ask it: >>> >>> install __name__of_module_you_want__ >>> >>> -- Asheesh. >>> >>> -- >>> Do clones have navels? >>> _______________________________________________ >>> 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 >> --------------------------------------------------------------------- >> >> >> _______________________________________________ >> 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 > --------------------------------------------------------------------- > > > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm > From kenuhl at berkeley.edu Mon Feb 25 14:05:11 2008 From: kenuhl at berkeley.edu (ken uhl) Date: Mon, 25 Feb 2008 14:05:11 -0800 Subject: [sf-perl] handling a list of check boxes Message-ID: <47C33B97.50600@berkeley.edu> I am trying to pass checkbox values as hash references to another script but all I get is the first hash reference. I am wrirting a DELETE from list loop. What is a clean way to do this. ? Ken Berkeley From garth.webb at gmail.com Mon Feb 25 17:50:51 2008 From: garth.webb at gmail.com (Garth Webb) Date: Mon, 25 Feb 2008 17:50:51 -0800 Subject: [sf-perl] handling a list of check boxes In-Reply-To: <47C33B97.50600@berkeley.edu> References: <47C33B97.50600@berkeley.edu> Message-ID: We need more information; can you attach the script? If its a long script, please just attach the shortest working example that still shows the problem. Garth On Mon, Feb 25, 2008 at 2:05 PM, ken uhl wrote: > I am trying to pass checkbox values as hash references to another script > but all I get is the > first hash reference. I am wrirting a DELETE from list loop. > > What is a clean way to do this. ? > > Ken > Berkeley > > > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm > From doom at kzsu.stanford.edu Mon Feb 25 17:51:29 2008 From: doom at kzsu.stanford.edu (Joe Brenner) Date: Mon, 25 Feb 2008 17:51:29 -0800 Subject: [sf-perl] handling a list of check boxes In-Reply-To: <47C33B97.50600@berkeley.edu> References: <47C33B97.50600@berkeley.edu> Message-ID: <200802260151.m1Q1pTbo010673@kzsu.stanford.edu> ken uhl wrote: > I am trying to pass checkbox values as hash references to another script > but all I get is the > first hash reference. I am wrirting a DELETE from list loop. > > What is a clean way to do this. ? Well, passing hash references (or any other complex data structure) is pretty easy if you're passing them to another subroutine, but if you really need to pass them to another script, you're going to need to serialize the data somehow, and then unserialize it on the other side. One way would be to use YAML, and "Dump" from one script and "Load" into the other. If at all possible, you're better off re-writing things as multiple subroutines running inside of one perl process, though. From nheller at silcon.com Tue Feb 26 11:59:16 2008 From: nheller at silcon.com (nheller at silcon.com) Date: Tue, 26 Feb 2008 11:59:16 -0800 (PST) Subject: [sf-perl] Meaning of an asterisk (*) Message-ID: <1726.66.93.171.131.1204055956.squirrel@webmail.silcon.com> I got a few questions about the following snippet of code. The questions follow the code. I appreciate any answers I can get. #! /usr/bin/perl use strict; use warnings; can_ok('SongPlayer', 'new'); . . . can_ok( $song, 'player'); { package SongPlayer; use subs 'system'; package main; my $fail = 0; my @args; *SongPlayer::system = sub; { @args = @_; return $fail; }; My questions: 1. What is the meaning of the line "use subs 'system';"? 2. Why were two package statements used in the space of 3 lines? 3. What is the meaning of the asterisk in this code? 4. For that matter, what is the meaning of this entire line, and why are the lines below it set into a block by braces? From kenuhl at berkeley.edu Tue Feb 26 12:04:33 2008 From: kenuhl at berkeley.edu (ken uhl) Date: Tue, 26 Feb 2008 12:04:33 -0800 Subject: [sf-perl] handling a list of check boxes (ken uhl) i dont have any code ... In-Reply-To: References: Message-ID: <47C470D1.1020103@berkeley.edu> I don't have any code, nor a cleaer understanding of how to do it. . . . Ken Berkeley From kenuhl at berkeley.edu Tue Feb 26 12:01:16 2008 From: kenuhl at berkeley.edu (ken uhl) Date: Tue, 26 Feb 2008 12:01:16 -0800 Subject: [sf-perl] Design help needed with DELETE check box loop Message-ID: <47C4700C.40708@berkeley.edu> Is anyone listening? I am looking for a tutor to help me understand how things work. If you are an expert, do you remember the time when you were a newbie and you got all the help you needed to understand how to design and write that application? Well, I am a newbie, and I am trying to write a complex program and I need some help. I have posted to several forums I am not getting the level of instruction I need to understand. I am working with DNS-DB application. We want to do BULK deletes from data base. So, an html table renders a list of database entries along with a checkbox. We want to click the checkbox , then render a confirmation page with a 'do you really want to delete? ' message and then click a GO button. Is this even possible in perl? It seems that I can make checkboxes with unique names for each data record. How do I pass all the info to the confirmation page? Ken Berkeley From garth.webb at gmail.com Tue Feb 26 12:37:34 2008 From: garth.webb at gmail.com (Garth Webb) Date: Tue, 26 Feb 2008 12:37:34 -0800 Subject: [sf-perl] Meaning of an asterisk (*) In-Reply-To: <1726.66.93.171.131.1204055956.squirrel@webmail.silcon.com> References: <1726.66.93.171.131.1204055956.squirrel@webmail.silcon.com> Message-ID: On Tue, Feb 26, 2008 at 11:59 AM, wrote: > I got a few questions about the following snippet of code. > The questions follow the code. > I appreciate any answers I can get. > > #! /usr/bin/perl > > use strict; > use warnings; > > can_ok('SongPlayer', 'new'); > . > . > . > can_ok( $song, 'player'); > > { > package SongPlayer; > use subs 'system'; > package main; > my $fail = 0; > my @args; > > *SongPlayer::system = sub; > { > @args = @_; > return $fail; > }; > > My questions: > > 1. What is the meaning of the line "use subs 'system';"? Its to allow you to override Perl's built-in function names. In this case to allow the code to override the 'system' function. See 'man perlsub' > 2. Why were two package statements used in the space of 3 lines? You can use a package statement to change the code's context. Global variables and subroutines are affected by the last package statement. In this case its making sure that the 'system' function can be overridden later in code. I'm not sure why it wasn't overridden while still in the 'SongPlayer' context. > 3. What is the meaning of the asterisk in this code? Its called a typeglob, see 'man perldata'. It basically makes an alias to the name given just after the asterisk to what its being assigned to. > 4. For that matter, what is the meaning of this entire line, and why are > the lines below it set into a block by braces? This is a bug. The code meant to define an anonymous subroutine that does stuff (and then gets aliased as 'system' in the 'SongPlayer' package), but the semicolon after 'sub' creates an empty anonymous subroutine that does nothing, plus a section of code that will be run at the end of the script (rather than when it gets called). Garth From garth.webb at gmail.com Tue Feb 26 12:55:26 2008 From: garth.webb at gmail.com (Garth Webb) Date: Tue, 26 Feb 2008 12:55:26 -0800 Subject: [sf-perl] Design help needed with DELETE check box loop In-Reply-To: <47C4700C.40708@berkeley.edu> References: <47C4700C.40708@berkeley.edu> Message-ID: On Tue, Feb 26, 2008 at 12:01 PM, ken uhl wrote: > Is anyone listening? > I am looking for a tutor to help me understand how things work. > > If you are an expert, do you remember the time when you were a newbie > and you got all the help you needed to understand how to design and > write that > application? When I was a newbie, I read a books on Perl and found examples on the the web. I experimented with my own code and when I ran into a problem that I couldn't solve on my own (or by searching mailing list archives for people with similar problems) I posted the code I tried, and asked specific questions about what my program was doing wrong. I never yelled at a list if I didn't get an answer in a day; I figured that I had not phrased my question correctly, or that nobody on the list had a good answer. I realized that everyone reads and responds in their spare time. Everything you have asked about is entirely possible to do in Perl and people do these things every day. However the way you have asked the question (and lacking any code) the only way anyone could answer would be to write the application for you. Nobody is going to write your application for you, and you won't get any help unless you've shown that you've at least done some basic investigation on your own. Michael Friedman recently posted some good links and books for people new to Perl. http://www.perl.org/books/beginning-perl/ http://learn.perl.org/ http://www.nntp.perl.org/group/perl.beginners/ I would suggest checking these out first and experimenting on your own with what you learn. If you have specific questions with Perl examples you can include, I'm sure you'll get a more satisfactory response from the list. Garth Webb > Well, I am a newbie, and I am trying to write a complex program and I > need some > help. I have posted to several forums I am not getting the level of > instruction I need to > understand. > > I am working with DNS-DB application. We want to do BULK deletes from > data base. > So, an html table renders a list of database entries along with a > checkbox. We want to > click the checkbox , then render a confirmation page with a 'do you > really want to > delete? ' message and then click a GO button. > > Is this even possible in perl? > It seems that I can make checkboxes with unique names for each data record. > > How do I pass all the info to the confirmation page? > > > > Ken > Berkeley > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm > From biztos at mac.com Tue Feb 26 12:56:15 2008 From: biztos at mac.com (frosty) Date: Tue, 26 Feb 2008 12:56:15 -0800 Subject: [sf-perl] Design help needed with DELETE check box loop In-Reply-To: <47C4700C.40708@berkeley.edu> References: <47C4700C.40708@berkeley.edu> Message-ID: Ken, this list is not your personal help desk. Most of us, newbies and experts alike, have busy lives and contribute to the list as time allows. If you need on-demand application design services, there are people you can hire to do that for you. It sounds like you're trying to figure out how to write a simple Web application in Perl. This is not only possible, it's quite practical; much of the Web is built on Perl and there are many ways to go about it. For starters, you should read about Perl's CGI module: http://perldoc.perl.org/CGI.html You will also need to talk to your database if you want to bulk-delete anything, and for that you will need the Perl DBI, or something higher-level that uses it: http://search.cpan.org/~timb/DBI-1.602/DBI.pm At this point it gets more complicated, since you will have to know a bit about databases in order for anything to work. You (or your sysadmin) may need to install the DBI module and the drivers for your system. As you move forward, you should consider working with a framework that does some of the work for you, like HTML::Mason or Catalyst MVC. http://www.masonhq.com/ http://catalyst.perl.org/ Catalyst in particular may be a good choice for a beginner as it really does a *lot* of the work for you. I also recommend reading a good introductory Perl book, like "Learning Perl" from O'Reilly: http://www.oreilly.com/catalog/lperl3/ Once you have read that book and poked around a little, you will be able to ask more specific questions from this list and also on perlmonks, which is another great place to get help: http://www.perlmonks.org/ Good luck. -- frosty On Tuesday, February 26, 2008, at 12:28PM, "ken uhl" wrote: >Is anyone listening? >I am looking for a tutor to help me understand how things work. > >If you are an expert, do you remember the time when you were a newbie >and you got all the help you needed to understand how to design and >write that >application? > >Well, I am a newbie, and I am trying to write a complex program and I >need some >help. I have posted to several forums I am not getting the level of >instruction I need to >understand. > >I am working with DNS-DB application. We want to do BULK deletes from >data base. >So, an html table renders a list of database entries along with a >checkbox. We want to >click the checkbox , then render a confirmation page with a 'do you >really want to >delete? ' message and then click a GO button. > >Is this even possible in perl? >It seems that I can make checkboxes with unique names for each data record. > >How do I pass all the info to the confirmation page? > > > >Ken >Berkeley >_______________________________________________ >SanFrancisco-pm mailing list >SanFrancisco-pm at pm.org >http://mail.pm.org/mailman/listinfo/sanfrancisco-pm > > From nheller at silcon.com Tue Feb 26 13:07:21 2008 From: nheller at silcon.com (nheller at silcon.com) Date: Tue, 26 Feb 2008 13:07:21 -0800 (PST) Subject: [sf-perl] Meaning of an asterisk (*) In-Reply-To: References: <1726.66.93.171.131.1204055956.squirrel@webmail.silcon.com> Message-ID: <1792.66.93.171.131.1204060041.squirrel@webmail.silcon.com> Thank you for your response. You said that the final block of code was an error. How would you change it so that it is well-written? >> can_ok( $song, 'player'); >> >> { >> package SongPlayer; >> use subs 'system'; >> package main; >> my $fail = 0; >> my @args; >> >> *SongPlayer::system = sub; >> { >> @args = @_; >> return $fail; >> }; >> >> 4. For that matter, what is the meaning of this entire line, and why >> are >> the lines below it set into a block by braces? > > This is a bug. The code meant to define an anonymous subroutine that > does stuff (and then gets aliased as 'system' in the 'SongPlayer' > package), but the semicolon after 'sub' creates an empty anonymous > subroutine that does nothing, plus a section of code that will be run > at the end of the script (rather than when it gets called). > > Garth From rjray at blackperl.com Tue Feb 26 13:13:37 2008 From: rjray at blackperl.com (Randy J. Ray) Date: Tue, 26 Feb 2008 13:13:37 -0800 Subject: [sf-perl] Meaning of an asterisk (*) In-Reply-To: <1792.66.93.171.131.1204060041.squirrel@webmail.silcon.com> References: <1726.66.93.171.131.1204055956.squirrel@webmail.silcon.com> <1792.66.93.171.131.1204060041.squirrel@webmail.silcon.com> Message-ID: <47C48101.8030406@blackperl.com> nheller at silcon.com wrote: > Thank you for your response. > You said that the final block of code was an error. > How would you change it so that it is well-written? He mentioned the problem-- there shouldn't be a semi-colon (';') immediately after the word 'sub'. It should be: *SongPlayer::system = sub { @args = @_; return $fail; }; (It might be clearer if the opening brace were on the same line as "sub"...) -- """"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""" Randy J. Ray Sunnyvale, CA http://www.rjray.org rjray at blackperl.com Silicon Valley Scale Modelers: http://www.svsm.org From merlyn at stonehenge.com Tue Feb 26 14:25:30 2008 From: merlyn at stonehenge.com (Randal L. Schwartz) Date: Tue, 26 Feb 2008 14:25:30 -0800 Subject: [sf-perl] handling a list of check boxes (ken uhl) i dont have any code ... In-Reply-To: <47C470D1.1020103@berkeley.edu> (ken uhl's message of "Tue, 26 Feb 2008 12:04:33 -0800") References: <47C470D1.1020103@berkeley.edu> Message-ID: <86oda38ied.fsf@blue.stonehenge.com> >>>>> "ken" == ken uhl writes: ken> I don't have any code, nor a cleaer understanding of how to do it. . . . Might be a time to: (a) take a class in Perl (b) read a book or two or ten (c) if you can't afford the time to do A or B, hire a smarter person. -- Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095 Perl/Unix/security consulting, Technical writing, Comedy, etc. etc. See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training! From matt at cloudfactory.org Tue Feb 26 14:37:12 2008 From: matt at cloudfactory.org (Matthew Lanier) Date: Tue, 26 Feb 2008 14:37:12 -0800 (PST) Subject: [sf-perl] history reminder Message-ID: hey folks- just a reminder as to why this list was founded: because i, as a perl n00b, was flamed one too many times by tom whatever his name is on comp.lang.perl.misc. so lets be nice to our n00b$, as they are the future workforce. that is all. resume your discussions... m@ -- Matthew D. P. K. Strelchun-Lanier matt at cloudfactory.org http://www.bearlywornpacifica.com From bh1 at light42.com Tue Feb 26 15:14:59 2008 From: bh1 at light42.com (Brian Hamlin) Date: Tue, 26 Feb 2008 15:14:59 -0800 Subject: [sf-perl] history reminder In-Reply-To: References: Message-ID: thats why I am here, too On Feb 26, 2008, at 2:37 PM, Matthew Lanier wrote: > > hey folks- > > just a reminder as to why this list was founded: because i, as a perl > n00b, was flamed one too many times by tom whatever his name is on > comp.lang.perl.misc. > > so lets be nice to our n00b$, as they are the future workforce. > > that is all. resume your discussions... > > m@ > > -- > > Matthew D. P. K. Strelchun-Lanier > matt at cloudfactory.org > http://www.bearlywornpacifica.com > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm From kenuhl at berkeley.edu Tue Feb 26 16:42:00 2008 From: kenuhl at berkeley.edu (ken uhl) Date: Tue, 26 Feb 2008 16:42:00 -0800 Subject: [sf-perl] Bulk Delete check boxes In-Reply-To: References: Message-ID: <47C4B1D8.7020205@berkeley.edu> Hi, maybe this will illustrate what I am trying to do: shebang perl - # # BULK_delete.pl use CGI; my $sq = new CGI; use DBI; my $db = new DBI; # code snipped from library module my $db_query = "select * from table"; my $dbh = $db->pepare($db_query); my @db_queryresults = $dbh execute(); # render the DB query to HTML table my @lines ; # array for print for my $db_line (@db_queryresults) { # get the table row id from results $hrowid = @db_queryresults->[4]; # make a uniquely named check box my $be_bad = $sq->checkbox( -name => "bulkdeleteHost_$hrowid", -checked => 0, -value => "FALSE", -label => " Bulk Delete ") ; # append check box to html table push(@lines, $sq->td($be_bad) ); # append some other data from table to display push(@lines, $sq->td(@db_queryresults->[2] )); print @lines; ... # from library 1708 sub _dnsURL { 1709 my $q = shift; # CGI handle 1710 my $dir = shift; # CGI subdirectory 1711 my $script = shift; # script to run 1712 my $qparam = shift; # hasref to additional named CGI params 1713 1714 my $sq = new CGI; 1715 $sq->delete_all; 1716 $sq->param(-name => 'AWSAuthToken', -value => $q->param('AWSAuthToken')); 1717 $sq->param(-name => 'AWSSignatureBase64', 1718 -value => $q->param('AWSSignatureBase64')); 1719 1720 foreach (keys %$qparam) { 1721 $sq->param(-name => $_, -value => $qparam->{$_}); 1722 } 1723 1724 return "/cgi-bin/dns-db/" . "$dir/$script?" . $sq->query_string; 1725 } # ------------------------------ Question : This displays HTML table of data base rows with Bulk Delete check box. how do I render a confirmation page of just the selected records? Should I do this in the same CGI script, or pass all the data to another script? I looked at CGI::checkbox_goup as a means to parse all the values,do I need another action /submit button to drive that ? Ken berkeley From matt at cloudfactory.org Tue Feb 26 17:55:35 2008 From: matt at cloudfactory.org (Matthew Lanier) Date: Tue, 26 Feb 2008 17:55:35 -0800 (PST) Subject: [sf-perl] Bulk Delete check boxes In-Reply-To: <47C4B1D8.7020205@berkeley.edu> References: <47C4B1D8.7020205@berkeley.edu> Message-ID: Hi Ken- (I'm not replying on the technicalities of your request, more on the format). In the future, the content of this message below is much more in line with what is required when asking a technical question of the sfpug. I think sufficient information is present at this point. thanks- m@ On Tue, 26 Feb 2008, ken uhl wrote: > Hi, > maybe this will illustrate what I am trying to do: > > > > shebang perl - > # > > # BULK_delete.pl > > > use CGI; > my $sq = new CGI; > > use DBI; > my $db = new DBI; > > # code snipped from library module > > my $db_query = "select * from table"; > my $dbh = $db->pepare($db_query); > my @db_queryresults = $dbh execute(); > > # render the DB query to HTML table > my @lines ; # array for print > > > for my $db_line (@db_queryresults) { > # get the table row id from results > $hrowid = @db_queryresults->[4]; > > # make a uniquely named check box > my $be_bad = $sq->checkbox( -name => "bulkdeleteHost_$hrowid", > -checked => 0, -value => "FALSE", -label => " Bulk Delete ") ; > > # append check box to html table > push(@lines, $sq->td($be_bad) ); > > # append some other data from table to display > > push(@lines, $sq->td(@db_queryresults->[2] )); > > > print @lines; > > ... > > # from library > 1708 sub _dnsURL { > 1709 my $q = shift; # CGI handle > 1710 my $dir = shift; # CGI subdirectory > 1711 my $script = shift; # script to run > 1712 my $qparam = shift; # hasref to additional named CGI params > 1713 > 1714 my $sq = new CGI; > 1715 $sq->delete_all; > 1716 $sq->param(-name => 'AWSAuthToken', -value => > $q->param('AWSAuthToken')); > 1717 $sq->param(-name => 'AWSSignatureBase64', > 1718 -value => $q->param('AWSSignatureBase64')); > 1719 > 1720 foreach (keys %$qparam) { > 1721 $sq->param(-name => $_, -value => $qparam->{$_}); > 1722 } > 1723 > 1724 return "/cgi-bin/dns-db/" . "$dir/$script?" . > $sq->query_string; > 1725 } > > > # ------------------------------ > > > Question : > > This displays HTML table of data base rows with Bulk Delete check box. > > how do I render a confirmation page of just the selected records? > > Should I do this in the same CGI script, or pass all the data to > another script? > > I looked at CGI::checkbox_goup as a means to parse all the values,do I > need another action /submit button to drive that ? > > Ken > berkeley > > > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm > -- Matthew D. P. K. Strelchun-Lanier matt at cloudfactory.org http://www.bearlywornpacifica.com From friedman at highwire.stanford.edu Tue Feb 26 22:25:08 2008 From: friedman at highwire.stanford.edu (Michael Friedman) Date: Tue, 26 Feb 2008 22:25:08 -0800 Subject: [sf-perl] Bulk Delete check boxes In-Reply-To: <47C4B1D8.7020205@berkeley.edu> References: <47C4B1D8.7020205@berkeley.edu> Message-ID: <1A3BCD53-10C0-4B21-B35A-13699950586B@highwire.stanford.edu> Ken, What I've done to handle lists like this using CGI is to name all the checkboxes the same thing, but give them different values. Then when you read the param back from CGI, you get an array of the values of those boxes. (You still set 'checked' status to determine how they will look on the HTML page.) As for if you return to the same CGI script or a different one, that depends a lot on your personal style. In my office, we have some people who prefer one large, multi-faceted script and others who prefer several smaller single-focus scripts. I prefer several specific scripts, as I find them easier to maintain, but most of my "working" code is in modules anyway. Each of those scripts is merely a wrapper that reads the CGI input, converts it to parameters and calls module functions that do the "real" work. In fact, I've used a CGI script that was a generic "confirmation page". It took as POST fields the list of strings to display, the name of the OK and Cancel buttons, and the URL of the script to send the form output to once the user had confirmed their action. Unfortunately, it's University property and I can't share it in full, but you can probably build a script like that in relatively short order if it would fill your needs. The flow of this system looks like: (monospaced font works best) display confirm delete table action rows | | | --------->| | | | | | <---------| | | (pick rows) | | ---------------------->| | | | <----------------------| | (yes I'm sure) | -------------------------------->| | <--------------------------------| where: "display table" is a CGI script that reads the DB and displays the table, with checkboxes. "confirm action" is the action attribute on the form returned by "display table". It reads the checked boxes and produces a page listing only the ones you've checked with an "Are you sure?" button. "delete rows" is the action attribute on the confirmation form and actually does the deleting. Be sure that all the data you need to delete the rows is present in the returned page from the "confirm action" script. Otherwise you'll get to "delete rows" and won't know what to delete. For this it's often helpful to use hidden form fields. *BIG GIANT SECURITY WARNING* Passing information around in form fields like this is inherently insecure. If you care about someone tapping into the middle of the pipe and deleting rows maliciously, you probably want to look into another solution. One such solution is a session-tracking db. Another is Continuity. For internal applications, you usually don't care about someone hacking the app, as they could just mangle the db directly anyway. :-) http://search.cpan.org/~awwaiid/Continuity-0.97/lib/Continuity.pm Good luck! -- Mike On Feb 26, 2008, at 4:42 PM, ken uhl wrote: > Hi, > maybe this will illustrate what I am trying to do: > > > > shebang perl - > # > > # BULK_delete.pl > > > use CGI; > my $sq = new CGI; > > use DBI; > my $db = new DBI; > > # code snipped from library module > > my $db_query = "select * from table"; > my $dbh = $db->pepare($db_query); > my @db_queryresults = $dbh execute(); > > # render the DB query to HTML table > my @lines ; # array for print > > > for my $db_line (@db_queryresults) { > # get the table row id from results > $hrowid = @db_queryresults->[4]; > > # make a uniquely named check box > my $be_bad = $sq->checkbox( -name => "bulkdeleteHost_$hrowid", > -checked => 0, -value => "FALSE", -label => " Bulk Delete ") ; > > # append check box to html table > push(@lines, $sq->td($be_bad) ); > > # append some other data from table to display > > push(@lines, $sq->td(@db_queryresults->[2] )); > > > print @lines; > > ... > > # from library > 1708 sub _dnsURL { > 1709 my $q = shift; # CGI handle > 1710 my $dir = shift; # CGI subdirectory > 1711 my $script = shift; # script to run > 1712 my $qparam = shift; # hasref to additional named CGI params > 1713 > 1714 my $sq = new CGI; > 1715 $sq->delete_all; > 1716 $sq->param(-name => 'AWSAuthToken', -value => > $q->param('AWSAuthToken')); > 1717 $sq->param(-name => 'AWSSignatureBase64', > 1718 -value => $q->param('AWSSignatureBase64')); > 1719 > 1720 foreach (keys %$qparam) { > 1721 $sq->param(-name => $_, -value => $qparam->{$_}); > 1722 } > 1723 > 1724 return "/cgi-bin/dns-db/" . "$dir/$script?" . > $sq->query_string; > 1725 } > > > # ------------------------------ > > > Question : > > This displays HTML table of data base rows with Bulk Delete check box. > > how do I render a confirmation page of just the selected records? > > Should I do this in the same CGI script, or pass all the data to > another script? > > I looked at CGI::checkbox_goup as a means to parse all the > values,do I > need another action /submit button to drive that ? > > Ken > berkeley > > > _______________________________________________ > 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 nheller at silcon.com Thu Feb 28 11:15:40 2008 From: nheller at silcon.com (nheller at silcon.com) Date: Thu, 28 Feb 2008 11:15:40 -0800 (PST) Subject: [sf-perl] Return from a function Message-ID: <1394.66.93.171.131.1204226140.squirrel@webmail.silcon.com> I have an idea in my head that's obviously incorrect. Maybe its a mental block but I can't even think of where to look for an answer. If the answer is obvious could y'all just say it but I would appreciate getting a keyword or referrence topic for my use later. [question] I was always under the assumption that Perl (like C) returns a single value from a function. I seems like this is not true as it looks like the following function returns 3 values. How could this be? my ($a, $b, $c); my ($paramA, $paramB); ($a, $b, $c0 = &someFunc($paramA, $paramB); [/question] From ds94103 at earthlink.net Thu Feb 28 11:24:28 2008 From: ds94103 at earthlink.net (David Scott) Date: Thu, 28 Feb 2008 11:24:28 -0800 Subject: [sf-perl] Return from a function In-Reply-To: <1394.66.93.171.131.1204226140.squirrel@webmail.silcon.com> References: <1394.66.93.171.131.1204226140.squirrel@webmail.silcon.com> Message-ID: <47C70A6C.3030609@earthlink.net> It just does. It's part of Perl. Functions can return in either scalar or list context. The place to look for an answer is in just about any Perl book. Also, you don't need the & to call a function (at least, not in Perl 5, which came out about 12 years ago). d nheller at silcon.com wrote: > I have an idea in my head that's obviously incorrect. > Maybe its a mental block but I can't even think of where to look for an > answer. If the answer is obvious could y'all just say it but I would > appreciate getting a keyword or referrence topic for my use later. > > [question] > > I was always under the assumption that Perl (like C) returns a single > value from a function. I seems like this is not true as it looks like the > following function returns 3 values. How could this be? > > my ($a, $b, $c); > my ($paramA, $paramB); > > ($a, $b, $c0 = &someFunc($paramA, $paramB); > > [/question] > > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm > > > From extasia at extasia.org Thu Feb 28 11:24:48 2008 From: extasia at extasia.org (David Alban) Date: Thu, 28 Feb 2008 11:24:48 -0800 Subject: [sf-perl] Return from a function In-Reply-To: <1394.66.93.171.131.1204226140.squirrel@webmail.silcon.com> References: <1394.66.93.171.131.1204226140.squirrel@webmail.silcon.com> Message-ID: <4c714a9c0802281124q7a67f71dy64558a09c9da0deb@mail.gmail.com> the perlsub man page is helpful in this area. On Thu, Feb 28, 2008 at 11:15 AM, wrote: > I have an idea in my head that's obviously incorrect. > Maybe its a mental block but I can't even think of where to look for an > answer. If the answer is obvious could y'all just say it but I would > appreciate getting a keyword or referrence topic for my use later. > > [question] > > I was always under the assumption that Perl (like C) returns a single > value from a function. I seems like this is not true as it looks like the > following function returns 3 values. How could this be? > > my ($a, $b, $c); > my ($paramA, $paramB); > > ($a, $b, $c0 = &someFunc($paramA, $paramB); > > [/question] -- Live in a world of your own, but always welcome visitors. From quinn at fairpath.com Thu Feb 28 11:28:48 2008 From: quinn at fairpath.com (Quinn Weaver) Date: Thu, 28 Feb 2008 11:28:48 -0800 Subject: [sf-perl] Return from a function In-Reply-To: <1394.66.93.171.131.1204226140.squirrel@webmail.silcon.com> References: <1394.66.93.171.131.1204226140.squirrel@webmail.silcon.com> Message-ID: <20080228192848.GA53190@fu.funkspiel.org> On Thu, Feb 28, 2008 at 11:15:40AM -0800, nheller at silcon.com wrote: > > I have an idea in my head that's obviously incorrect. > Maybe its a mental block but I can't even think of where to look for an > answer. If the answer is obvious could y'all just say it but I would > appreciate getting a keyword or referrence topic for my use later. > > [question] > > I was always under the assumption that Perl (like C) returns a single > value from a function. I seems like this is not true as it looks like the > following function returns 3 values. How could this be? > > my ($a, $b, $c); > my ($paramA, $paramB); Hi, Neil, Good observation. In fact, Perl _can_ return multiple values. They come back to the caller in a list. So something like this is possible: sub parse_tuple { my ($text) = @_; ... return ($variable_name, $value, $separator); } my ($var, $val, $sep) = parse_tuple('name=Neil'); # or... my @results = parse_tuple('name=Neil'); Another way to achieve the same thing is to return a reference to an array. This is more the C style of doing things. That code would look like this: sub parse_tuple { my ($text) = @_; ... my @retval = ($variable_name, $value, $separator); return \@retval; # More compact variants are possible, but they may be hard to read. } my $results_array_ref = parse_tuple('name=Neil'); my @results_array = @$results_array_ref; my ($var, $val, $sep) = @results_array; # Again, more compact variants are possible, but they may be hard to read. Overall, the first method (with actual lists, not references) is easier to code and read, and the performance difference is miniscule. So this is one place where Perl makes your life easier than C, IMO. -- Quinn Weaver, independent contractor | President, San Francisco Perl Mongers http://fairpath.com/quinn/resume/ | http://sf.pm.org/ 510-520-5217 From merlyn at stonehenge.com Thu Feb 28 11:23:49 2008 From: merlyn at stonehenge.com (Randal L. Schwartz) Date: Thu, 28 Feb 2008 11:23:49 -0800 Subject: [sf-perl] Return from a function In-Reply-To: <1394.66.93.171.131.1204226140.squirrel@webmail.silcon.com> (nheller@silcon.com's message of "Thu, 28 Feb 2008 11:15:40 -0800 (PST)") References: <1394.66.93.171.131.1204226140.squirrel@webmail.silcon.com> Message-ID: <86prug28ca.fsf@blue.stonehenge.com> >>>>> "nheller" == nheller writes: nheller> I was always under the assumption that Perl (like C) returns a single nheller> value from a function. I seems like this is not true as it looks nheller> like the following function returns 3 values. How could this be? You might have got this impression from the early Learning Perl editions, where we never show a list-context return because it wasn't needed for any of the exercises. But in fact, the last expression evaluated in the subroutine is evaluated in the context of the caller, so if you're assigning it to a literal list, or perhaps an array variable, then a list of values will be returned. -- Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095 Perl/Unix/security consulting, Technical writing, Comedy, etc. etc. See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training! From afife at untangle.com Thu Feb 28 12:11:14 2008 From: afife at untangle.com (Andrew Fife) Date: Thu, 28 Feb 2008 12:11:14 -0800 (PST) Subject: [sf-perl] Donating 500 F/OSS Computers to Schools (SATURDAY) Message-ID: <006001c87a46$283524d0$0200a8c0@Untangle.local> We're trying to donate 500 Ubuntu computers to SF Bay Area schools this SATURDAY... and we need your help! Can you lend a hand by volunteering to install Ubuntu? Signup to volunteer at one of the four locations (San Francisco, San Mateo, Berkeley or Novato) here: http://wiki.untangle.com/index.php/Installfest =================== Installfest Details =================== Untangle and the ACCRC refurbishing hundreds of older/discarded computers that the ACCRC has collected with Ubuntu and donating them to Northern California schools. We need support from the F/OSS community to help with the installs. We have automated as much of the install as possible so anyone can help regardless of their experience level. Of course we'll get our share of error messages so we need gurus also! ...And the Mozilla Foundation is bringing pizza & schwag to each location! Thanks Mozilla! Installfest for Schools homepage: http://www.untangle.com/installfest ================================================== Not in the Bay Area the but still want to help???? ================================================== Help get the word out by blogging about it, Digg it or Slashdot it: http://slashdot.org/bookmark.pl?url=http://www.untangle.com/installfest http://www.digg.com/submit?url=http://www.untangle.com/installfest&phase=2 ====================== Why the event is cool: ====================== -Helps spread F/OSS (Ubuntu, Firefox, OpenOffice & more) -Helps bridges the Digital Divide with underprivileged users -Keeps toxic computer equipment out of landfills (Aprox 25,000 pounds) -Is a cool community effort Thanks in advance for your help! -Andrew ---------------------------------------- Andrew Fife Untangle - Open Source Security Gateway download.untangle.com 650.425.3327 (O) 415.806.6028 (C) afife at untangle.com From quinn at fairpath.com Fri Feb 29 17:05:33 2008 From: quinn at fairpath.com (Quinn Weaver) Date: Fri, 29 Feb 2008 17:05:33 -0800 Subject: [sf-perl] The Perl College Message-ID: <20080301010533.GA65885@fu.funkspiel.org> Just got this. I can't vouch for the quality one way or another, but it's interesting news. ----- Forwarded message from Uri Guttman ----- Date: Fri, 29 Feb 2008 16:29:44 -0500 From: Uri Guttman To: pm_groups at pm.org Subject: [pm_groups] Introducing The Perl College hi all pm leaders, please forward to your local pm lists if you deem it appropriate. thanx, uri What is the Perl College? The Perl College is a creative merger of job training and job fairs. Here are its primary goals: * Provide free top quality training to qualified junior level Perl developers * Improve their Perl skills to the intermediate level * Match the new graduates with Perl jobs in the hiring companies * http://perlhunter.com/college.html The Perl College was created to address these issues in recruiting Perl coders: * A shortage of intermediate level Perl developers * A surplus of junior level Perl developers * Some are not developing Perl full time * Many are looking for a career developing Perl but can't get needed training and experience * Companies lacking the resources to train Perl developers We are currently seeking both sponsors and students for this unique education/recruitment opportunity. Hiring Sponsors: Thirty great applicants - cheap! Imagine how much it would cost in both time and money to find and train a qualified applicant for your Perl jobs. The Perl College dramatically improves the efficiency of this process by pre-screening and accepting only the most motivated students. Then we take it one step further. We take those already highly motivated students and train them up to a solid intermediate level of Perl skills. Efficiency, cost effectiveness and quality results - what could be better for your Perl recruitment needs? Student Candidates: Put yourself ahead of the competition. If selected you will have a week of free training from Damian Conway (valued at $3000). Plus you will exposed to employers who are actively seeking intermediate level Perl developers. Competition to get in will be fierce so put your best foot forward. Don't wait to apply as we will take only the thirty most qualified students. For more information on The Perl College, and how to apply to be a sponsor or a student go to these pages: http://perlhunter.com/college.html http://perlhunter.com/sponsors.html http://perlhunter.com/students.html Thanks, Uri Guttman, Dean of The Perl College -- Uri Guttman ------ uri at stemsystems.com -------- http://www.sysarch.com -- ----- Perl Architecture, Development, Training, Support, Code Review ------ ----------- Search or Offer Perl Jobs ----- http://jobs.perl.org --------- --------- Gourmet Hot Cocoa Mix ---- http://bestfriendscocoa.com --------- -- Request pm.org Technical Support via support at pm.org pm_groups mailing list pm_groups at pm.org http://mail.pm.org/mailman/listinfo/pm_groups ----- End forwarded message ----- -- Quinn Weaver, independent contractor | President, San Francisco Perl Mongers http://fairpath.com/quinn/resume/ | http://sf.pm.org/ 510-520-5217 From doom at kzsu.stanford.edu Fri Feb 29 17:42:18 2008 From: doom at kzsu.stanford.edu (Joe Brenner) Date: Fri, 29 Feb 2008 17:42:18 -0800 Subject: [sf-perl] The Perl College In-Reply-To: <20080301010533.GA65885@fu.funkspiel.org> References: <20080301010533.GA65885@fu.funkspiel.org> Message-ID: <200803010142.m211gIN9001317@kzsu.stanford.edu> Same here, essentially. I can more-or-less vouch for Uri Guttman, himself, though... he's a decent perl hacker who often hangs out on comp.lang.perl.* saying intelligent things, and he's got some stuff up on CPAN: http://search.cpan.org/~uri/ In recent years he's apparently fallen into the role of being a technical recruiter as a side-line: there are some companies that are apparently impressed at his ability to identify other good perl hackers compared to your average recruiter. Go figure, eh? I can't say that I've ever had a high opinion of computer training and/or certification programs, but if he can help alleviate the "have you ever tried to hire a perl programmer?" complaint, more power to him... Quinn Weaver wrote: > Just got this. I can't vouch for the quality one way or another, but > it's interesting news. > ----- Forwarded message from Uri Guttman ----- > > Date: Fri, 29 Feb 2008 16:29:44 -0500 > From: Uri Guttman > To: pm_groups at pm.org > Subject: [pm_groups] Introducing The Perl College > > > hi all pm leaders, > > please forward to your local pm lists if you deem it appropriate. > > thanx, > > uri > > > What is the Perl College? > > The Perl College is a creative merger of job training and job > fairs. Here are its primary goals: > > * Provide free top quality training to qualified > junior level Perl developers > * Improve their Perl skills to the intermediate level > * Match the new graduates with Perl jobs in the hiring companies > * http://perlhunter.com/college.html > > The Perl College was created to address these issues in > recruiting Perl coders: > > * A shortage of intermediate level Perl developers > * A surplus of junior level Perl developers > * Some are not developing Perl full time > * Many are looking for a career developing Perl but can't get > needed training and experience > * Companies lacking the resources to train Perl developers > > We are currently seeking both sponsors and students for this > unique education/recruitment opportunity. > > Hiring Sponsors: Thirty great applicants - cheap! > > Imagine how much it would cost in both time and money to find > and train a qualified applicant for your Perl jobs. The Perl > College dramatically improves the efficiency of this process by > pre-screening and accepting only the most motivated > students. Then we take it one step further. We take those > already highly motivated students and train them up to a solid > intermediate level of Perl skills. Efficiency, cost > effectiveness and quality results - what could be better for > your Perl recruitment needs? > > Student Candidates: Put yourself ahead of the competition. > > If selected you will have a week of free training from Damian > Conway (valued at $3000). Plus you will exposed to employers who > are actively seeking intermediate level Perl developers. > Competition to get in will be fierce so put your best foot > forward. Don't wait to apply as we will take only the thirty > most qualified students. > > For more information on The Perl College, and how to apply to be a > sponsor or a student go to these pages: > > http://perlhunter.com/college.html > http://perlhunter.com/sponsors.html > http://perlhunter.com/students.html > > Thanks, > > Uri Guttman, Dean of The Perl College > > -- > Uri Guttman ------ uri at stemsystems.com -------- http://www.sysarch.com -- > ----- Perl Architecture, Development, Training, Support, Code Review ------ > ----------- Search or Offer Perl Jobs ----- http://jobs.perl.org --------- > --------- Gourmet Hot Cocoa Mix ---- http://bestfriendscocoa.com --------- > -- > Request pm.org Technical Support via support at pm.org > > pm_groups mailing list > pm_groups at pm.org > http://mail.pm.org/mailman/listinfo/pm_groups > > > ----- End forwarded message ----- > > -- > Quinn Weaver, independent contractor | President, San Francisco Perl Mongers > http://fairpath.com/quinn/resume/ | http://sf.pm.org/ > 510-520-5217 > _______________________________________________ > SanFrancisco-pm mailing list > SanFrancisco-pm at pm.org > http://mail.pm.org/mailman/listinfo/sanfrancisco-pm