From Bryan.Lane at VITALPS.COM Fri Oct 1 13:40:55 1999 From: Bryan.Lane at VITALPS.COM (Bryan Lane) Date: Thu Aug 5 00:17:34 2004 Subject: Phoenix.pm: Perl TK Message-ID: I'm working on a Perl/Tk application with the intent to learn. I have noticed on some of the widget demo applications, I get GPF's. I am running Windows NT 4.0. Is there some restrictions in using Perl/Tk with NT? If someone has any thoughts on this, it would be great to hear. Thanks, Bryan From doug.miles at bpxinternet.com Fri Oct 1 13:59:14 1999 From: doug.miles at bpxinternet.com (Douglas E. Miles) Date: Thu Aug 5 00:17:34 2004 Subject: Phoenix.pm: Perl TK References: Message-ID: <37F50482.60747D7B@bpxinternet.com> Bryan Lane wrote: > > I'm working on a Perl/Tk application with the intent > to learn. I have noticed on some of the widget demo > applications, I get GPF's. I am running Windows NT 4.0. > Is there some restrictions in using Perl/Tk with NT? If > someone has any thoughts on this, it would be great to > hear. Send the code to me (doug.miles@bpxinternet.com),and I'll take a look. I haven't done Tk on NT, but I have on 95 w/ no problems. -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 From sharding at mekla.com Fri Oct 1 20:49:40 1999 From: sharding at mekla.com (Shay Harding) Date: Thu Aug 5 00:17:34 2004 Subject: Phoenix.pm: Perl TK References: Message-ID: <99100118511300.16211@cx949622-b.poria1.az.home.com> >I'm working on a Perl/Tk application with the intent >to learn. I have noticed on some of the widget demo >applications, I get GPF's. I am running Windows NT 4.0. >Is there some restrictions in using Perl/Tk with NT? If >someone has any thoughts on this, it would be great to >hear. > >Thanks, >Bryan Being a pure UNIX freak, you don't want to know my thoughts on anything working with NT :) Shay From Beaves at aol.com Sun Oct 3 20:38:53 1999 From: Beaves at aol.com (Beaves@aol.com) Date: Thu Aug 5 00:17:34 2004 Subject: Phoenix.pm: Symbol Tables Message-ID: <3c180106.25295f2d@aol.com> I have a situation where I would like to know if a certain subroutine name has already been defined. Do any of you guys know how to check the symbol tables for that? I have tried a few typeglob solutions but none seem to work. I know that I can eval the code and then check the existence of error messages ($@), but I'd rather not. I thought I found the answer on page 282 of the "Camel Book". But checking the definedness of: *main::load_email{CODE} did not test as I'd expect. Any solutions? Also, I'm beta testing my Internet Contact Manager. If you're curious and would like to try to spoof the script (hopefully unsucessfully), you can add yourself to the database and test it out. The email address will have to be legit to get a password, but all the other stuff can be as phony as you'd like. The script sort of showcases all the packages that I have been working on for the past 6 months or so, since I started on my OOP kick. All the HTML is generated with Tag.pm and all of the form variable processing is done with FormVar.pm Tell me what you think. http://www.azwebs.com/cgi-local/ICM/amd/amd.cgi The user side (database searching and mass emailing) is my next step to completing the project. This also could be modified to serve as the Phoenix PM email contact and member list in the future... Hopefully I'll be able to see some of y'all on the meeting on the 5th. Tim From edelsys at edelsys.com Sun Oct 3 21:01:14 1999 From: edelsys at edelsys.com (EdelSys Consulting) Date: Thu Aug 5 00:17:34 2004 Subject: Phoenix.pm: Symbol Tables In-Reply-To: <3c180106.25295f2d@aol.com> Message-ID: <3.0.6.32.19991003190114.008c25b0@swlink.net> At 09:38 PM 10/03/1999 EDT, you wrote: You piqued my curiosity on this one. So, I wrote a little symbol table dumper: --- package blah; my $a = 'a'; my $b = 'b'; local $d = ''; sub c { my($c,$d)=@_; return($c+$d); } my $name = ''; foreach $name ( keys(%blah::) ) { print("$name\n"); } exit(0); --- For package main (default package), use %main:: Advanced Perl Programming book has a more involved dumper. Tony >I have a situation where I would like to know if a certain subroutine name >has already been defined. Do any of you guys know how to check the symbol >tables for that? I have tried a few typeglob solutions but none seem to >work. I know that I can eval the code and then check the existence of error >messages ($@), but I'd rather not. > >I thought I found the answer on page 282 of the "Camel Book". But checking >the definedness of: > *main::load_email{CODE} >did not test as I'd expect. > >Any solutions? > >Also, I'm beta testing my Internet Contact Manager. If you're curious and >would like to try to spoof the script (hopefully unsucessfully), you can add >yourself to the database and test it out. The email address will have to be >legit to get a password, but all the other stuff can be as phony as you'd >like. > >The script sort of showcases all the packages that I have been working on for >the past 6 months or so, since I started on my OOP kick. All the HTML is >generated with Tag.pm and all of the form variable processing is done with >FormVar.pm > >Tell me what you think. > >http://www.azwebs.com/cgi-local/ICM/amd/amd.cgi > >The user side (database searching and mass emailing) is my next step to >completing the project. This also could be modified to serve as the Phoenix >PM email contact and member list in the future... > >Hopefully I'll be able to see some of y'all on the meeting on the 5th. > >Tim > From mekla at geocities.com Sun Oct 3 22:15:31 1999 From: mekla at geocities.com (Shay Harding) Date: Thu Aug 5 00:17:34 2004 Subject: Phoenix.pm: Symbol Tables In-Reply-To: <3c180106.25295f2d@aol.com> References: <3c180106.25295f2d@aol.com> Message-ID: <99100320334500.26730@cx949622-b.poria1.az.home.com> >I have a situation where I would like to know if a certain subroutine name >has already been defined. Do any of you guys know how to check the symbol >tables for that? I have tried a few typeglob solutions but none seem to >work. I know that I can eval the code and then check the existence of error >messages ($@), but I'd rather not. > >I thought I found the answer on page 282 of the "Camel Book". But checking >the definedness of: > *main::load_email{CODE} >did not test as I'd expect. > >Any solutions? As suggested in another message, just loop through your 'main' (either %main:: or %::) namespace and look for the sub-routine name: ------------------------------------------------------------ my $find = "mysub"; my $find1 = "mysu"; is_sub_defined($find) ? print "$find is defined\n" : print "$find is not defined\n"; is_sub_defined($find1) ? print "$find1 is defined\n" : print "$find1 is not defined\n"; sub mysub(){ my $x = 10; } sub is_sub_defined(){ my ($sub) = @_; for my $keys (keys %::){ return 1 if $keys eq $sub; } return 0; } ------------------------------------------------------------------ One thing to note when working with the symbol table is that any variables declared via 'my' do not get symbol table entries so if you loop through it trying to find such a variable, or try to hack such a variable this way you will find it difficult. Just an FYI. Shay From doug.miles at bpxinternet.com Mon Oct 4 10:44:31 1999 From: doug.miles at bpxinternet.com (Douglas E. Miles) Date: Thu Aug 5 00:17:34 2004 Subject: Phoenix.pm: Meeting 10/05/1999 Reminder References: <37EFEA0F.945F5F74@bpxinternet.com> Message-ID: <37F8CB5F.FF4177AB@bpxinternet.com> Here's a reminder for the meeting tomorrow night. Please RSVP to doug.miles@bpxinternet.com so we can have enought refreshments. Thanks, and hope to see you there! "Douglas E. Miles" wrote: > > We'll be having a Phoenix.pm meeting Tuesday October 5th at 7:00PM. > It will be held at Bowne, which is located at 1500 N. Central Avenue, > which is on the Southwest corner of Central and McDowell. The parking > lot is gated, so just press the button on the intercom, and tell the > receptionist that you are there for the Perl meeting. Park in the lot > that is straight ahead from the entrance on the South side of McDowell. > Park in any uncovered, non-reserved space. Proceed to the main lobby, > which is on the Northeast side of the parking lot. > > I will be presenting Perl 101: The Anatomy of a Camel. If you don't > know much Perl, please try to make this meeting (and invite a friend). > If you know a lot about Perl, come and help/heckle me (and get some > free refreshments). :) We will also discuss the web site. -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 From Bryan.Lane at VITALPS.COM Mon Oct 4 11:38:20 1999 From: Bryan.Lane at VITALPS.COM (Bryan Lane) Date: Thu Aug 5 00:17:34 2004 Subject: Phoenix.pm: Meeting 10/05/1999 Reminder Message-ID: I will be there. -----Original Message----- From: Douglas E. Miles [mailto:doug.miles@bpxinternet.com] Sent: Monday, October 04, 1999 8:45 AM To: phoenix-pm-list@happyfunball.pm.org Cc: Rose Keys Subject: Phoenix.pm: Meeting 10/05/1999 Reminder Here's a reminder for the meeting tomorrow night. Please RSVP to doug.miles@bpxinternet.com so we can have enought refreshments. Thanks, and hope to see you there! "Douglas E. Miles" wrote: > > We'll be having a Phoenix.pm meeting Tuesday October 5th at 7:00PM. > It will be held at Bowne, which is located at 1500 N. Central Avenue, > which is on the Southwest corner of Central and McDowell. The parking > lot is gated, so just press the button on the intercom, and tell the > receptionist that you are there for the Perl meeting. Park in the lot > that is straight ahead from the entrance on the South side of McDowell. > Park in any uncovered, non-reserved space. Proceed to the main lobby, > which is on the Northeast side of the parking lot. > > I will be presenting Perl 101: The Anatomy of a Camel. If you don't > know much Perl, please try to make this meeting (and invite a friend). > If you know a lot about Perl, come and help/heckle me (and get some > free refreshments). :) We will also discuss the web site. -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 From Beaves at aol.com Mon Oct 4 11:59:06 1999 From: Beaves at aol.com (Beaves@aol.com) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Symbol Tables part deu Message-ID: <7031bd45.252a36da@aol.com> Thanks for the two code examples. But the only problem that I can see is if there were also a variable of the same name, then this would also test positive. So, more specifically, can I test to see if the {CODE} portion of the symbol table is filled for a specific name? This problem occurs in a package I'm building. Here, you cannot necessarily guarantee that the user of your package is smart enough to not use the same name for both a subroutine and something else. Of course, that could be a stiplulation in the documentation, but I thought I'd be able to get around that with some fancy knowledge of the tables. So, let's say if you wrote: $load_email = 1; # perhaps a flag but NEVER wrote: sub load_email { return 1 } The code examples in the replies would still return true, because the name exists in the table, but its the {SCALAR} portion of the symbol table hash that is filled, not the {CODE} portion. Does this make sense so far? This may be a stupid and minor 'problem' with other workarounds, but I feel that if I work around it, then I may be missing a major concept as to the inner workings of Perl. Thanks, Tim (P.S. As a further brain teaser: I know you can delete a symbol from the symbol table, as you can with any other hash. But can you delete just the {CODE} portion of the symbol table of a particular name? But of course, if the first dillemma is figured out, then this will probably be answered at the same time...) From mekla at geocities.com Mon Oct 4 19:08:06 1999 From: mekla at geocities.com (Shay Harding) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Meeting 10/05/1999 Reminder In-Reply-To: <37F8CB5F.FF4177AB@bpxinternet.com> References: <37EFEA0F.945F5F74@bpxinternet.com> <37F8CB5F.FF4177AB@bpxinternet.com> Message-ID: <99100417084801.05246@shay.cwie.net> I'll be there so don't expect a lot of people :) Shay > Here's a reminder for the meeting tomorrow night. Please RSVP to > doug.miles@bpxinternet.com so we can have enought refreshments. Thanks, > and hope to see you there! > > "Douglas E. Miles" wrote: From dmiles at primenet.com Mon Oct 4 20:02:33 1999 From: dmiles at primenet.com (Doug and Julie Miles) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Meeting 10/05/1999 Reminder In-Reply-To: <99100417084801.05246@shay.cwie.net> References: <37F8CB5F.FF4177AB@bpxinternet.com> <37EFEA0F.945F5F74@bpxinternet.com> <37F8CB5F.FF4177AB@bpxinternet.com> Message-ID: <3.0.3.32.19991004180233.00885740@pop.primenet.com> At 05:08 PM 10/4/99 -0700, you wrote: >I'll be there so don't expect a lot of people :) I think we'll kill the bad karma this time! :) From mekla at geocities.com Mon Oct 4 22:30:33 1999 From: mekla at geocities.com (Shay Harding) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Symbol Tables part deu In-Reply-To: <99100417080100.05246@shay.cwie.net> References: <99100417080100.05246@shay.cwie.net> Message-ID: <99100423094900.27362@cx949622-b.poria1.az.home.com> >Thanks for the two code examples. > >But the only problem that I can see is if there were also a variable of the >same name, then this would also test positive. So, more specifically, can I >test to see if the {CODE} portion of the symbol table is filled for a >specific name? Hey, this is Perl. Of course you can! :) > >This may be a stupid and minor 'problem' with other workarounds, but I feel >that if I work around it, then I may be missing a major concept as to the >inner workings of Perl. Reference the Devel::* modules to learn more. Here is a piece of code that may guide you in the right direction: --------------------- START OF CODE -------------------------------- #!/usr/bin/perl5 system "clear"; package A; $risk = "Help"; @risk = qw(HelpA); %risk = ('1' => 'a', '2' => 'b', '3' => 'c'); sub risk(){ return hex($_[0]); } open (RISK,">test.txt"); package B; while (($key,$val) = each(%{*{"A\::"}})) { local(*ENTRY) = $val; #### SCALAR #### if (defined $val && defined *ENTRY{SCALAR}) { print "$key => $val (SCALAR)\n"; } #### ARRAY #### if (defined $val && defined *ENTRY{ARRAY}) { print "$key => $val (ARRAY)\n"; } #### HASH #### if (defined $val && defined *ENTRY{HASH} && $key !~ /::/) { print "$key => $val (HASH)\n"; } #### FUNCTION #### if (defined $val && defined *ENTRY{CODE}) { print "$key => $val (CODE)\n"; } #### IO #### if ($] > 5.003_10){ if (defined $val && defined *ENTRY{IO}){ print "$key => $val (IO)\n"; } } else{ #### FILEHANDLE #### if (defined fileno(ENTRY)){ print "$key => $val (FILEHANDLE)\n"; } #### DIRHANDLE #### elsif (defined telldir(ENTRY)){ print "$key => $val (DIRHANDLE)\n"; } } } ------------------------- END OF CODE --------------------------- >Thanks, > >Tim > >(P.S. As a further brain teaser: I know you can delete a symbol from the >symbol table, as you can with any other hash. But can you delete just the >{CODE} portion of the symbol table of a particular name? But of course, if >the first dillemma is figured out, then this will probably be answered at the >same time...) Not sure if you can pick and choose to delete one part of the symbol table especially if you have a scalar and sub with the same name. This is because the entry in the symbol table is basically a pointer to the actual values (a typeglob): *some_name -> $some_name -> &some_name They all basically carry the same name as far as Perl is concerned, however since there are multiple pointers from one typeglob to the many actual values, it stands to reason that the typeglob be some sort of hash table (mini-symbol table) in of itself with internal IDs as keys. So maybe they can be dereferenced somehow, although I am not sure how? If you try to get the value you get something like: *PACKAGE::some_name but it won't dereference the value of a particular type. Maybe some construct like: ${*{"PACKAGE\::some_name"}} @{*{"PACKAGE\::some_name"}} etc Don't know, haven't tried it yet. If you figure it out let me know. ------- Shay From Beaves at aol.com Tue Oct 5 01:17:15 1999 From: Beaves at aol.com (Beaves@aol.com) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Symbol Tables part deu Message-ID: Thanks!!! This is EXACTLY what I was looking for. I just couldn't get it to work with my approach. I was not assigning the 'value' part of the symbol table hash to a local typeblog variable (*ENTRY, in your example). I think Symbol Tables (and in my case, the whole concept of typeglobs) would be an excellent Perl 101 discussion for one of the upcoming meetings. I appreciate your time, and I hope others have benefitted as well... Tim From mpjbell at softhome.net Tue Oct 5 08:10:59 1999 From: mpjbell at softhome.net (Marty Bell) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Meeting 10/05/1999 Reminder Message-ID: <3.0.32.19991005061058.00752868@pop.SoftHome.net> I'll be there, also my son Nathan. Marty At 08:44 AM 10/4/99 -0700, you wrote: >Here's a reminder for the meeting tomorrow night. Please RSVP to >doug.miles@bpxinternet.com so we can have enought refreshments. Thanks, >and hope to see you there! > >"Douglas E. Miles" wrote: >> >> We'll be having a Phoenix.pm meeting Tuesday October 5th at 7:00PM. >> It will be held at Bowne, which is located at 1500 N. Central Avenue, >> which is on the Southwest corner of Central and McDowell. The parking >> lot is gated, so just press the button on the intercom, and tell the >> receptionist that you are there for the Perl meeting. Park in the lot >> that is straight ahead from the entrance on the South side of McDowell. >> Park in any uncovered, non-reserved space. Proceed to the main lobby, >> which is on the Northeast side of the parking lot. >> >> I will be presenting Perl 101: The Anatomy of a Camel. If you don't >> know much Perl, please try to make this meeting (and invite a friend). >> If you know a lot about Perl, come and help/heckle me (and get some >> free refreshments). :) We will also discuss the web site. > >-- >People understand instinctively that the best way for computer >programs to communicate with each other is for each of the them >to be strict in what they emit, and liberal in what they accept. >The odd thing is that people themselves are not willing to be >strict in how they speak, and liberal in how they listen. >--Larry Wall, 2nd State of the Onion Address, August 1998 > > From doug.miles at bpxinternet.com Tue Oct 5 10:22:44 1999 From: doug.miles at bpxinternet.com (Douglas E. Miles) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Symbol Tables part deu References: Message-ID: <37FA17C4.ABC17E6A@bpxinternet.com> Beaves@aol.com wrote: > > Thanks!!! This is EXACTLY what I was looking for. I just couldn't get it to > work with my approach. I was not assigning the 'value' part of the symbol > table hash to a local typeblog variable (*ENTRY, in your example). > > I think Symbol Tables (and in my case, the whole concept of typeglobs) would > be an excellent Perl 101 discussion for one of the upcoming meetings. I think that it would be an excellent topic. (A little above 101 though. :) ) Any volunteers? > I appreciate your time, and I hope others have benefitted as well... > > Tim -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 From mekla at geocities.com Tue Oct 5 17:34:48 1999 From: mekla at geocities.com (Shay Harding) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Symbol Tables part deu In-Reply-To: <37FA17C4.ABC17E6A@bpxinternet.com> References: <37FA17C4.ABC17E6A@bpxinternet.com> Message-ID: <99100515394200.07118@shay.cwie.net> > Beaves@aol.com wrote: > > > > Thanks!!! This is EXACTLY what I was looking for. I just couldn't get it to > > work with my approach. I was not assigning the 'value' part of the symbol > > table hash to a local typeblog variable (*ENTRY, in your example). > > > > I think Symbol Tables (and in my case, the whole concept of typeglobs) would > > be an excellent Perl 101 discussion for one of the upcoming meetings. > > I think that it would be an excellent topic. (A little above 101 though. > :) ) Any volunteers? I was going to say the same thing (being a bit above 101). I've been messing with symbol table stuff a bit lately, but have a ways to go. Just got into dumping Perl variables with Devel::Peek and seeing what's behind the scenes. Very scary stuff. I think this topic may be a bit above any newcomers, but maybe we can make it part of a larger presentation so as not to disclude anyone or confuse to a greater extent. I know when I first started messing with Symbol tables and packages, it took me a while to figure out how to dump a given package and I've been coding Perl for more than 5 years. I just never thought to mess with the internals. Now that's about all I do is figure out how everything works. That and OO stuff in Perl. i just picked up 'Object Oriented Perl'... great book. I knew a lot about objects in Perl, but this book taught me a great deal more. Highly recommended. See you all tonight. 7pm sharp. Don't be late :) -- Shay From pablo at dosomething.org Tue Oct 5 18:31:20 1999 From: pablo at dosomething.org (Pablo Velasquez) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Symbol Tables part deu In-Reply-To: <99100515394200.07118@shay.cwie.net> References: <37FA17C4.ABC17E6A@bpxinternet.com> <37FA17C4.ABC17E6A@bpxinternet.com> Message-ID: <3.0.6.32.19991005163120.00999bf0@mail.dosomething.org> Hi, What's the name of that book? I just began with perltoot so I'm quite new to OO... I'll ask you tonight at the meeting :) -Pablo >That and OO stuff in Perl. i >just picked up 'Object Oriented Perl'... great book. I knew a lot about objects >in Perl, but this book taught me a great deal more. Highly recommended. > >See you all tonight. 7pm sharp. Don't be late :) > >-- > >Shay > From David.Warner at feddata.com Wed Oct 6 09:52:38 1999 From: David.Warner at feddata.com (Warner, David) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Perl/Tk Debugger Message-ID: <641058580E52D311BF9800902712DCAA06B45B@mailsrv.sylvest.com> This may be of interest: I ran across the new Perl/TK debugger and installed it on my system last week. It is both a great tool for debugging and for learning Perl, since it uses Data::Dumper to display the values of all variables in your program. The tool can be found at: http://www.perl.com/CPAN/authors/id/A/AE/AEPAGE/ Note that there is an Adobe Acrobat file that contains a guide to the debugger in that directory also. I have switched from using the Activestate Perl Debugger (which cost about $99) to ptkdb, which is free, simply because it is better. Dave Warner -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/archives/phoenix-pm/attachments/19991006/39228663/attachment.htm From Bryan.Lane at VITALPS.COM Wed Oct 6 10:38:57 1999 From: Bryan.Lane at VITALPS.COM (Bryan Lane) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Perl/Tk Debugger Message-ID: Thank you David! This will come in very handy. -----Original Message----- From: Warner, David [mailto:David.Warner@feddata.com] Sent: Wednesday, October 06, 1999 7:53 AM To: 'phoenix-pm-list@happyfunball.pm.org' Subject: Phoenix.pm: Perl/Tk Debugger This may be of interest: I ran across the new Perl/TK debugger and installed it on my system last week. It is both a great tool for debugging and for learning Perl, since it uses Data::Dumper to display the values of all variables in your program. The tool can be found at: http://www.perl.com/CPAN/authors/id/A/AE/AEPAGE/ Note that there is an Adobe Acrobat file that contains a guide to the debugger in that directory also. I have switched from using the Activestate Perl Debugger (which cost about $99) to ptkdb, which is free, simply because it is better. Dave Warner From doug.miles at bpxinternet.com Wed Oct 6 10:35:27 1999 From: doug.miles at bpxinternet.com (Douglas E. Miles) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Meeting last night Message-ID: <37FB6C3F.7225ED18@bpxinternet.com> We had a great turnout last night. The best ever! (Even with Shay there ;) ) Hopefully it was educational (or at least entertaining). Any volunteers for the next meeting? Here's a list of topics I have, and will post to the web site sometime this week: David Warner: - mod_perl/apache (setup/overview/use). - CGI.pm - using databases with DBI. - perlisms (some things look different in Perl!) - object-oriented perl. - regular expressions in practical use. - using "pod" in your scripts. - Book reviews - the good, the bad, the necessary. - Web resources. - Diffs between Unix and NT Perl. Tim Beavers: - Symbol Table/Type Globs Scott Walters: - Perl/Tk If you have any to add to the list, or I have missed something you've already mentioned, send me some email. Thanks! -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 From David.Warner at feddata.com Wed Oct 6 11:14:03 1999 From: David.Warner at feddata.com (Warner, David) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Meeting last night Message-ID: <641058580E52D311BF9800902712DCAA06B45C@mailsrv.sylvest.com> Doug, Great talk last night! I can talk about either "using databases with DBI" or "mod_perl" at the next meeting, dependent upon what the group desires. Dave Warner -----Original Message----- From: Douglas E. Miles [mailto:doug.miles@bpxinternet.com] Sent: Wednesday, October 06, 1999 8:35 AM To: Phoenix.pm Subject: Phoenix.pm: Meeting last night We had a great turnout last night. The best ever! (Even with Shay there ;) ) Hopefully it was educational (or at least entertaining). Any volunteers for the next meeting? Here's a list of topics I have, and will post to the web site sometime this week: David Warner: - mod_perl/apache (setup/overview/use). - CGI.pm - using databases with DBI. - perlisms (some things look different in Perl!) - object-oriented perl. - regular expressions in practical use. - using "pod" in your scripts. - Book reviews - the good, the bad, the necessary. - Web resources. - Diffs between Unix and NT Perl. Tim Beavers: - Symbol Table/Type Globs Scott Walters: - Perl/Tk If you have any to add to the list, or I have missed something you've already mentioned, send me some email. Thanks! -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 From Bryan.Lane at VITALPS.COM Wed Oct 6 11:19:26 1999 From: Bryan.Lane at VITALPS.COM (Bryan Lane) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Meeting last night Message-ID: I vote for mod_perl as I have had some experience with DBI. Bryan -----Original Message----- From: Warner, David [mailto:David.Warner@feddata.com] Sent: Wednesday, October 06, 1999 9:14 AM To: 'phoenix-pm-list@happyfunball.pm.org' Subject: RE: Phoenix.pm: Meeting last night Doug, Great talk last night! I can talk about either "using databases with DBI" or "mod_perl" at the next meeting, dependent upon what the group desires. Dave Warner -----Original Message----- From: Douglas E. Miles [mailto:doug.miles@bpxinternet.com] Sent: Wednesday, October 06, 1999 8:35 AM To: Phoenix.pm Subject: Phoenix.pm: Meeting last night We had a great turnout last night. The best ever! (Even with Shay there ;) ) Hopefully it was educational (or at least entertaining). Any volunteers for the next meeting? Here's a list of topics I have, and will post to the web site sometime this week: David Warner: - mod_perl/apache (setup/overview/use). - CGI.pm - using databases with DBI. - perlisms (some things look different in Perl!) - object-oriented perl. - regular expressions in practical use. - using "pod" in your scripts. - Book reviews - the good, the bad, the necessary. - Web resources. - Diffs between Unix and NT Perl. Tim Beavers: - Symbol Table/Type Globs Scott Walters: - Perl/Tk If you have any to add to the list, or I have missed something you've already mentioned, send me some email. Thanks! -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 From pablo at dosomething.org Wed Oct 6 11:50:39 1999 From: pablo at dosomething.org (Pablo Velasquez) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Meeting last night In-Reply-To: Message-ID: <3.0.6.32.19991006095039.0095f430@mail.dosomething.org> Hi, I vote for mod_perl. Although, also looking forward to the DBI talk :) -Pablo At 09:19 AM 10/6/99 -0700, you wrote: >I vote for mod_perl as I have had some experience with >DBI. > >Bryan > >-----Original Message----- >From: Warner, David [mailto:David.Warner@feddata.com] >Sent: Wednesday, October 06, 1999 9:14 AM >To: 'phoenix-pm-list@happyfunball.pm.org' >Subject: RE: Phoenix.pm: Meeting last night > > >Doug, > > Great talk last night! I can talk about either "using databases >with DBI" or "mod_perl" at the next meeting, dependent upon what the >group desires. > > > Dave Warner > > >-----Original Message----- >From: Douglas E. Miles [mailto:doug.miles@bpxinternet.com] >Sent: Wednesday, October 06, 1999 8:35 AM >To: Phoenix.pm >Subject: Phoenix.pm: Meeting last night > > >We had a great turnout last night. The best ever! (Even with Shay there >;) ) Hopefully it was educational (or at least entertaining). Any >volunteers for the next meeting? Here's a list of topics I have, and >will post to the web site sometime this week: > >David Warner: >- mod_perl/apache (setup/overview/use). >- CGI.pm >- using databases with DBI. >- perlisms (some things look different in Perl!) >- object-oriented perl. >- regular expressions in practical use. >- using "pod" in your scripts. >- Book reviews - the good, the bad, the necessary. >- Web resources. >- Diffs between Unix and NT Perl. > >Tim Beavers: >- Symbol Table/Type Globs > >Scott Walters: >- Perl/Tk > >If you have any to add to the list, or I have missed something you've >already mentioned, send me some email. Thanks! > >-- >People understand instinctively that the best way for computer >programs to communicate with each other is for each of the them >to be strict in what they emit, and liberal in what they accept. >The odd thing is that people themselves are not willing to be >strict in how they speak, and liberal in how they listen. >--Larry Wall, 2nd State of the Onion Address, August 1998 > From doug.miles at bpxinternet.com Wed Oct 6 11:57:20 1999 From: doug.miles at bpxinternet.com (Douglas E. Miles) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Meeting last night References: <641058580E52D311BF9800902712DCAA06B45C@mailsrv.sylvest.com> Message-ID: <37FB7F70.AEB01AAB@bpxinternet.com> "Warner, David" wrote: > > Doug, > > Great talk last night! I can talk about either "using databases > with DBI" or "mod_perl" at the next meeting, dependent upon what the > group desires. > Thanks Dave! Submit your votes now! My humble vote is for mod_perl also. -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 From edelsys at edelsys.com Wed Oct 6 21:08:18 1999 From: edelsys at edelsys.com (EdelSys Consulting) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Meeting last night In-Reply-To: <37FB6C3F.7225ED18@bpxinternet.com> Message-ID: <3.0.6.32.19991006190818.00802230@swlink.net> At 08:35 AM 10/06/1999 -0700, you wrote: >We had a great turnout last night. The best ever! (Even with Shay there >;) ) Hopefully it was educational (or at least entertaining). Any >volunteers for the next meeting? Here's a list of topics I have, and >will post to the web site sometime this week: > >David Warner: >- mod_perl/apache (setup/overview/use). >- CGI.pm >- using databases with DBI. >- perlisms (some things look different in Perl!) >- object-oriented perl. >- regular expressions in practical use. >- using "pod" in your scripts. >- Book reviews - the good, the bad, the necessary. >- Web resources. >- Diffs between Unix and NT Perl. > >Tim Beavers: >- Symbol Table/Type Globs > >Scott Walters: >- Perl/Tk > My vote goes for more pretty girls at the meetings. =) Tony From Beaves at aol.com Wed Oct 6 23:49:06 1999 From: Beaves at aol.com (Beaves@aol.com) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: meeting recommendations Message-ID: Great meeting Doug! Your time and effort is greatly appreciated. I picked up a few pointers, and I finally met the one called "Shay." But of course, I have one small suggestion: Is there a chalkboard or dry erase board that could be rolled in or set up for our meetings? I know that for me, it doesn't matter how clear someone SAYS a line of code or a perl statement, it doesn't have nearly have the impact or emphasis as if it were WRITTEN on a board for me to see and digest. Oh, and by the way, at this stage in my career, I can safely say that I am not the one to be giving a talk about globs and Symbol Tables! Leave that (and probably every other topic) to Shay. Waiting for the World Series PM meeting.... Tim From phaedrus at endless.org Wed Oct 6 23:45:58 1999 From: phaedrus at endless.org (Phaedrus) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: meeting recommendations In-Reply-To: Message-ID: I'm sure everyone with a white board would be swearing they would trade their left kidney for an LCD projector... but for the sake of newbies, I agree (by typing or otherwise) code snippits thought of during the discussion should be made visable. This brings up another point. Why is everyone is eager to bail at 9:pm? I think if we moved the meetings to the local pub, we may find people much more willing to stick around for a while. -scott On Thu, 7 Oct 1999 Beaves@aol.com wrote: > Date: Thu, 7 Oct 1999 00:49:06 EDT > From: Beaves@aol.com > Reply-To: phoenix-pm-list@happyfunball.pm.org > To: phoenix-pm-list@happyfunball.pm.org > Subject: Phoenix.pm: meeting recommendations > > Great meeting Doug! Your time and effort is greatly appreciated. I picked > up a few pointers, and I finally met the one called "Shay." > > But of course, I have one small suggestion: Is there a chalkboard or dry > erase board that could be rolled in or set up for our meetings? I know that > for me, it doesn't matter how clear someone SAYS a line of code or a perl > statement, it doesn't have nearly have the impact or emphasis as if it were > WRITTEN on a board for me to see and digest. > > Oh, and by the way, at this stage in my career, I can safely say that I am > not the one to be giving a talk about globs and Symbol Tables! Leave that > (and probably every other topic) to Shay. > > Waiting for the World Series PM meeting.... > > Tim > From edelsys at edelsys.com Thu Oct 7 00:10:31 1999 From: edelsys at edelsys.com (EdelSys Consulting) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: meeting recommendations In-Reply-To: References: Message-ID: <3.0.6.32.19991006221031.007bb320@swlink.net> At 12:45 AM 10/07/1999 -0400, you wrote: > >I'm sure everyone with a white board would be swearing they would trade >their left kidney for an LCD projector... but for the sake of newbies, I >agree (by typing or otherwise) code snippits thought of during the >discussion should be made visable. >This brings up another point. Why is everyone is eager to bail at 9:pm? I >think if we moved the meetings to the local pub, we may find people much >more willing to stick around for a while. >-scott scott++ Tony From sinck at ip100.starwarz.org Thu Oct 7 10:22:50 1999 From: sinck at ip100.starwarz.org (David Sinck) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: meeting recommendations References: Message-ID: <14332.47818.705262.909004@ip100.starwarz.org> \_ [...] and I finally met the one called "Shay." ... He was a mean fast-codin' varmit, and he was packin' a 5.6 perl-handled gun as he rode off into the sunset. David (lol) From doug.miles at bpxinternet.com Thu Oct 7 11:20:32 1999 From: doug.miles at bpxinternet.com (Douglas E. Miles) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Perl presentations up Message-ID: <37FCC850.D00FCD95@bpxinternet.com> I have my presentation on the web site at: http://phoenix.pm.org/perl_101 I also put up Kurt's at his request at: http://phoenix.pm.org/Perl_Class I made some changes to mine based on feedback. Let me know if you have any other comments, or if I forgot something. Thanks, and enjoy! -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 From mekla at geocities.com Thu Oct 7 17:57:51 1999 From: mekla at geocities.com (Shay Harding) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: meeting recommendations In-Reply-To: References: Message-ID: <99100716191807.13388@shay.cwie.net> > Great meeting Doug! Your time and effort is greatly appreciated. I picked > up a few pointers, and I finally met the one called "Shay." Was definitely a great meeting. Most people I've seen attend yet. I still think it's a good idea to have at least 15 - 30 minutes devoted to nothing but the basic concepts of Perl and programming at the start of each meeting. I think the majority of our group is probably beginner to intermediate Perlers/programmers. Of course the definition of 'basic' is open to interpretation. This will give everyone a good foundation in order to discuss the more advanced topics like references, typeglobs, etc. Of course I always prefer a good OOP discussion :) > Oh, and by the way, at this stage in my career, I can safely say that I am > not the one to be giving a talk about globs and Symbol Tables! Leave that > (and probably every other topic) to Shay. I just know enough to be dangerous, and for sure I'm no Randal or Tom... yet :) > Waiting for the World Series PM meeting.... > > Tim -- Shay From doug.miles at bpxinternet.com Fri Oct 8 09:51:16 1999 From: doug.miles at bpxinternet.com (Douglas E. Miles) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: meeting recommendations References: <99100716191807.13388@shay.cwie.net> Message-ID: <37FE04E4.2E091DC1@bpxinternet.com> Shay Harding wrote: > > > Great meeting Doug! Your time and effort is greatly appreciated. I picked > > up a few pointers, and I finally met the one called "Shay." > > Was definitely a great meeting. Most people I've seen attend yet. I still think > it's a good idea to have at least 15 - 30 minutes devoted to nothing but the > basic concepts of Perl and programming at the start of each meeting. I think > the majority of our group is probably beginner to intermediate > Perlers/programmers. Of course the definition of 'basic' is open to > interpretation. It sounds like we have agreement here. Anyone planning to do a presentation, please include an introduction to the crucial concepts and techniques at the beginning of you presentation, to bring everyone up to speed. > This will give everyone a good foundation in order to discuss the more advanced > topics like references, typeglobs, etc. Of course I always prefer a good OOP > discussion :) > > > Oh, and by the way, at this stage in my career, I can safely say that I am > > not the one to be giving a talk about globs and Symbol Tables! Leave that > > (and probably every other topic) to Shay. > > I just know enough to be dangerous, and for sure I'm no Randal or Tom... yet :) > > > Waiting for the World Series PM meeting.... > > > > Tim > > -- > > Shay -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 From doug.miles at bpxinternet.com Fri Oct 8 09:52:35 1999 From: doug.miles at bpxinternet.com (Douglas E. Miles) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: meeting recommendations References: Message-ID: <37FE0533.AB639FF3@bpxinternet.com> Beaves@aol.com wrote: > > Great meeting Doug! Your time and effort is greatly appreciated. I picked > up a few pointers, and I finally met the one called "Shay." > > But of course, I have one small suggestion: Is there a chalkboard or dry > erase board that could be rolled in or set up for our meetings? I know that > for me, it doesn't matter how clear someone SAYS a line of code or a perl > statement, it doesn't have nearly have the impact or emphasis as if it were > WRITTEN on a board for me to see and digest. I'll see what I can do about a white board. > Oh, and by the way, at this stage in my career, I can safely say that I am > not the one to be giving a talk about globs and Symbol Tables! Leave that > (and probably every other topic) to Shay. > > Waiting for the World Series PM meeting.... Tell me when the World Series is, and I'll schedule it. ;) -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 From doug.miles at bpxinternet.com Fri Oct 8 09:58:19 1999 From: doug.miles at bpxinternet.com (Douglas E. Miles) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: meeting recommendations References: Message-ID: <37FE068B.6AE2B01C@bpxinternet.com> Phaedrus wrote: > > I'm sure everyone with a white board would be swearing they would trade > their left kidney for an LCD projector... but for the sake of newbies, I > agree (by typing or otherwise) code snippits thought of during the > discussion should be made visable. > This brings up another point. Why is everyone is eager to bail at 9:pm? I > think if we moved the meetings to the local pub, we may find people much > more willing to stick around for a while. > -scott Part of that is probably my fault. When we were meeting at AZFamily, we didn't have a computer, projector, drinks, etc. I have to stay after to clean everything up (and have a 30 min. drive to get home), so I might tend to push people out the door around 9:00. Sorry. :) We can discuss some alternatives. We have had purely social meetings in the past. If people want to suggest somewhere to have one, and there is interest, I'll schedule one. Also, If we want to locate a place nearby that people can migrate after the meeting, that would be cool too. Any other thoughts/ideas? -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 From David.Warner at feddata.com Fri Oct 8 10:09:37 1999 From: David.Warner at feddata.com (Warner, David) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: meeting recommendations Message-ID: <641058580E52D311BF9800902712DCAA06B47F@mailsrv.sylvest.com> I vote for the current setup. I have a long drive also, and need to leave at 9pm. Dave -----Original Message----- From: Douglas E. Miles [mailto:doug.miles@bpxinternet.com] Sent: Friday, October 08, 1999 7:58 AM To: phoenix-pm-list@happyfunball.pm.org Subject: Re: Phoenix.pm: meeting recommendations Phaedrus wrote: > > I'm sure everyone with a white board would be swearing they would trade > their left kidney for an LCD projector... but for the sake of newbies, I > agree (by typing or otherwise) code snippits thought of during the > discussion should be made visable. > This brings up another point. Why is everyone is eager to bail at 9:pm? I > think if we moved the meetings to the local pub, we may find people much > more willing to stick around for a while. > -scott Part of that is probably my fault. When we were meeting at AZFamily, we didn't have a computer, projector, drinks, etc. I have to stay after to clean everything up (and have a 30 min. drive to get home), so I might tend to push people out the door around 9:00. Sorry. :) We can discuss some alternatives. We have had purely social meetings in the past. If people want to suggest somewhere to have one, and there is interest, I'll schedule one. Also, If we want to locate a place nearby that people can migrate after the meeting, that would be cool too. Any other thoughts/ideas? -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/archives/phoenix-pm/attachments/19991008/faf2fddd/attachment.htm From mekla at geocities.com Mon Oct 11 09:16:23 1999 From: mekla at geocities.com (Shay Harding) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: meeting recommendations In-Reply-To: <641058580E52D311BF9800902712DCAA06B47F@mailsrv.sylvest.com> References: <641058580E52D311BF9800902712DCAA06B47F@mailsrv.sylvest.com> Message-ID: <99101107180400.01789@cx949622-b.poria1.az.home.com> I tend to agree since on these days I leave work, drive home 30 miles then drive back 40 miles so I'm about ready by 9pm to leave. Shay >I vote for the current setup. I have a long drive also, and need to leave >at 9pm. > > > Dave > > >-----Original Message----- >From: Douglas E. Miles [mailto:doug.miles@bpxinternet.com] >Sent: Friday, October 08, 1999 7:58 AM >To: phoenix-pm-list@happyfunball.pm.org >Subject: Re: Phoenix.pm: meeting recommendations > > >Phaedrus wrote: >> >> I'm sure everyone with a white board would be swearing they would trade >> their left kidney for an LCD projector... but for the sake of newbies, I >> agree (by typing or otherwise) code snippits thought of during the >> discussion should be made visable. >> This brings up another point. Why is everyone is eager to bail at 9:pm? I >> think if we moved the meetings to the local pub, we may find people much >> more willing to stick around for a while. >> -scott > >Part of that is probably my fault. When we were meeting at AZFamily, we >didn't have a computer, projector, drinks, etc. I have to stay after to >clean everything up (and have a 30 min. drive to get home), so I might >tend to push people out the door around 9:00. Sorry. :) We can discuss >some alternatives. We have had purely social meetings in the past. If >people want to suggest somewhere to have one, and there is interest, >I'll schedule one. Also, If we want to locate a place nearby that >people can migrate after the meeting, that would be cool too. Any other >thoughts/ideas? > >-- >People understand instinctively that the best way for computer >programs to communicate with each other is for each of the them >to be strict in what they emit, and liberal in what they accept. >The odd thing is that people themselves are not willing to be >strict in how they speak, and liberal in how they listen. >--Larry Wall, 2nd State of the Onion Address, August 1998 > ---------------------------------------- Content-Type: text/html; name="unnamed" Content-Transfer-Encoding: quoted-printable Content-Description: ---------------------------------------- From Bryan.Lane at VITALPS.COM Tue Oct 12 11:26:23 1999 From: Bryan.Lane at VITALPS.COM (Bryan Lane) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: meeting recommendations Message-ID: I think 9:00 is late enough for me too. I drive all the way to Apache Junction, so it take about an hour to get home. Bryan -----Original Message----- From: Shay Harding [mailto:mekla@geocities.com] Sent: Monday, October 11, 1999 7:16 AM To: phoenix-pm-list@happyfunball.pm.org Subject: RE: Phoenix.pm: meeting recommendations I tend to agree since on these days I leave work, drive home 30 miles then drive back 40 miles so I'm about ready by 9pm to leave. Shay >I vote for the current setup. I have a long drive also, and need to leave >at 9pm. > > > Dave > > >-----Original Message----- >From: Douglas E. Miles [mailto:doug.miles@bpxinternet.com] >Sent: Friday, October 08, 1999 7:58 AM >To: phoenix-pm-list@happyfunball.pm.org >Subject: Re: Phoenix.pm: meeting recommendations > > >Phaedrus wrote: >> >> I'm sure everyone with a white board would be swearing they would trade >> their left kidney for an LCD projector... but for the sake of newbies, I >> agree (by typing or otherwise) code snippits thought of during the >> discussion should be made visable. >> This brings up another point. Why is everyone is eager to bail at 9:pm? I >> think if we moved the meetings to the local pub, we may find people much >> more willing to stick around for a while. >> -scott > >Part of that is probably my fault. When we were meeting at AZFamily, we >didn't have a computer, projector, drinks, etc. I have to stay after to >clean everything up (and have a 30 min. drive to get home), so I might >tend to push people out the door around 9:00. Sorry. :) We can discuss >some alternatives. We have had purely social meetings in the past. If >people want to suggest somewhere to have one, and there is interest, >I'll schedule one. Also, If we want to locate a place nearby that >people can migrate after the meeting, that would be cool too. Any other >thoughts/ideas? > >-- >People understand instinctively that the best way for computer >programs to communicate with each other is for each of the them >to be strict in what they emit, and liberal in what they accept. >The odd thing is that people themselves are not willing to be >strict in how they speak, and liberal in how they listen. >--Larry Wall, 2nd State of the Onion Address, August 1998 > ---------------------------------------- Content-Type: text/html; name="unnamed" Content-Transfer-Encoding: quoted-printable Content-Description: ---------------------------------------- From phaedrus at endless.org Tue Oct 12 11:56:36 1999 From: phaedrus at endless.org (Phaedrus) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: meeting recommendations In-Reply-To: Message-ID: Pablo - If I remember correctly, you were considering putting together a Tempe group. I believe I would be interested in this. Keep me posted on any progress there. Also, keep me (us?) posted on the plan to put together a college course on Perl. thanks =) -scott On Tue, 12 Oct 1999, Bryan Lane wrote: > Date: Tue, 12 Oct 1999 09:26:23 -0700 > From: Bryan Lane > Reply-To: phoenix-pm-list@happyfunball.pm.org > To: "'phoenix-pm-list@happyfunball.pm.org'" > Subject: RE: Phoenix.pm: meeting recommendations > > I think 9:00 is late enough for me too. I drive > all the way to Apache Junction, so it take about > an hour to get home. > > Bryan > > -----Original Message----- > From: Shay Harding [mailto:mekla@geocities.com] > Sent: Monday, October 11, 1999 7:16 AM > To: phoenix-pm-list@happyfunball.pm.org > Subject: RE: Phoenix.pm: meeting recommendations > > > I tend to agree since on these days I leave work, drive home 30 miles then > drive back 40 miles so I'm about ready by 9pm to leave. > > > Shay > > > >I vote for the current setup. I have a long drive also, and need to leave > >at 9pm. > > > > > > Dave > > > > > >-----Original Message----- > >From: Douglas E. Miles [mailto:doug.miles@bpxinternet.com] > >Sent: Friday, October 08, 1999 7:58 AM > >To: phoenix-pm-list@happyfunball.pm.org > >Subject: Re: Phoenix.pm: meeting recommendations > > > > > >Phaedrus wrote: > >> > >> I'm sure everyone with a white board would be swearing they would trade > >> their left kidney for an LCD projector... but for the sake of newbies, I > >> agree (by typing or otherwise) code snippits thought of during the > >> discussion should be made visable. > >> This brings up another point. Why is everyone is eager to bail at 9:pm? I > >> think if we moved the meetings to the local pub, we may find people much > >> more willing to stick around for a while. > >> -scott > > > >Part of that is probably my fault. When we were meeting at AZFamily, we > >didn't have a computer, projector, drinks, etc. I have to stay after to > >clean everything up (and have a 30 min. drive to get home), so I might > >tend to push people out the door around 9:00. Sorry. :) We can discuss > >some alternatives. We have had purely social meetings in the past. If > >people want to suggest somewhere to have one, and there is interest, > >I'll schedule one. Also, If we want to locate a place nearby that > >people can migrate after the meeting, that would be cool too. Any other > >thoughts/ideas? > > > >-- > >People understand instinctively that the best way for computer > >programs to communicate with each other is for each of the them > >to be strict in what they emit, and liberal in what they accept. > >The odd thing is that people themselves are not willing to be > >strict in how they speak, and liberal in how they listen. > >--Larry Wall, 2nd State of the Onion Address, August 1998 > > > > ---------------------------------------- > Content-Type: text/html; name="unnamed" > Content-Transfer-Encoding: quoted-printable > Content-Description: > ---------------------------------------- > From janis at primenet.com Tue Oct 12 12:14:11 1999 From: janis at primenet.com (HJM) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: meeting recommendations In-Reply-To: Message-ID: Maybe we'll have to arrange a picnic or other gathering sometime in the near future... something informal could be fun. Living in Mesa, I can sympathise with folks who need to get home before they turn into pumpkins, but it would also be nice to have time to go off on fascinating tangents, and the like. Can't get enough Perl! Heather =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= On Tue, 12 Oct 1999, Bryan Lane wrote: /I think 9:00 is late enough for me too. I drive /all the way to Apache Junction, so it take about /an hour to get home. / /Bryan / /-----Original Message----- /From: Shay Harding [mailto:mekla@geocities.com] /Sent: Monday, October 11, 1999 7:16 AM /To: phoenix-pm-list@happyfunball.pm.org /Subject: RE: Phoenix.pm: meeting recommendations / / /I tend to agree since on these days I leave work, drive home 30 miles then /drive back 40 miles so I'm about ready by 9pm to leave. / / /Shay / / />I vote for the current setup. I have a long drive also, and need to leave />at 9pm. /> /> /> Dave /> /> />-----Original Message----- />From: Douglas E. Miles [mailto:doug.miles@bpxinternet.com] />Sent: Friday, October 08, 1999 7:58 AM />To: phoenix-pm-list@happyfunball.pm.org />Subject: Re: Phoenix.pm: meeting recommendations /> /> />Phaedrus wrote: />> />> I'm sure everyone with a white board would be swearing they would trade />> their left kidney for an LCD projector... but for the sake of newbies, I />> agree (by typing or otherwise) code snippits thought of during the />> discussion should be made visable. />> This brings up another point. Why is everyone is eager to bail at 9:pm? I />> think if we moved the meetings to the local pub, we may find people much />> more willing to stick around for a while. />> -scott /> />Part of that is probably my fault. When we were meeting at AZFamily, we />didn't have a computer, projector, drinks, etc. I have to stay after to />clean everything up (and have a 30 min. drive to get home), so I might />tend to push people out the door around 9:00. Sorry. :) We can discuss />some alternatives. We have had purely social meetings in the past. If />people want to suggest somewhere to have one, and there is interest, />I'll schedule one. Also, If we want to locate a place nearby that />people can migrate after the meeting, that would be cool too. Any other />thoughts/ideas? /> />-- />People understand instinctively that the best way for computer />programs to communicate with each other is for each of the them />to be strict in what they emit, and liberal in what they accept. />The odd thing is that people themselves are not willing to be />strict in how they speak, and liberal in how they listen. />--Larry Wall, 2nd State of the Onion Address, August 1998 /> / /---------------------------------------- /Content-Type: text/html; name="unnamed" /Content-Transfer-Encoding: quoted-printable /Content-Description: /---------------------------------------- / From Ron.Giffin at motorola.com Tue Oct 12 17:20:23 1999 From: Ron.Giffin at motorola.com (Giffin Ron-P08295) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Code problem Message-ID: <01CA656A687ED211926B00805F779140A7B811@az25exm02.geg.mot.com> Hi, Ok... My fear of being a dummy is overpowered by my need to finish this script. $in_file contains 44 word columns separated by tabs. open ( IN_FILE, $in_file ) || die ........ open ( OUT_FILE, "> $out_file" ) || die ....... while ( ) { print OUT_FILE $_ ; $size = `wc -w $out_file | tr -s " " | cut -f1 -d " "` ; print "Unix word count = $size\n" ; } close .... close .... $size is always 0 ---- What's wrong with this ( bet I going to be embarrassed ) -- Ron From Beaves at aol.com Tue Oct 12 17:38:15 1999 From: Beaves at aol.com (Beaves@aol.com) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Code problem Message-ID: <0.e682b28.25351257@aol.com> First, (so that I might learn something as well) what is it that you are trying to do, and more specifically, what is the reason for the two backticks? My best guess is that the right side of the expression is returning a null list. If guess is correct, then the scalar value on the left will always be zero. (the number of elements in the null list) But of course, this is only just a guess. And it probably does not help that much to boot... Tim From kev at primenet.com Tue Oct 12 17:38:34 1999 From: kev at primenet.com (Kevin Buettner) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Code problem In-Reply-To: Giffin Ron-P08295 "Phoenix.pm: Code problem" (Oct 12, 3:20pm) References: <01CA656A687ED211926B00805F779140A7B811@az25exm02.geg.mot.com> Message-ID: <991012223834.ZM27339@saguaro.lan> On Oct 12, 3:20pm, Giffin Ron-P08295 wrote: > Ok... My fear of being a dummy is overpowered by my need to > finish this script. $in_file contains 44 word columns separated > by tabs. > > open ( IN_FILE, $in_file ) || die ........ > open ( OUT_FILE, "> $out_file" ) || die ....... > while ( ) > { > print OUT_FILE $_ ; > $size = `wc -w $out_file | tr -s " " | cut -f1 -d " "` ; > print "Unix word count = $size\n" ; > } > close .... > close .... > > $size is always 0 ---- What's wrong with this ( bet I going to be > embarrassed ) How big are the files that you're trying it on? My guess is that the buffer is not getting flushed. You might try doing OUT_FILE->autoflush(1); after opening it. (You'll also have to add a "use FileHandle;" line.) BTW, there are better ways of keeping track of the number of words written out. I would just let perl count them for you; e.g, try doing $size += split; Kevin -- Kevin Buettner kev@primenet.com, kevinb@cygnus.com From Ron.Giffin at motorola.com Tue Oct 12 17:53:10 1999 From: Ron.Giffin at motorola.com (Giffin Ron-P08295) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Code problem Message-ID: <01CA656A687ED211926B00805F779140A7B813@az25exm02.geg.mot.com> The grave quotes are used to return the value from the commands executed inside them. I don't think the list is null. Just that the file seems to have 0 size when the wc is executed. -----Original Message----- From: Beaves@aol.com [mailto:Beaves@aol.com] Sent: Tuesday, October 12, 1999 3:38 PM To: phoenix-pm-list@happyfunball.pm.org Subject: Re: Phoenix.pm: Code problem First, (so that I might learn something as well) what is it that you are trying to do, and more specifically, what is the reason for the two backticks? My best guess is that the right side of the expression is returning a null list. If guess is correct, then the scalar value on the left will always be zero. (the number of elements in the null list) But of course, this is only just a guess. And it probably does not help that much to boot... Tim From Ron.Giffin at motorola.com Tue Oct 12 18:00:19 1999 From: Ron.Giffin at motorola.com (Giffin Ron-P08295) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Code problem Message-ID: <01CA656A687ED211926B00805F779140A7B814@az25exm02.geg.mot.com> Kevin, I am using some system calls inside Perl and sometimes encountering unexpected row (record) sizes, therefore I wanted to write a script to see how Unix sees the line and how Perl sees the line. When wc is executed the file size seems to be 0 - doesn't make sense to me. -- Ron -----Original Message----- From: Kevin Buettner [mailto:kev@primenet.com] Sent: Tuesday, October 12, 1999 3:39 PM To: phoenix-pm-list@happyfunball.pm.org Subject: Re: Phoenix.pm: Code problem On Oct 12, 3:20pm, Giffin Ron-P08295 wrote: > Ok... My fear of being a dummy is overpowered by my need to > finish this script. $in_file contains 44 word columns separated > by tabs. > > open ( IN_FILE, $in_file ) || die ........ > open ( OUT_FILE, "> $out_file" ) || die ....... > while ( ) > { > print OUT_FILE $_ ; > $size = `wc -w $out_file | tr -s " " | cut -f1 -d " "` ; > print "Unix word count = $size\n" ; > } > close .... > close .... > > $size is always 0 ---- What's wrong with this ( bet I going to be > embarrassed ) How big are the files that you're trying it on? My guess is that the buffer is not getting flushed. You might try doing OUT_FILE->autoflush(1); after opening it. (You'll also have to add a "use FileHandle;" line.) BTW, there are better ways of keeping track of the number of words written out. I would just let perl count them for you; e.g, try doing $size += split; Kevin -- Kevin Buettner kev@primenet.com, kevinb@cygnus.com From phaedrus at endless.org Tue Oct 12 18:06:38 1999 From: phaedrus at endless.org (Phaedrus) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Code problem In-Reply-To: <01CA656A687ED211926B00805F779140A7B811@az25exm02.geg.mot.com> Message-ID: On Tue, 12 Oct 1999, Giffin Ron-P08295 wrote: > open ( IN_FILE, $in_file ) || die ........ > open ( OUT_FILE, "> $out_file" ) || die ....... > while ( ) > { > print OUT_FILE $_ ; > $size = `wc -w $out_file | tr -s " " | cut -f1 -d " "` ; Try -f2. The output of tr is something like " 199 file ". As far as (my) cut is concerned, the first field is "blank". That should do'er. Cheers! -scott > print "Unix word count = $size\n" ; > } > close .... > close .... > > $size is always 0 ---- What's wrong with this ( bet I going to be > embarrassed ) > > > -- Ron > > From kev at primenet.com Tue Oct 12 18:25:59 1999 From: kev at primenet.com (Kevin Buettner) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Code problem In-Reply-To: Giffin Ron-P08295 "RE: Phoenix.pm: Code problem" (Oct 12, 4:00pm) References: <01CA656A687ED211926B00805F779140A7B814@az25exm02.geg.mot.com> Message-ID: <991012232559.ZM27488@saguaro.lan> Reread the first part of my message. I think the problem is that the output buffer for outfile is not getting flushed. You can use the autoflush call after opening it to make sure that it gets flushed on every write. Kevin On Oct 12, 4:00pm, Giffin Ron-P08295 wrote: > Subject: RE: Phoenix.pm: Code problem > Kevin, > I am using some system calls inside Perl and sometimes > encountering unexpected row (record) sizes, therefore > I wanted to write a script to see how Unix sees the line > and how Perl sees the line. When wc is executed the file > size seems to be 0 - doesn't make sense to me. > > -- Ron > > -----Original Message----- > From: Kevin Buettner [mailto:kev@primenet.com] > Sent: Tuesday, October 12, 1999 3:39 PM > To: phoenix-pm-list@happyfunball.pm.org > Subject: Re: Phoenix.pm: Code problem > > > On Oct 12, 3:20pm, Giffin Ron-P08295 wrote: > > > Ok... My fear of being a dummy is overpowered by my need to > > finish this script. $in_file contains 44 word columns separated > > by tabs. > > > > open ( IN_FILE, $in_file ) || die ........ > > open ( OUT_FILE, "> $out_file" ) || die ....... > > while ( ) > > { > > print OUT_FILE $_ ; > > $size = `wc -w $out_file | tr -s " " | cut -f1 -d " "` ; > > print "Unix word count = $size\n" ; > > } > > close .... > > close .... > > > > $size is always 0 ---- What's wrong with this ( bet I going to be > > embarrassed ) > > How big are the files that you're trying it on? My guess is that > the buffer is not getting flushed. You might try doing > > OUT_FILE->autoflush(1); > > after opening it. (You'll also have to add a "use FileHandle;" line.) > > BTW, there are better ways of keeping track of the number of words > written out. I would just let perl count them for you; e.g, try doing > > $size += split; > > Kevin > > -- > Kevin Buettner > kev@primenet.com, kevinb@cygnus.com >-- End of excerpt from Giffin Ron-P08295 -- Kevin Buettner kev@primenet.com, kevinb@cygnus.com From Beaves at aol.com Tue Oct 12 18:32:55 1999 From: Beaves at aol.com (Beaves@aol.com) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Code problem Message-ID: <0.c97988cb.25351f27@aol.com> OK, OK!! I have to fess up that the $size assignment in Ron's code is totally and completely greek to me... $size = `wc -w $out_file | tr -s " " | cut -f1 -d " "` ; Can someone go through that assignment statement, character by character and decipher it for me (and I'm sure others)? Thanks. Feeling stupider than the original code writer by suggesting it was a returned list..., Tim From nbell at inficad.com Tue Oct 12 18:46:29 1999 From: nbell at inficad.com (Nathan Bell) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Code problem In-Reply-To: <0.c97988cb.25351f27@aol.com> Message-ID: <3.0.5.32.19991012164629.008854e0@mail.inficad.com> If anyone would like to be so gracious as to explain it, I would be very willing to listen as well. Thanks, Nathan Bell nbell@inficad.com At 19:32 10/12/99 EDT, you wrote: >OK, OK!! I have to fess up that the $size assignment in Ron's code is >totally and completely greek to me... > >$size = `wc -w $out_file | tr -s " " | cut -f1 -d " "` ; > >Can someone go through that assignment statement, character by character and >decipher it for me (and I'm sure others)? > >Thanks. > >Feeling stupider than the original code writer by suggesting it was a >returned list..., > >Tim > > > > > From phaedrus at endless.org Tue Oct 12 18:34:52 1999 From: phaedrus at endless.org (Phaedrus) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Code problem In-Reply-To: <0.c97988cb.25351f27@aol.com> Message-ID: > OK, OK!! I have to fess up that the $size assignment in Ron's code is > totally and completely greek to me... > > $size = `wc -w $out_file | tr -s " " | cut -f1 -d " "` ; > > Can someone go through that assignment statement, character by character and > decipher it for me (and I'm sure others)? > Took me a second too. I didn't know there was a 'cut' command. I usualy use 'sed' for such things =) First: ` stuff ` means, execute "stuff" in a Unix shell, and return the output from the commands. Second, |'s are pipeline operators (you probably know this much, sorry): the output from one command is sent into the input of the next command. The first command, wc, is "word count". The -w flag tells it to count words (instead of characters or lines). It returns something like: 199 outfilename This has more spaces then it needs, make it hard to process. The author wanted only the number from this, so he runs it through tr -s (translate) to nuke spaces that occured next to other spaces (if I remember correctly?). The output of that is: 199 outfilename Cut is being told, then, to take the first field, where the space " " is considered the field delimiter. The problem is, since it starts with a space, which is the field seperator, there is a null field - a field with nothing in it - as far as cut is concerned, so it returns this null field, as it was asked for the first field. Had it been asked for the second field, it would have returned the number, 199. This is more typical of bourne shell programming/csh programming/shell programming then Perl programming. Shell script usualy makes use of dozens of little unix utilities, piping input from one to the next, where as Perl is obviously all one interpriter. Hope that helps. I think I had too much caffinee, forgive my enthusiasm =) -=scott From phaedrus at endless.org Tue Oct 12 18:39:37 1999 From: phaedrus at endless.org (Phaedrus) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Code problem In-Reply-To: <991012232559.ZM27488@saguaro.lan> Message-ID: > > Reread the first part of my message. I think the problem is that > the output buffer for outfile is not getting flushed. You can > use the autoflush call after opening it to make sure that it gets > flushed on every write. > > Kevin > I read your message, Kevin. Sorry I didn't acknowledge it in my first message. For this application, the output file stream should definately be flushed, otherwise miscounts will occur, including 0's. Your right. However, if the pipeline is returning '' (absolutely nothing, 0 size string, etc), then my testing tells me this is because of the leading space on the string that cut recieves. If you don't have this problem, then its just my version of cut ;) best of luck! -scott From kev at primenet.com Tue Oct 12 18:52:06 1999 From: kev at primenet.com (Kevin Buettner) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Code problem In-Reply-To: Beaves@aol.com "Re: Phoenix.pm: Code problem" (Oct 12, 7:32pm) References: <0.c97988cb.25351f27@aol.com> Message-ID: <991012235206.ZM27578@saguaro.lan> On Oct 12, 7:32pm, Beaves@aol.com wrote: > OK, OK!! I have to fess up that the $size assignment in Ron's code is > totally and completely greek to me... > > $size = `wc -w $out_file | tr -s " " | cut -f1 -d " "` ; > > Can someone go through that assignment statement, character by character and > decipher it for me (and I'm sure others)? The backquotes cause the enclosed shell command to be executed and the assigned to $size. wc -w $outfile causes the wc command to be run on outfile. The -w switch causes it to only return the number of words. tr -s " " causes all the space characters to be squeezed together cut -f1 -d " " causes the first field to be removed where fields are delimited with space characters. Phaedrus correctly pointed out that for correct operation, the -f1 should've been a -f2. You get a null field as the first field. The | characters (vertical bars) are pipes. The output of the wc command is piped to the tr command which in turn pipes its output to the cut command. The output of this entire pipe is then given back to perl and put in $size. BTW, all of these problems could've been avoided by doing the following: $size = 0 + `wc -w`; print "Unix word count = $size\n"; It also has the advantage of running two fewer processes per iteration. (I still like split better though for counting the number of words.) Kevin -- Kevin Buettner kev@primenet.com, kevinb@cygnus.com From David.Warner at feddata.com Tue Oct 12 18:53:44 1999 From: David.Warner at feddata.com (Warner, David) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Code problem Message-ID: <641058580E52D311BF9800902712DCAA06B496@mailsrv.sylvest.com> Sure...since I went through it bit by bit a little while ago in an attempt to figure out what was wrong, I'll step up to the bat... $size will contain the result of whatever is returned by the system-level commands between the backticks (``). wc -w $outfile - a unix command to count the words in $outfile. ...which is then piped to.... tr -s " " - a unix command to replace 1+ spaces with 1 space. ...which is then piped to.... cut -f1 -d " " - a unix command to return the first field (f1), fields being delimited by a space " " I agree that the buffer is probably not getting flushed and that is why $size contains just zero, although it does bother me that I can't find one example using pipes in a backticked call. Has anyone ever used pipes in this context successfully? Hope this helps. Dave Warner -----Original Message----- From: Beaves@aol.com [mailto:Beaves@aol.com] Sent: Tuesday, October 12, 1999 4:33 PM To: phoenix-pm-list@happyfunball.pm.org Subject: Re: Phoenix.pm: Code problem OK, OK!! I have to fess up that the $size assignment in Ron's code is totally and completely greek to me... $size = `wc -w $out_file | tr -s " " | cut -f1 -d " "` ; Can someone go through that assignment statement, character by character and decipher it for me (and I'm sure others)? Thanks. Feeling stupider than the original code writer by suggesting it was a returned list..., Tim -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/archives/phoenix-pm/attachments/19991012/391faf6d/attachment.htm From phaedrus at endless.org Tue Oct 12 18:48:51 1999 From: phaedrus at endless.org (Phaedrus) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Code problem In-Reply-To: Message-ID: Wow, if I had received this much attention as a child, I may have turned out a half way stable person =) This group is awesome.. -scott From pablo at dosomething.org Tue Oct 12 19:09:40 1999 From: pablo at dosomething.org (Pablo Velasquez) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: meeting recommendations In-Reply-To: References: Message-ID: <3.0.6.32.19991012170940.00984490@mail.dosomething.org> Hi, Hum, we did have a Tempe meeting (about 3 weeks ago) but we decided it made more sense to be a part of the Phoenix group, safety in numbers type of thing :) The Perl course is going forward. I called a few people at ASU last week discussing possible guidelines for us to follow. If you find any information please let me (us?) :) know... -Pablo At 12:56 PM 10/12/99 -0400, you wrote: > >Pablo - >If I remember correctly, you were considering putting together a Tempe >group. I believe I would be interested in this. Keep me posted on any >progress there. Also, keep me (us?) posted on the plan to put together a >college course on Perl. > >thanks =) >-scott > > >On Tue, 12 Oct 1999, Bryan Lane wrote: > >> Date: Tue, 12 Oct 1999 09:26:23 -0700 >> From: Bryan Lane >> Reply-To: phoenix-pm-list@happyfunball.pm.org >> To: "'phoenix-pm-list@happyfunball.pm.org'" > >> Subject: RE: Phoenix.pm: meeting recommendations >> >> I think 9:00 is late enough for me too. I drive >> all the way to Apache Junction, so it take about >> an hour to get home. >> >> Bryan >> >> -----Original Message----- >> From: Shay Harding [mailto:mekla@geocities.com] >> Sent: Monday, October 11, 1999 7:16 AM >> To: phoenix-pm-list@happyfunball.pm.org >> Subject: RE: Phoenix.pm: meeting recommendations >> >> >> I tend to agree since on these days I leave work, drive home 30 miles then >> drive back 40 miles so I'm about ready by 9pm to leave. >> >> >> Shay >> >> >> >I vote for the current setup. I have a long drive also, and need to leave >> >at 9pm. >> > >> > >> > Dave >> > >> > >> >-----Original Message----- >> >From: Douglas E. Miles [mailto:doug.miles@bpxinternet.com] >> >Sent: Friday, October 08, 1999 7:58 AM >> >To: phoenix-pm-list@happyfunball.pm.org >> >Subject: Re: Phoenix.pm: meeting recommendations >> > >> > >> >Phaedrus wrote: >> >> >> >> I'm sure everyone with a white board would be swearing they would trade >> >> their left kidney for an LCD projector... but for the sake of newbies, I >> >> agree (by typing or otherwise) code snippits thought of during the >> >> discussion should be made visable. >> >> This brings up another point. Why is everyone is eager to bail at 9:pm? I >> >> think if we moved the meetings to the local pub, we may find people much >> >> more willing to stick around for a while. >> >> -scott >> > >> >Part of that is probably my fault. When we were meeting at AZFamily, we >> >didn't have a computer, projector, drinks, etc. I have to stay after to >> >clean everything up (and have a 30 min. drive to get home), so I might >> >tend to push people out the door around 9:00. Sorry. :) We can discuss >> >some alternatives. We have had purely social meetings in the past. If >> >people want to suggest somewhere to have one, and there is interest, >> >I'll schedule one. Also, If we want to locate a place nearby that >> >people can migrate after the meeting, that would be cool too. Any other >> >thoughts/ideas? >> > >> >-- >> >People understand instinctively that the best way for computer >> >programs to communicate with each other is for each of the them >> >to be strict in what they emit, and liberal in what they accept. >> >The odd thing is that people themselves are not willing to be >> >strict in how they speak, and liberal in how they listen. >> >--Larry Wall, 2nd State of the Onion Address, August 1998 >> > >> >> ---------------------------------------- >> Content-Type: text/html; name="unnamed" >> Content-Transfer-Encoding: quoted-printable >> Content-Description: >> ---------------------------------------- >> > From edelsys at edelsys.com Tue Oct 12 19:23:48 1999 From: edelsys at edelsys.com (EdelSys Consulting) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: meeting recommendations In-Reply-To: <3.0.6.32.19991012170940.00984490@mail.dosomething.org> References: Message-ID: <3.0.6.32.19991012172348.008639d0@swlink.net> At 05:09 PM 10/12/1999 -0700, you wrote: I was thinking about giving an informal perl seminar at A.S.U., as part of my AzTeC volunteer duties. I think after the meeting we should all head to Willow House (at 5th ave and Mcdowell, approximately.) Great coffee house. Tony >Hi, >Hum, we did have a Tempe meeting (about 3 weeks ago) but we decided it made >more sense to be a part of the Phoenix group, safety in numbers type of >thing :) > >The Perl course is going forward. I called a few people at ASU last week >discussing possible guidelines for us to follow. > >If you find any information please let me (us?) :) >know... > >-Pablo > >At 12:56 PM 10/12/99 -0400, you wrote: >> >>Pablo - >>If I remember correctly, you were considering putting together a Tempe >>group. I believe I would be interested in this. Keep me posted on any >>progress there. Also, keep me (us?) posted on the plan to put together a >>college course on Perl. >> >>thanks =) >>-scott >> >> >>On Tue, 12 Oct 1999, Bryan Lane wrote: >> >>> Date: Tue, 12 Oct 1999 09:26:23 -0700 >>> From: Bryan Lane >>> Reply-To: phoenix-pm-list@happyfunball.pm.org >>> To: "'phoenix-pm-list@happyfunball.pm.org'" >> >>> Subject: RE: Phoenix.pm: meeting recommendations >>> >>> I think 9:00 is late enough for me too. I drive >>> all the way to Apache Junction, so it take about >>> an hour to get home. >>> >>> Bryan >>> >>> -----Original Message----- >>> From: Shay Harding [mailto:mekla@geocities.com] >>> Sent: Monday, October 11, 1999 7:16 AM >>> To: phoenix-pm-list@happyfunball.pm.org >>> Subject: RE: Phoenix.pm: meeting recommendations >>> >>> >>> I tend to agree since on these days I leave work, drive home 30 miles then >>> drive back 40 miles so I'm about ready by 9pm to leave. >>> >>> >>> Shay >>> >>> >>> >I vote for the current setup. I have a long drive also, and need to leave >>> >at 9pm. >>> > >>> > >>> > Dave >>> > >>> > >>> >-----Original Message----- >>> >From: Douglas E. Miles [mailto:doug.miles@bpxinternet.com] >>> >Sent: Friday, October 08, 1999 7:58 AM >>> >To: phoenix-pm-list@happyfunball.pm.org >>> >Subject: Re: Phoenix.pm: meeting recommendations >>> > >>> > >>> >Phaedrus wrote: >>> >> >>> >> I'm sure everyone with a white board would be swearing they would trade >>> >> their left kidney for an LCD projector... but for the sake of newbies, I >>> >> agree (by typing or otherwise) code snippits thought of during the >>> >> discussion should be made visable. >>> >> This brings up another point. Why is everyone is eager to bail at >9:pm? I >>> >> think if we moved the meetings to the local pub, we may find people much >>> >> more willing to stick around for a while. >>> >> -scott >>> > >>> >Part of that is probably my fault. When we were meeting at AZFamily, we >>> >didn't have a computer, projector, drinks, etc. I have to stay after to >>> >clean everything up (and have a 30 min. drive to get home), so I might >>> >tend to push people out the door around 9:00. Sorry. :) We can discuss >>> >some alternatives. We have had purely social meetings in the past. If >>> >people want to suggest somewhere to have one, and there is interest, >>> >I'll schedule one. Also, If we want to locate a place nearby that >>> >people can migrate after the meeting, that would be cool too. Any other >>> >thoughts/ideas? >>> > >>> >-- >>> >People understand instinctively that the best way for computer >>> >programs to communicate with each other is for each of the them >>> >to be strict in what they emit, and liberal in what they accept. >>> >The odd thing is that people themselves are not willing to be >>> >strict in how they speak, and liberal in how they listen. >>> >--Larry Wall, 2nd State of the Onion Address, August 1998 >>> > >>> >>> ---------------------------------------- >>> Content-Type: text/html; name="unnamed" >>> Content-Transfer-Encoding: quoted-printable >>> Content-Description: >>> ---------------------------------------- >>> >> > -- -- Anthony R. Nemmer -- http://www.swlink.net/~edelsys -- edelsys@swlink.net -- -- EdelSys Consulting -- http://www.edelsys.com/ -- edelsys@edelsys.com -- -- EFNet IRC Teratogen -- ICQ #14638605 -- edelsys@hotmail.com -- (480) 968-6438 -- P.O. Box 1883, Tempe, Arizona 85280-1883 -- From Ron.Giffin at motorola.com Tue Oct 12 19:59:04 1999 From: Ron.Giffin at motorola.com (Giffin Ron-P08295) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Code problem Message-ID: <01CA656A687ED211926B00805F779140A7B815@az25exm02.geg.mot.com> Hi, I am going to respond to my own post as a method of summarizing the replays that I got. 1. Field 1 vs. field 2. Didn't fix the problem. Sun, HP and Linux can vary the fields slightly. (So much for standard UNIX) 2. Autoflush didn't work. Don't know enough about it to comment. 3. $size = 0 + `wc -w $output_file` Same problem, $size still 0. 4. Using pipes within grave quotes. Have code that does that well. Bottom line is when wc is run, filesize appears to really be 0. I've tried this in ksh, csh and sh, (Perl's exec shell), but within Perl, nope! I am going to give up on the idea of looking at each row in UNIX and simply use Perl. Thanx for all the replays and I liked the comment about not getting this much attention as a kid! -- Ron Ok... My fear of being a dummy is overpowered by my need to finish this script. $in_file contains 44 word columns separated by tabs. open ( IN_FILE, $in_file ) || die ........ open ( OUT_FILE, "> $out_file" ) || die ....... while ( ) { print OUT_FILE $_ ; $size = `wc -w $out_file | tr -s " " | cut -f1 -d " "` ; print "Unix word count = $size\n" ; } close .... close .... $size is always 0 ---- What's wrong with this ( bet I going to be embarrassed ) -- Ron From sinck at ip100.corp.quepasa.com Tue Oct 12 20:12:03 1999 From: sinck at ip100.corp.quepasa.com (David Sinck) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Code problem References: <01CA656A687ED211926B00805F779140A7B815@az25exm02.geg.mot.com> Message-ID: <14339.56419.161739.361921@ip100.corp.quepasa.com> \_ \_ open ( IN_FILE, $in_file ) || die ........ \_ open ( OUT_FILE, "> $out_file" ) || die ....... \_ while ( ) \_ { \_ print OUT_FILE $_ ; \_ $size = `wc -w $out_file | tr -s " " | cut -f1 -d " "` ; \_ print "Unix word count = $size\n" ; \_ } \_ close .... \_ close .... as a last hope, is $out_file a relative path'd file or is it absolute from the root? David From edelsys at edelsys.com Tue Oct 12 20:27:10 1999 From: edelsys at edelsys.com (EdelSys Consulting) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Code problem In-Reply-To: <14339.56419.161739.361921@ip100.corp.quepasa.com> References: <01CA656A687ED211926B00805F779140A7B815@az25exm02.geg.mot.com> Message-ID: <3.0.6.32.19991012182710.0087b330@swlink.net> At 06:12 PM 10/12/1999 -0700, you wrote: > > >\_ >\_ open ( IN_FILE, $in_file ) || die ........ >\_ open ( OUT_FILE, "> $out_file" ) || die ....... >\_ while ( ) >\_ { >\_ print OUT_FILE $_ ; >\_ $size = `wc -w $out_file | tr -s " " | cut -f1 -d " "` ; >\_ print "Unix word count = $size\n" ; >\_ } >\_ close .... >\_ close .... > >as a last hope, is $out_file a relative path'd file or is it absolute >from the root? > >David > try $size = `wc -w $out_file 2>&1`; and see what happens. Also, per David's comment, print $outfile too, just for grins. Tony -- -- Anthony R. Nemmer -- http://www.swlink.net/~edelsys -- edelsys@swlink.net -- -- EdelSys Consulting -- http://www.edelsys.com/ -- edelsys@edelsys.com -- -- EFNet IRC Teratogen -- ICQ #14638605 -- edelsys@hotmail.com -- (480) 968-6438 -- P.O. Box 1883, Tempe, Arizona 85280-1883 -- From Ron.Giffin at motorola.com Tue Oct 12 21:11:06 1999 From: Ron.Giffin at motorola.com (Giffin Ron-P08295) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Code problem: Final Word Message-ID: <01CA656A687ED211926B00805F779140A7B816@az25exm02.geg.mot.com> Final word on my wc problem: I guess Kevin and others were right when they said it was a buffer flush problem ( although I don't know why). I added autoflush(1) before the print and wc started working. I moved open and close of $out_file inside the loop and $size became correct. Thanx again, great support. -- Ron open ( IN_FILE, $in_file ) || die ........ open ( OUT_FILE, "> $out_file" ) || die ....... while ( ) { print OUT_FILE $_ ; $size = `wc -w $out_file | tr -s " " | cut -f1 -d " "` ; print "Unix word count = $size\n" ; } close .... close .... From doug.miles at bpxinternet.com Wed Oct 13 10:05:43 1999 From: doug.miles at bpxinternet.com (Douglas E. Miles) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: meeting recommendations References: <3.0.6.32.19991012172348.008639d0@swlink.net> Message-ID: <38049FC7.FCFF05E8@bpxinternet.com> EdelSys Consulting wrote: > > At 05:09 PM 10/12/1999 -0700, you wrote: > > I was thinking about giving an informal perl seminar > at A.S.U., as part of my AzTeC volunteer duties. > > I think after the meeting we should all head to Willow House > (at 5th ave and Mcdowell, approximately.) Great coffee house. > This is a great idea for anyone who wants to hang around after the meeting. The Willow is within walking distance from Bowne. My boss goes there so much that if he quit, they might go under. :) I'm supprised I didn't think of it. :) -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 From doug.miles at bpxinternet.com Wed Oct 13 10:27:12 1999 From: doug.miles at bpxinternet.com (Douglas E. Miles) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Meeting 10/19/1999 Message-ID: <3804A4CF.8335F98B@bpxinternet.com> We'll be having a Phoenix.pm meeting Tuesday October 19th at 7:00PM. It will be held at Bowne, which is located at 1500 N. Central Avenue, which is on the Southwest corner of Central and McDowell. The parking lot is gated, so just press the button on the intercom, and tell the receptionist that you are there for the Perl meeting. Park in the lot that is straight ahead from the entrance on the South side of McDowell. Park in any uncovered, non-reserved space. Proceed to the main lobby, which is on the Northeast side of the parking lot. David Warner will be presenting mod_perl for your delight and edification. See you all there! -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 From pablo at dosomething.org Wed Oct 13 14:19:34 1999 From: pablo at dosomething.org (Pablo Velasquez) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: meeting recommendations In-Reply-To: <38049FC7.FCFF05E8@bpxinternet.com> References: <3.0.6.32.19991012172348.008639d0@swlink.net> Message-ID: <3.0.6.32.19991013121934.00982c20@mail.dosomething.org> Hi, I was wondering if we could just go to Willow and have a "social" meeting? I certainly appreciate the instructional meetings, and am looking forward to the mod_perl, all of them. I'm just wondering if we should have a meeting to hang out...if not, that's great too. -Pablo At 08:05 AM 10/13/99 -0700, you wrote: >EdelSys Consulting wrote: >> >> At 05:09 PM 10/12/1999 -0700, you wrote: >> >> I was thinking about giving an informal perl seminar >> at A.S.U., as part of my AzTeC volunteer duties. >> >> I think after the meeting we should all head to Willow House >> (at 5th ave and Mcdowell, approximately.) Great coffee house. >> > >This is a great idea for anyone who wants to hang around after the >meeting. The Willow is within walking distance from Bowne. My boss >goes there so much that if he quit, they might go under. :) I'm >supprised I didn't think of it. :) > >-- >People understand instinctively that the best way for computer >programs to communicate with each other is for each of the them >to be strict in what they emit, and liberal in what they accept. >The odd thing is that people themselves are not willing to be >strict in how they speak, and liberal in how they listen. >--Larry Wall, 2nd State of the Onion Address, August 1998 > From doug.miles at bpxinternet.com Wed Oct 13 15:14:32 1999 From: doug.miles at bpxinternet.com (Douglas E. Miles) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: meeting recommendations References: <3.0.6.32.19991012172348.008639d0@swlink.net> <3.0.6.32.19991013121934.00982c20@mail.dosomething.org> Message-ID: <3804E828.A9E05BB1@bpxinternet.com> Pablo Velasquez wrote: > > Hi, > I was wondering if we could just go to Willow and have a "social" meeting? > > I certainly appreciate the instructional meetings, and am looking forward > to the mod_perl, all of them. > > I'm just wondering if we should have a meeting to hang out...if not, that's > great too. We can do that for the first meeting next month. We haven't had a social meeting for a while. I'll get the details together, and and announce it later. Any other venue suggestions are welcome. -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 From janis at primenet.com Wed Oct 13 15:26:14 1999 From: janis at primenet.com (Janis) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: script archive In-Reply-To: <3804E828.A9E05BB1@bpxinternet.com> from "Douglas E. Miles" at Oct 13, 99 01:14:32 pm Message-ID: <199910132026.NAA11898@usr01.primenet.com> Maybe this is common knowledge... but there's a decent script archive at http://worldwidemart.com/scripts/. Anyone interested in adding a message board or guestbook to the phx.pm site (or even their own site!) might wanna check those out before starting from scratch, they seem pretty decent. -Heather From nbell at inficad.com Wed Oct 13 20:53:54 1999 From: nbell at inficad.com (Nathan Bell) Date: Thu Aug 5 00:17:35 2004 Subject: Phoenix.pm: Newbie Question Message-ID: <3.0.5.32.19991013185354.00887aa0@mail.inficad.com> Hello Phoenix.pm! I have a (most likely) simple newbie question for anyone willing to take the time to explain it. I am wondering if http communication is built in to Perl or if a module is required. Also, any good resources on using Perl to access the web and manipulate HTML would be very much appreciated. Thanks in advnace for your time and help, Nathan Bell nbell@inficad.com From forsythe at primenet.com Wed Oct 13 22:55:58 1999 From: forsythe at primenet.com (Tran Forsythe) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Newbie Question References: <3.0.5.32.19991013185354.00887aa0@mail.inficad.com> Message-ID: <003201bf15f8$0809dcc0$0100a8c0@tran> Re: Perl & http, I assume you mean from a client basis (as opposed to making a perlish http server). If so, then check out the LWP modules (LWP::Simple does well for simple GETs, though you'll likely want to use LWP::UserAgent for things like POSTs). But nope, http isn't built into Perl as http is simply a protocol used to communicate via tcp/ip sockets (the latter capability is built into Perl however, hence the modules) And as far as good resources, I believe that the Perl Cookbook has scads of data on this topic. (I could be wrong, my copy's back at the office) Hope that helps, -Kurt ------ "Push to test." "Release to detonate." -Brad Morrison From mark at wcws.com Wed Oct 13 23:50:01 1999 From: mark at wcws.com (Mark A. Sharkey) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Perl/MySQL Message-ID: <380560F9.65ADAC70@wcws.com> Does anyone with a strong background in MySQL have the time (at least 20 hours/week) and the desire to do some part-time work from home? We are fast becoming swamped with work, and could use reliable help. We have enough work to guarantee part time employment for the next 2 months. Ideally, we are searching for someone who can work part-time for a while, and then join us as a full-time employee. Anyone interested can email me directly. Thanks, Mark -- @---------------------------@-----------------------@ | Mark A. Sharkey | mailto:mark@wcws.com | | World Class Web Sites | http://www.wcws.com | | | 800 844 4434 | | Custom CGI Scripts | 480 461 9765 | | Perl PHP MySQL JavaScript | 480 461 9312 (fax) | @---------------------------@-----------------------@ From coyotl at primenet.com Thu Oct 14 01:24:02 1999 From: coyotl at primenet.com (Glen G. Walker) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Perl/MySQL In-Reply-To: <380560F9.65ADAC70@wcws.com> Message-ID: Mark- I know nothing about MySQL but have been really wanting to learn. If you wouldn't mind a day of training (at least) I would be more than happy to chip in... On Wed, 13 Oct 1999, Mark A. Sharkey wrote: > Does anyone with a strong background in MySQL have the time > (at least 20 hours/week) and the desire to do some part-time > work from home? > > We are fast becoming swamped with work, and could use > reliable help. > > We have enough work to guarantee part time employment for > the next 2 months. Ideally, we are searching for someone > who can work part-time for a while, and then join us as a > full-time employee. > > Anyone interested can email me directly. > > Thanks, > > > Mark > > > -- > @---------------------------@-----------------------@ > | Mark A. Sharkey | mailto:mark@wcws.com | > | World Class Web Sites | http://www.wcws.com | > | | 800 844 4434 | > | Custom CGI Scripts | 480 461 9765 | > | Perl PHP MySQL JavaScript | 480 461 9312 (fax) | > @---------------------------@-----------------------@ > ------------------------------------------------------------------------------- Glen G. Walker, coyotl@primenet.com www.primenet.com/~coyotl ------------------------------------------------------------------------------- From David.Warner at feddata.com Thu Oct 14 09:50:11 1999 From: David.Warner at feddata.com (Warner, David) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Newbie Question Message-ID: <641058580E52D311BF9800902712DCAA06B49E@mailsrv.sylvest.com> Good Morning Nathan, In answer to your second question, the most popular module for manipulating HTML and writing Common Gateway Interface (CGI) scripts is CGI.pm, written by Lincoln D. Stein. A guide to the module is located at: http://search.cpan.org/doc/LDS/CGI.pm-2.56/cgi_docs.html. You can download the module from the Comprehensive Perl Archive Network (CPAN), which can be searched via http://search.cpan.org (use the search engine to the left of the screen to search for modules - the general drill-down that takes up the main part of the page is incomplete). There is also a fairly comprehensive book on CGI.pm, written by Dr. Stein. I'll bring it to the next meeting. Dave Warner -----Original Message----- From: Nathan Bell [mailto:nbell@inficad.com] Sent: Wednesday, October 13, 1999 6:54 PM To: phoenix-pm-list@happyfunball.pm.org Subject: Phoenix.pm: Newbie Question Hello Phoenix.pm! I have a (most likely) simple newbie question for anyone willing to take the time to explain it. I am wondering if http communication is built in to Perl or if a module is required. Also, any good resources on using Perl to access the web and manipulate HTML would be very much appreciated. Thanks in advnace for your time and help, Nathan Bell nbell@inficad.com -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/archives/phoenix-pm/attachments/19991014/48420661/attachment.htm From doug.miles at bpxinternet.com Thu Oct 14 13:11:27 1999 From: doug.miles at bpxinternet.com (Douglas E. Miles) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: [Fwd: A Perl Job Opportunity! (fwd)] Message-ID: <38061CCF.8A13B436@bpxinternet.com> Here's a job opportunity via me via Pablo via PLUG. Isn't community great? :) Pablo Velasquez wrote: > > Hi, > Thought you might want to see this. A job opportunity for a Perler... > > Hans is one of the organizers for the Linux group in Phoenix. > > -Pablo > > Date: Wed, 13 Oct 1999 21:01:15 -0700 (MST) > >From: LuftHans > >Subject: A Perl Opportunity! (fwd) > >X-Sender: lufthans@general3.asu.edu > >To: Pablo Velasquez > > > >Pablo, > > > >this is something the Perl group might be interested in. Thor's an employment > >agency here in town. > > > >ciao, > > > >der.hans > > > ># +++++++++++=================================+++++++++++ # > ># LuftHans@asu.edu # > ># http://home.pages.de/~lufthans/ # > ># Science is magic explained. - der.hans # > ># ===========+++++++++++++++++++++++++++++++++=========== # > > > >---------- Forwarded message ---------- > >Date: Tue, 12 Oct 1999 16:19:41 -0700 > >From: thorphx > >To: Lufthans@asu.edu > >Subject: A Perl Opportunity! > > > >Hi Hans, > > > >The opp. I briefly mentioned is an indefinate contract. They are utilizing > >Perl programming to link their UNIX and NT boxes. A Thor candidate is > >currently holding the position, but he is relocating. > > > >It's a very diverse environment, lots of different types of people are > >working together. It is another company you usually don't see people leave > >once they get in (Motorola, e.g.). > > > >They want this yesterday, and are looking for about 1+yrs experience. This > >individual needs to be a self-starter, as supervision is minimum. Also, > >security is tight. Background checks and drug screens will be conducted, as > >will extensive references. > > > >All in all, it's a great co. to work for. Very relaxed, blue jeans and polo > >atmosphere. Let me know ASAP what you find, and thank you ahead of time for > >your help! > > > >Best regards, > >Erika Hill > >The Thor Group > >3030 N. Central Ste. 1401 > >Phoenix, AZ 85012 > > > >PH (602) 230-1035 > >FX (602) 230-1066 > > > > > > > > -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 From Ron.Giffin at motorola.com Thu Oct 14 14:28:46 1999 From: Ron.Giffin at motorola.com (Giffin Ron-P08295) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: mod_perl Message-ID: <01CA656A687ED211926B00805F779140A7B819@az25exm02.geg.mot.com> Hi, I would feel more comfortable attending Tue. meeting if I knew what mod_perl is (or does). Enlightenment for this rookie. TIA. -- Ron From David.Warner at feddata.com Thu Oct 14 14:40:16 1999 From: David.Warner at feddata.com (Warner, David) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: mod_perl Message-ID: <641058580E52D311BF9800902712DCAA06B4A1@mailsrv.sylvest.com> Ron, mod_perl is an Apache web server module that: - embeds the perl interpreter into the Apache executable. - includes perl modules that provide access to most of the Apache API. - provides some web application services, such as: - session tracking. - database connection pooling. - authorization and authentication. I'll be covering all the above on Tuesday, plus some of the basics about installation, configuration and advantages/disadvantages of using mod_perl. If you want further information before then, http://perl.apache.org/guide is the best source of info on mod_perl. Hope this helps, Dave Warner -----Original Message----- From: Giffin Ron-P08295 [mailto:Ron.Giffin@motorola.com] Sent: Thursday, October 14, 1999 12:29 PM To: 'PM-Discuss' Subject: Phoenix.pm: mod_perl Hi, I would feel more comfortable attending Tue. meeting if I knew what mod_perl is (or does). Enlightenment for this rookie. TIA. -- Ron From doug.miles at bpxinternet.com Mon Oct 18 16:19:25 1999 From: doug.miles at bpxinternet.com (Douglas E. Miles) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Reminder: Meeting 10/19/1999 Message-ID: <380B8EDD.B7DAEDC4@bpxinternet.com> > We'll be having a Phoenix.pm meeting Tuesday October 19th at 7:00PM. > It will be held at Bowne, which is located at 1500 N. Central Avenue, > which is on the Southwest corner of Central and McDowell. The parking > lot is gated, so just press the button on the intercom, and tell the > receptionist that you are there for the Perl meeting. Park in the lot > that is straight ahead from the entrance on the South side of McDowell. > Park in any uncovered, non-reserved space. Proceed to the main lobby, > which is on the Northeast side of the parking lot. > > David Warner will be presenting mod_perl for your delight and > edification. See you all there! Please RSVP to me (doug.miles@bpxinternet.com) so we can get a head count. Thanks! -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 From Mark.Pease at motorola.com Mon Oct 18 16:41:49 1999 From: Mark.Pease at motorola.com (Mark Pease) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Reminder: Meeting 10/19/1999 References: <380B8EDD.B7DAEDC4@bpxinternet.com> Message-ID: <380B941D.2AB9EC4B@motorola.com> "Douglas E. Miles" wrote: > > > Please RSVP to me (doug.miles@bpxinternet.com) so we can get a head > count. Thanks! > Doug, I will be there for the first time (please be gentle :-) -- Mark Pease Mark.Pease@mototorola.com Motorola DigitalDNA(tm) Laboratories perl@perl.sps.mot.com 2100 E. Elliot Rd. Phone:(602)413-8191 Mail Stop: AZ34 EL701 Tempe, AZ 85284 Pager:(800)381-3304 FAX:(602)413-8183 Author of "Software Engineering with Perl" From doug.miles at bpxinternet.com Mon Oct 18 16:47:46 1999 From: doug.miles at bpxinternet.com (Douglas E. Miles) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Reminder: Meeting 10/19/1999 References: <380B8EDD.B7DAEDC4@bpxinternet.com> <380B941D.2AB9EC4B@motorola.com> Message-ID: <380B9582.A3766844@bpxinternet.com> Mark Pease wrote: > > "Douglas E. Miles" wrote: > > > > > > Please RSVP to me (doug.miles@bpxinternet.com) so we can get a head > > count. Thanks! > > > > Doug, > I will be there for the first time (please be gentle :-) I am happy to report that no one has been hospitalized. :) -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 From sinck at ip100.corp.quepasa.com Mon Oct 18 17:04:12 1999 From: sinck at ip100.corp.quepasa.com (David Sinck) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Reminder: Meeting 10/19/1999 References: <380B8EDD.B7DAEDC4@bpxinternet.com> <380B941D.2AB9EC4B@motorola.com> <380B9582.A3766844@bpxinternet.com> Message-ID: <14347.39260.221943.31859@ip100.corp.quepasa.com> \_ > I will be there for the first time (please be gentle :-) \_ \_ I am happy to report that no one has been hospitalized. :) 1) Yet. 2) It was too late for the amulance ride. Just Kidding, although I can't speak for having gone to one. :-) David From Mark.Pease at motorola.com Mon Oct 18 17:16:18 1999 From: Mark.Pease at motorola.com (Mark Pease) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: script archive References: <199910132026.NAA11898@usr01.primenet.com> Message-ID: <380B9C32.EE38080C@motorola.com> Janis wrote: > > Maybe this is common knowledge... but there's a decent script archive at > http://worldwidemart.com/scripts/. Anyone interested in adding a message > board or guestbook to the phx.pm site (or even their own site!) might > wanna check those out before starting from scratch, they seem pretty > decent. > > -Heather Oooo.... Matt's Script Archive is considered evil by the Perl Gods. Here is a quote from "The Timeline of Perl and its Culture" http://history.perl.org/PerlTimeline.html > 1995 ... > Matt Wright puts "Matt's Script Archive" online and will continue > to distribute nasty Perl code to the clueless and the unininformed > through the end of the 20th Century. Some of the more memorable > 'scripts' are the infamous Guestbook, formmail and WWWBoard. (October) And here is patch to the Perl5 Porters list that was sent this morring: Chris Nandor wrote: > > At 11:44 -0500 1999.10.18, Elaine -HFB- Ashton wrote: > >is 5 years old today is we use the official date in the perlhist pod. I'm > >not sure if this should be multiplied or calculated in dog years. :) > > > >Happy birthday Perl. > > *** toke.c-orig Mon Oct 18 11:52:49 1999 > --- toke.c Mon Oct 18 13:00:21 1999 > *************** > *** 453,458 **** > --- 453,468 ---- > if (*s++ != '#') > return; > while (*s == ' ' || *s == '\t') s++; > + > + #ifdef MATTS_SCRIPTS_ARE_EVIL > + if (strnEQ(s, "Scripts Archive at: http://www.worldwidemart.com/scripts/", 67) > + || > + strnEQ(s, "Matt's Script Archive, Inc.: http://www.worldwidemart.com/scripts/", 69) > + ) { > + Perl_croak(aTHX_ "Sorry, Matt's Scripts are evil"); > + } > + #endif > + > if (strnEQ(s, "line ", 5)) { > s += 5; > sawline = 1; > > -- > Chris Nandor mailto:pudge@pobox.com http://pudge.net/ > %PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10 1FF77F13 8180B6B6']) -- Mark Pease Mark.Pease@mototorola.com Motorola DigitalDNA(tm) Laboratories perl@perl.sps.mot.com 2100 E. Elliot Rd. Phone:(602)413-8191 Mail Stop: AZ34 EL701 Tempe, AZ 85284 Pager:(800)381-3304 FAX:(602)413-8183 Author of "Software Engineering with Perl" From janis at primenet.com Mon Oct 18 17:23:56 1999 From: janis at primenet.com (Janis) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: script archive In-Reply-To: <380B9C32.EE38080C@motorola.com> from "Mark Pease" at Oct 18, 99 03:16:18 pm Message-ID: <199910182223.PAA28738@usr08.primenet.com> OK, Call me clueless and uninformed, but could you please explain WHY these are bad and evil? I've been using Perl for about a month now, and they taugh me quite a few tricks. Some examples of better ways of writing these scripts would, in theory, help me even more! :-) -Heather (who is making a mental note never to show anyone HER code!) > > Janis wrote: > > > > Maybe this is common knowledge... but there's a decent script archive at > > http://worldwidemart.com/scripts/. Anyone interested in adding a message > > board or guestbook to the phx.pm site (or even their own site!) might > > wanna check those out before starting from scratch, they seem pretty > > decent. > > > > -Heather > > Oooo.... Matt's Script Archive is considered evil by the Perl Gods. > > Here is a quote from "The Timeline of Perl and its Culture" > http://history.perl.org/PerlTimeline.html > > > 1995 > ... > > Matt Wright puts "Matt's Script Archive" online and will continue > > to distribute nasty Perl code to the clueless and the unininformed > > through the end of the 20th Century. Some of the more memorable > > 'scripts' are the infamous Guestbook, formmail and WWWBoard. (October) > > And here is patch to the Perl5 Porters list that was sent this morring: > > Chris Nandor wrote: > > > > At 11:44 -0500 1999.10.18, Elaine -HFB- Ashton wrote: > > >is 5 years old today is we use the official date in the perlhist pod. I'm > > >not sure if this should be multiplied or calculated in dog years. :) > > > > > >Happy birthday Perl. > > > > *** toke.c-orig Mon Oct 18 11:52:49 1999 > > --- toke.c Mon Oct 18 13:00:21 1999 > > *************** > > *** 453,458 **** > > --- 453,468 ---- > > if (*s++ != '#') > > return; > > while (*s == ' ' || *s == '\t') s++; > > + > > + #ifdef MATTS_SCRIPTS_ARE_EVIL > > + if (strnEQ(s, "Scripts Archive at: http://www.worldwidemart.com/scripts/", 67) > > + || > > + strnEQ(s, "Matt's Script Archive, Inc.: http://www.worldwidemart.com/scripts/", 69) > > + ) { > > + Perl_croak(aTHX_ "Sorry, Matt's Scripts are evil"); > > + } > > + #endif > > + > > if (strnEQ(s, "line ", 5)) { > > s += 5; > > sawline = 1; > > > > -- > > Chris Nandor mailto:pudge@pobox.com http://pudge.net/ > > %PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10 1FF77F13 8180B6B6']) > > -- > Mark Pease Mark.Pease@mototorola.com > Motorola DigitalDNA(tm) Laboratories perl@perl.sps.mot.com > 2100 E. Elliot Rd. Phone:(602)413-8191 Mail Stop: AZ34 EL701 > Tempe, AZ 85284 Pager:(800)381-3304 FAX:(602)413-8183 > Author of "Software Engineering with Perl" > From Bryan.Lane at VITALPS.COM Mon Oct 18 18:08:00 1999 From: Bryan.Lane at VITALPS.COM (Bryan Lane) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Reminder: Meeting 10/19/1999 Message-ID: I will be there. Bryan -----Original Message----- From: Douglas E. Miles [mailto:doug.miles@bpxinternet.com] Sent: Monday, October 18, 1999 2:19 PM To: Phoenix.pm; Rose Keys; Mark Seckinger Subject: Phoenix.pm: Reminder: Meeting 10/19/1999 > We'll be having a Phoenix.pm meeting Tuesday October 19th at 7:00PM. > It will be held at Bowne, which is located at 1500 N. Central Avenue, > which is on the Southwest corner of Central and McDowell. The parking > lot is gated, so just press the button on the intercom, and tell the > receptionist that you are there for the Perl meeting. Park in the lot > that is straight ahead from the entrance on the South side of McDowell. > Park in any uncovered, non-reserved space. Proceed to the main lobby, > which is on the Northeast side of the parking lot. > > David Warner will be presenting mod_perl for your delight and > edification. See you all there! Please RSVP to me (doug.miles@bpxinternet.com) so we can get a head count. Thanks! -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 From doug.miles at bpxinternet.com Tue Oct 19 10:10:47 1999 From: doug.miles at bpxinternet.com (Douglas E. Miles) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: script archive References: <199910182223.PAA28738@usr08.primenet.com> Message-ID: <380C89F7.CC3DE9BA@bpxinternet.com> Janis wrote: > > OK, Call me clueless and uninformed, but could you please explain WHY > these are bad and evil? I've been using Perl for about a month now, and > they taugh me quite a few tricks. Some examples of better ways of writing > these scripts would, in theory, help me even more! :-) I'm surprised no one has responded to this yet. I'll bite. First of all, I'm not familiar with Matt's scripts, so I ran a search on deja.com. The main complaints I saw were that the scripts were written insecurely, or had known exploits with no patch or upgrade. Anyone know more? > -Heather (who is making a mental note never to show anyone HER code!) Unfortunately, I'll admit that I'm often reluctant to show my code sometimes also. Hopefully this group will be gentle in showing better ways of doing things. (hint, hint) I really don't want anyone to be uncomfortable in sharing, because that stifles learning (for the person with the question, and those who would benefit from the discussion). It is worth bearing in mind that when somebody does something "stupid" it is usually because they don't know any better, not because they're doing it intentionally. -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 From sinck at ip100.corp.quepasa.com Tue Oct 19 10:58:58 1999 From: sinck at ip100.corp.quepasa.com (David Sinck) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: script archive References: <380B9C32.EE38080C@motorola.com> <199910182223.PAA28738@usr08.primenet.com> Message-ID: <14348.38210.890545.563861@ip100.corp.quepasa.com> \_ OK, Call me clueless and uninformed, but could you please explain WHY \_ these are bad and evil? I've been using Perl for about a month now, and \_ they taugh me quite a few tricks. Some examples of better ways of writing \_ these scripts would, in theory, help me even more! :-) Well, speaking from experience at a previous employer, the wwwboard script has a number of failings, some of the classic cs 101 "don't do this" stuff. race conditions, manageability, security, etc. race conditions are particularly bad in wwwboard as there is one central index file that has *no* file locking on it...it can be updated by the webserver at any time. That's cool until two (or more) people try to update it simultaneously....*poof* corrupted index, lost articles, global warming, the Four Horsemen.... Oh, wait, skip those last two. I've seen race conditions in too much of the perl code I have been assigned to, and it's reasonably easy to avoid with judicious use of flock (when it works in your OS...[aix bleh]). Manageability is completely different. Do you need to reproduce the script entirely to have another board, or can you point it at a config file and have it be happy? Can administrators effectively administrate in the fashion they need to? Consider not only the end users (surfers) but the people who have to make the thing be reasonable. Security is always important. Turn on -T and -w. Think about what your code could do given worst-case-input. David From Ron.Giffin at motorola.com Tue Oct 19 12:22:08 1999 From: Ron.Giffin at motorola.com (Giffin Ron-P08295) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Perl Modules Message-ID: <01CA656A687ED211926B00805F779140A7B81C@az25exm02.geg.mot.com> Hi, Have discovered that there are holes in my COL 1.3 distro. Some of my Perl module directories are empty. Went back to distro disk and reloaded Perl. argggs! - same problem. For now, I will have to patch up my distro from CPAN or my HP-UX box at work. What are the minimum modules needed for my rookie scripting efforts? TIA. -- Ron From pablo at dosomething.org Tue Oct 19 12:45:17 1999 From: pablo at dosomething.org (Pablo Velasquez) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: script archive In-Reply-To: <380C89F7.CC3DE9BA@bpxinternet.com> References: <199910182223.PAA28738@usr08.primenet.com> Message-ID: <3.0.6.32.19991019104517.00979700@mail.dosomething.org> Hi, I agree with David. For me making programming errors (all programs are born with original sin, and must be redeemed) [no offense meant to non-christians or christians for that matter] is more a "clumsy" matter than a "stupid" matter. Like, "Ouch, where did that table come from!" There's more than one way to re-arrange a room I suppose. As for the Matt's script archive. If he doesn't make them secure like he should, then she should, that's all there is to it. But maybe he's clumsy :) -Pablo At 08:10 AM 10/19/99 -0700, you wrote: >Janis wrote: >> >> OK, Call me clueless and uninformed, but could you please explain WHY >> these are bad and evil? I've been using Perl for about a month now, and >> they taugh me quite a few tricks. Some examples of better ways of writing >> these scripts would, in theory, help me even more! :-) > >I'm surprised no one has responded to this yet. I'll bite. First of >all, I'm not familiar with Matt's scripts, so I ran a search on >deja.com. The main complaints I saw were that the scripts were written >insecurely, or had known exploits with no patch or upgrade. Anyone know >more? > >> -Heather (who is making a mental note never to show anyone HER code!) > > >Unfortunately, I'll admit that I'm often reluctant to show my code >sometimes also. Hopefully this group will be gentle in showing better >ways of doing things. (hint, hint) I really don't want anyone to be >uncomfortable in sharing, because that stifles learning (for the person >with the question, and those who would benefit from the discussion). It >is worth bearing in mind that when somebody does something "stupid" it >is usually because they don't know any better, not because they're doing >it intentionally. > > >-- >People understand instinctively that the best way for computer >programs to communicate with each other is for each of the them >to be strict in what they emit, and liberal in what they accept. >The odd thing is that people themselves are not willing to be >strict in how they speak, and liberal in how they listen. >--Larry Wall, 2nd State of the Onion Address, August 1998 > From kev at primenet.com Tue Oct 19 12:59:24 1999 From: kev at primenet.com (Kevin Buettner) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Perl Modules In-Reply-To: Giffin Ron-P08295 "Phoenix.pm: Perl Modules" (Oct 19, 10:22am) References: <01CA656A687ED211926B00805F779140A7B81C@az25exm02.geg.mot.com> Message-ID: <991019175924.ZM9732@saguaro.lan> On Oct 19, 10:22am, Giffin Ron-P08295 wrote: > Have discovered that there are holes in my COL 1.3 distro. > Some of my Perl module directories are empty. Went back > to distro disk and reloaded Perl. argggs! - same problem. > For now, I will have to patch up my distro from CPAN or my > HP-UX box at work. What are the minimum modules needed > for my rookie scripting efforts? TIA. It depends on what you're doing (obviously). I usually wait until I have a problem to solve and then figure out what modules I need (if any) to solve my problem. Then I download and install... You might find it handy to look at Tom Christiansen's list: http://language.perl.com/info/cool_modules.html It is probably a bit out of date though. Kevin -- Kevin Buettner kev@primenet.com, kevinb@cygnus.com From pablo at dosomething.org Tue Oct 19 13:07:45 1999 From: pablo at dosomething.org (Pablo Velasquez) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: script archive In-Reply-To: <14348.38210.890545.563861@ip100.corp.quepasa.com> References: <380B9C32.EE38080C@motorola.com> <199910182223.PAA28738@usr08.primenet.com> Message-ID: <3.0.6.32.19991019110745.009aec10@mail.dosomething.org> Hi, David I was reading the Perl Cookbook and they have some flocking stuff :) Is there some snippet you would recommend...on a Linux platform (or is that bleh also)? -Pablo At 08:58 AM 10/19/99 -0700, you wrote: > > >\_ OK, Call me clueless and uninformed, but could you please explain WHY >\_ these are bad and evil? I've been using Perl for about a month now, and >\_ they taugh me quite a few tricks. Some examples of better ways of writing >\_ these scripts would, in theory, help me even more! :-) > >Well, speaking from experience at a previous employer, the wwwboard >script has a number of failings, some of the classic cs 101 "don't do >this" stuff. > >race conditions, manageability, security, etc. > >race conditions are particularly bad in wwwboard as there is one >central index file that has *no* file locking on it...it can be >updated by the webserver at any time. That's cool until two (or more) >people try to update it simultaneously....*poof* corrupted index, lost >articles, global warming, the Four Horsemen.... Oh, wait, skip those >last two. > >I've seen race conditions in too much of the perl code I have been >assigned to, and it's reasonably easy to avoid with judicious use of >flock (when it works in your OS...[aix bleh]). > >Manageability is completely different. Do you need to reproduce the >script entirely to have another board, or can you point it at a config >file and have it be happy? Can administrators effectively >administrate in the fashion they need to? Consider not only the end >users (surfers) but the people who have to make the thing be >reasonable. > >Security is always important. Turn on -T and -w. Think about what >your code could do given worst-case-input. > >David > From sinck at ip100.corp.quepasa.com Tue Oct 19 13:20:17 1999 From: sinck at ip100.corp.quepasa.com (David Sinck) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: script archive References: <199910182223.PAA28738@usr08.primenet.com> <3.0.6.32.19991019104517.00979700@mail.dosomething.org> Message-ID: <14348.46689.472911.383106@ip100.corp.quepasa.com> \_ As for the Matt's script archive. If he doesn't make them secure \_ like he should, then she should, that's all there is to it. But \_ maybe he's clumsy :) I'd believe at this point, after presumed nice hints then heavy flamage from the Perl Wizards, if he hasn't fixed it/them, then there's something intrinsically wrong with the wetware, particularly if there aren't even discalimers saying that there are known issues with the scripts. Now, are the known holes in public repositories better than the [un]known holes you roll yourself? :-) David From sinck at ip100.corp.quepasa.com Tue Oct 19 14:33:49 1999 From: sinck at ip100.corp.quepasa.com (David Sinck) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: script archive References: <380B9C32.EE38080C@motorola.com> <199910182223.PAA28738@usr08.primenet.com> <3.0.6.32.19991019110745.009aec10@mail.dosomething.org> Message-ID: <14348.51101.622906.309738@ip100.corp.quepasa.com> \_ Hi, \_ David I was reading the Perl Cookbook and they have some flocking stuff :) \_ Is there some snippet you would recommend...on a Linux platform (or is that \_ bleh also)? I bleh'd aix because in the release I had access to there was a kernel level bug that had been incompletely patched that prevented flock() from working. If there's an example in the cookbook, that's probably better than any half baked example I could come up with. The important part is to figure out when you need flocking and to make it as tight as possible when you're in exclusive mode, and use read mode everywhere else on the file(s) in question. If one of (the parts of) the programming isn't playing with flocking, then the whole thing is moot. Flocking is by agreement, not by shotgun. :-) David From Mark.Pease at motorola.com Tue Oct 19 16:38:35 1999 From: Mark.Pease at motorola.com (Mark Pease) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: script archive References: <199910182223.PAA28738@usr08.primenet.com> Message-ID: <380CE4DB.2EDA1878@motorola.com> Janis wrote: > > OK, Call me clueless and uninformed, but could you please explain WHY > these are bad and evil? I've been using Perl for about a month now, and > they taugh me quite a few tricks. Some examples of better ways of writing > these scripts would, in theory, help me even more! :-) > > -Heather (who is making a mental note never to show anyone HER code!) > I want to make a quick apology to the list for sending flame bait out. I must have been in PHB mode (Pointy-Haired Boss) Ahh... that better! As for why Matt's scripts are considered evil, it's my understanding that when several people tried to tell him that there were security problems, he displayed an attitude and was unrepentant. Thus he was removed from the body, never to return. As for why *I* PHBed and sent my reply to Heather, I was in the mist of a review of the Perl Timeline against my archive of Perl History and ran across the bit about Matt's Script archive, and the "patch" crossed my email about the same time. I went into overload and sent the reply. "Hello, my name is Mark, and I am a... a Manager (sob)." -- Mark Pease Mark.Pease@mototorola.com Motorola DigitalDNA(tm) Laboratories perl@perl.sps.mot.com 2100 E. Elliot Rd. Phone:(602)413-8191 Mail Stop: AZ34 EL701 Tempe, AZ 85284 Pager:(800)381-3304 FAX:(602)413-8183 Author of "Software Engineering with Perl" From coyotl at primenet.com Tue Oct 19 22:54:25 1999 From: coyotl at primenet.com (Glen G. Walker) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: grrrrrr In-Reply-To: <38061CCF.8A13B436@bpxinternet.com> Message-ID: Well, it is almost 9pm and I am still stuck at work. Don't think I'm going to make it to the meeting tonight... ------------------------------------------------------------------------------- Glen G. Walker, coyotl@primenet.com www.primenet.com/~coyotl ------------------------------------------------------------------------------- From Beaves at aol.com Wed Oct 20 09:42:11 1999 From: Beaves at aol.com (Beaves@aol.com) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: package Autoloading Message-ID: <0.be3f29e8.253f2ec3@aol.com> I talked about a certain AUTOLOAD technique at the meeting. There are others, but this seemed to suit my particular situation. My problem was that I wanted to just be able to call FormVar::Text->new() # for example, without having to worry about whether or not the FormVar::Text package (also read file) was required already. If FormVar::Text is a completely empty and undefined package at the time of calling new(), then you will always get an error, because it cant find new, and has no information on where else to look. So, my (I'm sure unoriginal) idea was to use an AUTOLOAD routine in a package whose only reason for existence is to AUTOLOAD the FormVar packages. I call this package LoadMe for lack of a better name. The LoadMe package AUTOLOAD routine parses the package name out of the called method (in the $AUTOLOAD( variable), requires the package, and then calls the method again. The package called should then reassign @ISA, since you don't want 'LoadMe' as a parent anymore. ***** The Code ***** package FormVar; # all of the possible packages that could be called. @FormVar_Packages = ( qw( FormVar::Text FormVar::Password FormVar::Checkbox FormVar::CheckboxGroup FormVar::Button FormVar::SubmitButton FormVar::Option FormVar::OptionGroup FormVar::Radio FormVar::VarGroup FormVar::ERR FormVar::SelectList FormVar::SelectListMultiple FormVar::Cluster FormVar::Textarea FormVar::Page )); # To make this work, we need each package already built with an @ISA pointing to # 'FormVar::LoadMe' map { @{"$_\::ISA"} = ('FormVar::LoadMe') } @FormVar_Packages; # @ISA will be overwritten in file # Now for the 'LoadMe' AUTOLOAD routine... package FormVar::LoadMe; sub AUTOLOAD { my $self = $_[0]; my $class = ref($self) || $self; # use and eval to capture an error and spit out something more meaningful. eval ("require HTML::$class"); $@ and die "AZWEBS ERROR: error in requiring '$class' (error follows)...\n$@"; # now lets try the same method call again with the same arguments # You will get an error if you don't reassign @ISA in the required package # as this then becomes recursive. &{$AUTOLOAD}(@_) } # Then return to the FormVar package definitions package FormVar; ***** End Code ***** If anyone has any questions, give me a buzz!! Check 6! Tim From doug.miles at bpxinternet.com Wed Oct 20 11:23:38 1999 From: doug.miles at bpxinternet.com (Douglas E. Miles) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: grrrrrr References: Message-ID: <380DEC8A.D6BACEBE@bpxinternet.com> "Glen G. Walker" wrote: > > Well, it is almost 9pm and I am still stuck at work. Don't think I'm going > to make it to the meeting tonight... Oh, well. There's always next time. Tell them you need to leave early for educational purposes. :) -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 From pablo at dosomething.org Wed Oct 20 12:30:02 1999 From: pablo at dosomething.org (Pablo Velasquez) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: package Autoloading In-Reply-To: <0.be3f29e8.253f2ec3@aol.com> Message-ID: <3.0.6.32.19991020103002.009735e0@mail.dosomething.org> Tim, This sounds really intriguing...I wish I knew OOP to participate :) I did just get the OOP book though (Monday), any minute now it will sink in. -Pablo At 10:42 AM 10/20/99 EDT, you wrote: >I talked about a certain AUTOLOAD technique at the meeting. There are >others, but this seemed to suit my particular situation. > >My problem was that I wanted to just be able to call > >FormVar::Text->new() # for example, > >without having to worry about whether or not the FormVar::Text package (also >read file) was required already. If FormVar::Text is a completely empty and >undefined package at the time of calling new(), then you will always get an >error, because it cant find new, and has no information on where else to look. > >So, my (I'm sure unoriginal) idea was to use an AUTOLOAD routine in a package >whose only reason for existence is to AUTOLOAD the FormVar packages. I call >this package LoadMe for lack of a better name. The LoadMe package AUTOLOAD >routine parses the package name out of the called method (in the $AUTOLOAD( >variable), requires the package, and then calls the method again. The >package called should then reassign @ISA, since you don't want 'LoadMe' as a >parent anymore. > >***** The Code ***** > >package FormVar; > ># all of the possible packages that could be called. >@FormVar_Packages = ( qw( > FormVar::Text > FormVar::Password > FormVar::Checkbox > FormVar::CheckboxGroup > FormVar::Button > FormVar::SubmitButton > FormVar::Option > FormVar::OptionGroup > FormVar::Radio > FormVar::VarGroup > FormVar::ERR > FormVar::SelectList > FormVar::SelectListMultiple > FormVar::Cluster > FormVar::Textarea > FormVar::Page >)); > ># To make this work, we need each package already built with an @ISA pointing >to ># 'FormVar::LoadMe' > >map { @{"$_\::ISA"} = ('FormVar::LoadMe') } @FormVar_Packages; # @ISA will >be overwritten in file > ># Now for the 'LoadMe' AUTOLOAD routine... > >package FormVar::LoadMe; > >sub AUTOLOAD { > my $self = $_[0]; > my $class = ref($self) || $self; ># use and eval to capture an error and spit out something more meaningful. > eval ("require HTML::$class"); > $@ and die "AZWEBS ERROR: error in requiring '$class' (error >follows)...\n$@"; > ># now lets try the same method call again with the same arguments ># You will get an error if you don't reassign @ISA in the required package ># as this then becomes recursive. > > &{$AUTOLOAD}(@_) > >} > ># Then return to the FormVar package definitions >package FormVar; > >***** End Code ***** > >If anyone has any questions, give me a buzz!! > >Check 6! > >Tim > From Beaves at aol.com Wed Oct 20 19:04:26 1999 From: Beaves at aol.com (Beaves@aol.com) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Installing Perl Message-ID: <0.315a08d0.253fb28a@aol.com> OK. Those of you who have met me in person can probably attest to me being just plain dangerous when it comes to some things about computer literacy. (Telnet being just one of them, with or without peanut brittle crunching inside my head.) In attempting to load a module, I got a message saying that I needed Perl 5.004 for the latest DBI.pm version to work. OK, no problem, I say. I'll just load up Perl 5.004 on my machine and we'll be on our way. Except that I can't figure out for the life of me what I need to do. This is after reading as many readme files as there are hairs on my ass... OK that's a bad analogy... I'm running Windows 95. Refering to the CPAN page: http://www.perl.com/CPAN-local/doc/manual/html/Porting/README.dos.html It tells me to set: LFN=y before un-zipping. WHUHH?! Also, it says next < Message-ID: <3.0.3.32.19991020175853.009b3980@pop.primenet.com> At 08:04 PM 10/20/99 EDT, you wrote: >OK. Those of you who have met me in person can probably attest to me being >just plain dangerous when it comes to some things about computer literacy. >(Telnet being just one of them, with or without peanut brittle crunching >inside my head.) > >In attempting to load a module, I got a message saying that I needed Perl >5.004 for the latest DBI.pm version to work. OK, no problem, I say. I'll >just load up Perl 5.004 on my machine and we'll be on our way. Except that I >can't figure out for the life of me what I need to do. This is after >reading as many readme files as there are hairs on my ass... OK that's a bad >analogy... You might be going about this the hard way. Just get the precompiled ActiveState version. This is what it has to say on the download page: The latest release of ActivePerl is 521. This build is based on Perl 5.005_03. That should cover it. Then go back to installing DBI. >I'm running Windows 95. > >Refering to the CPAN page: >http://www.perl.com/CPAN-local/doc/manual/html/Porting/README.dos.html > >It tells me to set: > LFN=y >before un-zipping. WHUHH?! > >Also, it says next ><<<< ln -s bash.exe sh.exe > >But those look like UNIX commands to me. > >Just about the entire "Building" section of this page does not make any sense >to me. > >All in all, this has not been the most productive of days. > >It can't be that hard to do, but I'm apparently lacking in the assumed >knowledge and skill. > >Any help would be appreciated.. > >Tim > > > From dmiles at primenet.com Wed Oct 20 20:08:06 1999 From: dmiles at primenet.com (Doug and Julie Miles) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Installing Perl In-Reply-To: <3.0.3.32.19991020175853.009b3980@pop.primenet.com> References: <0.315a08d0.253fb28a@aol.com> Message-ID: <3.0.3.32.19991020180806.009e3c40@pop.primenet.com> At 05:58 PM 10/20/99 -0700, you wrote: >At 08:04 PM 10/20/99 EDT, you wrote: >>OK. Those of you who have met me in person can probably attest to me being >>just plain dangerous when it comes to some things about computer literacy. >>(Telnet being just one of them, with or without peanut brittle crunching >>inside my head.) >> >>In attempting to load a module, I got a message saying that I needed Perl >>5.004 for the latest DBI.pm version to work. OK, no problem, I say. I'll >>just load up Perl 5.004 on my machine and we'll be on our way. Except >that I >>can't figure out for the life of me what I need to do. This is after >>reading as many readme files as there are hairs on my ass... OK that's a bad >>analogy... > >You might be going about this the hard way. Just get the precompiled >ActiveState version. This is what it has to say on the download page: > >The latest release of ActivePerl is 521. This build is based on Perl >5.005_03. > >That should cover it. Then go back to installing DBI. That's at www.activestate.com From pablo at dosomething.org Wed Oct 20 20:34:19 1999 From: pablo at dosomething.org (Pablo Velasquez) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Installing Perl In-Reply-To: <0.315a08d0.253fb28a@aol.com> Message-ID: <3.0.6.32.19991020183419.00985650@mail.dosomething.org> Hi, I'll volunteer some information and welcome corrections or extensions from all. Is your goal to use the MySQL db at highway? Do you have a UNIX or NT account with hiway? However, you want to "develop" on windows first? Not sure about your goals... Also, I went to hiway.com and read their "connection" policies. They do not offer telnet. They seem to have the same system as ValueWeb, NO telnet, simply modification of files with "WS_FTP"... This is like telling you to do a line sketch with a brick instead of a pencil. This is completely unacceptable to me :) You should switch to a UNIX NetNation web hosting plan... That's my advice. -Pablo p.s. I'm not sure I'd recommend going through the whole deal of developing (including installing MySQL, etc) on your Windows machine. It's up to you. I was able to install IIS, MySQL, the DBI drivers, the whole bit, on my windows NT machine but it didn't really provide any help for development since it requires you to duplicate your work too often (also things don't always work the same way). It was easier to just create a test site on the Linux box, upload my scripts and test them, then move them to the production part of the site when I was done. I've been doing this for about 6 months now without a single problem. (as opposed to my earlier trial with Windows which didn't go well at all) But that is my own experience others may find the opposite to be true. At 08:04 PM 10/20/99 EDT, you wrote: >OK. Those of you who have met me in person can probably attest to me being >just plain dangerous when it comes to some things about computer literacy. >(Telnet being just one of them, with or without peanut brittle crunching >inside my head.) > >In attempting to load a module, I got a message saying that I needed Perl >5.004 for the latest DBI.pm version to work. OK, no problem, I say. I'll >just load up Perl 5.004 on my machine and we'll be on our way. Except that I >can't figure out for the life of me what I need to do. This is after >reading as many readme files as there are hairs on my ass... OK that's a bad >analogy... > >I'm running Windows 95. > >Refering to the CPAN page: >http://www.perl.com/CPAN-local/doc/manual/html/Porting/README.dos.html > >It tells me to set: > LFN=y >before un-zipping. WHUHH?! > >Also, it says next ><<<< ln -s bash.exe sh.exe > >But those look like UNIX commands to me. > >Just about the entire "Building" section of this page does not make any sense >to me. > >All in all, this has not been the most productive of days. > >It can't be that hard to do, but I'm apparently lacking in the assumed >knowledge and skill. > >Any help would be appreciated.. > >Tim > > From dmiles at primenet.com Wed Oct 20 20:51:02 1999 From: dmiles at primenet.com (Doug and Julie Miles) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Re: perl job Message-ID: <3.0.3.32.19991020185102.009bba70@pop.primenet.com> Here is a local short contract opportunity. I talked to the guy (Jerry), and I'm over his budget. Basically what he wants is a CGI to write the data from http://www.fitnessnews.com/addlist.html to a flat file, and be able to search by area from http://www.fitnessnews.com/directory.html. I doesn't sound too complicated. If you are interested, contact him directly: jerrycoy@coymedia.com with your estimate. >Please look at http://www.fitnessnews.com/directory.html I added a pop up >menu to earch by. Also added the same popup on >http://www.fitnessnews.com/addlist.html to correspond with the search. > >The information filled out at http://www.fitnessnews.com/addlist.html should >be put into a file within the directory. Kinda like a database of >trainers. This could be an html file like a guestbook or whatever is easier >for you. nobody really needs to see this file. Then the search by state >(popup) will then create a list of all trainers that match the state >searched for. It should list the trainers info like a guestbook in any >order. > >If you think of a better way to add or search. let me know. I just want to >keep it simple since this is a free service. > >right now I have the http://www.fitnessnews.com/addlist.html form set up as >form mail. Im getting far too much response to do the trainers directory >manually. From kev at primenet.com Wed Oct 20 21:49:14 1999 From: kev at primenet.com (Kevin Buettner) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: xselect Message-ID: <991021024913.ZM13380@saguaro.lan> In response to a question on one of my company's internal mailing lists, I've written a small perl program that I call xselect. The person in question claims to be supremely lazy and wanted a program which reads from a pipe (stdin) and causes this data to be selected (in X windows) so that he'd be able to paste it into another application. He deals with large diffs and didn't want to be bothered with scrolling around and making selections in an editor window. (He did say that he was supremely lazy.) After thinking about it for a while, I decided that I too might find such a utility useful. So I wrote one in perl. Below is the bulk of my reply to the individual wanting this utility. (I too am lazy and didn't want to substantially rewrite my message for a different audience.) ........ It wasn't hard to throw together a small perl script to do what you want. The only catch is that you'll need to install Tk (for perl) on your machine if it's not installed already. The script is below. I called it xselect, but of course you can name it whatever you want. To invoke it, you can use it either at the end of a pipe, or you can specify one or more files which'll become the selection. E.g, either diff -u old new | xselect or xselect /tmp/diffs /tmp/otherdiffs It'll pop up a small window with a "Quit" button in it. I've arranged things so that it'll go away when you click on the quit button or when another selection (anywhere) is made. If you really, truly want CLIPBOARD selections, you should uncomment the appropriate line in the script below. If you also run xclipboard, you'll probably get the behavior that you really want. xselect will run and own the selection. xclipboard will notice this, fetch the selection from xselect, and then attempt to own the CLIPBOARD selection again at which point xselect will exit. If you don't use xclipboard, you'll need to leave xselect running for as long as you wish to paste the selection it holds. (I use PRIMARY selections more often than CLIPBOARD selections which is why I wrote it the way that I did.) Hope you find this useful. Kevin --- xselect --- #!/usr/local/bin/perl -w use Tk; $SELECTION = 'PRIMARY'; #$SELECTION = 'CLIPBOARD'; my $top; # top level widget undef $/; # slurp mode while (<>) { $data .= $_; # slurp all of the data } # (while loop needed for multiple files) $top = MainWindow->new; $top->SelectionHandle(-selection => $SELECTION, \&selection_handler); $top->SelectionOwn( -command => sub { exit(0); }, -selection => $SELECTION ); $top->Button(-text => "Quit", -command => sub { exit(0) })->pack(); MainLoop; sub selection_handler { my ($offset, $length) = @_; return substr($data, $offset, $length); } --- end xselect --- -- Kevin Buettner kev@primenet.com, kevinb@cygnus.com From David.Warner at feddata.com Thu Oct 21 10:04:41 1999 From: David.Warner at feddata.com (Warner, David) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Installing Perl Message-ID: <641058580E52D311BF9800902712DCAA06B4E8@mailsrv.sylvest.com> Tim, I would definitely look into using Activestate's version of perl, as suggested by Doug. You can then install DBI and the DBD-Mysql packages by using the command line: "perl ppm.pl install DBI DBD-Mysql" (whilst connected to the internet) and the packages (along with HTML-ized documentation) will be installed on your machine. Activestate provides a really nice HTML version of the core perl documentation and adds to it every time you install a package using "ppm" (short for perl package manager). As to using Mysql on Windows, it does require a license, which costs $200.00. Under Linux/other Unices, it is basically free, unless you resell it. Hope this helps, Dave Warner -----Original Message----- From: Beaves@aol.com [mailto:Beaves@aol.com] Sent: Wednesday, October 20, 1999 5:04 PM To: phoenix-pm-list@happyfunball.pm.org Subject: Phoenix.pm: Installing Perl OK. Those of you who have met me in person can probably attest to me being just plain dangerous when it comes to some things about computer literacy. (Telnet being just one of them, with or without peanut brittle crunching inside my head.) In attempting to load a module, I got a message saying that I needed Perl 5.004 for the latest DBI.pm version to work. OK, no problem, I say. I'll just load up Perl 5.004 on my machine and we'll be on our way. Except that I can't figure out for the life of me what I need to do. This is after reading as many readme files as there are hairs on my ass... OK that's a bad analogy... I'm running Windows 95. Refering to the CPAN page: http://www.perl.com/CPAN-local/doc/manual/html/Porting/README.dos.html It tells me to set: LFN=y before un-zipping. WHUHH?! Also, it says next < This looks pretty cool. I haven't downloaded it yet, but I did go through the demo a little bit. This might help you out Tim. Not having telnet access and all... http://myadmin.cheapnet.net/ -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 From David.Warner at feddata.com Thu Oct 21 13:55:53 1999 From: David.Warner at feddata.com (Warner, David) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Perl/CGI Web interface to MySQL Message-ID: <641058580E52D311BF9800902712DCAA06B4EB@mailsrv.sylvest.com> Nice piece of code...looks like it shields you from alot of DDL (data definition language). I esp. like the sql interface for querying, etc. BTW, I found a couple of sites that contain fairly good intros to SQL today: http://w3.one.net/~jhoffman/sqltut.htm (academic) and http://www.sqlcourse.com (commercial) Dave -----Original Message----- From: Douglas E. Miles [mailto:doug.miles@bpxinternet.com] Sent: Thursday, October 21, 1999 11:19 AM To: Phoenix.pm Cc: Doug Miles Subject: Phoenix.pm: Perl/CGI Web interface to MySQL This looks pretty cool. I haven't downloaded it yet, but I did go through the demo a little bit. This might help you out Tim. Not having telnet access and all... http://myadmin.cheapnet.net/ -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 From coyotl at primenet.com Thu Oct 21 14:12:38 1999 From: coyotl at primenet.com (Glen G. Walker) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: dumb question In-Reply-To: <0.315a08d0.253fb28a@aol.com> Message-ID: OK, so I have an updater that writes files to a folder. On the old server, we did something kinky so the new files would write with permissions of -rwxrwxrwx when created into the various folders. I am trying to figure out how to set up the directories to just automatically change permissions to files written to them and have gotten nowhere with the man files for chmod or umask. Any suggestions? ------------------------------------------------------------------------------- Glen G. Walker, coyotl@primenet.com www.primenet.com/~coyotl ------------------------------------------------------------------------------- From forsythe at primenet.com Fri Oct 22 01:09:11 1999 From: forsythe at primenet.com (Tran Forsythe) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: package Autoloading References: <3.0.6.32.19991020103002.009735e0@mail.dosomething.org> Message-ID: <002001bf1c53$f6de72a0$0100a8c0@tran> Yep, this technique goes over fairly well; there's a number of modules that load their own sub-modules (ie: Net::FTP & Net::FTP::A) at runtime only. The only downside is if (like myself) you're cursed with not being able to expect a Perl installation whereever you go, you must compile it into a binary. Aaaand, here's the downfall... such Perl-2-C compilers can only see what you've included at (Perl's) compile time (by using use/require). So, such modules pose a threat to those who have to distribute scripts in binary. Any flames, pls mail me not the group ;) -Kurt ps: Sorry I missed last meeting; sounded like it was interesting. Me, I lost a cluster and thought it was next Tues. ------ "Push to test." "Release to detonate." -Brad Morrison ----- Original Message ----- From: Pablo Velasquez To: Sent: Wednesday, October 20, 1999 10:30 AM Subject: Re: Phoenix.pm: package Autoloading Tim, This sounds really intriguing...I wish I knew OOP to participate :) I did just get the OOP book though (Monday), any minute now it will sink in. -Pablo At 10:42 AM 10/20/99 EDT, you wrote: >I talked about a certain AUTOLOAD technique at the meeting. There are >others, but this seemed to suit my particular situation. > >My problem was that I wanted to just be able to call > >FormVar::Text->new() # for example, > >without having to worry about whether or not the FormVar::Text package (also >read file) was required already. If FormVar::Text is a completely empty and >undefined package at the time of calling new(), then you will always get an >error, because it cant find new, and has no information on where else to look. > >So, my (I'm sure unoriginal) idea was to use an AUTOLOAD routine in a package >whose only reason for existence is to AUTOLOAD the FormVar packages. I call >this package LoadMe for lack of a better name. The LoadMe package AUTOLOAD >routine parses the package name out of the called method (in the TOLOAD( >variable), requires the package, and then calls the method again. The >package called should then reassign @ISA, since you don't want 'LoadMe' as a >parent anymore. > >***** The Code ***** > >package FormVar; > ># all of the possible packages that could be called. >@FormVar_Packages = ( qw( > FormVar::Text > FormVar::Password > FormVar::Checkbox > FormVar::CheckboxGroup > FormVar::Button > FormVar::SubmitButton > FormVar::Option > FormVar::OptionGroup > FormVar::Radio > FormVar::VarGroup > FormVar::ERR > FormVar::SelectList > FormVar::SelectListMultiple > FormVar::Cluster > FormVar::Textarea > FormVar::Page >)); > ># To make this work, we need each package already built with an @ISA pointing >to ># 'FormVar::LoadMe' > >map { @{"$_\::ISA"} = ('FormVar::LoadMe') } @FormVar_Packages; # @ISA will >be overwritten in file > ># Now for the 'LoadMe' AUTOLOAD routine... > >package FormVar::LoadMe; > >sub AUTOLOAD { > my $self = $_[0]; > my $class = ref($self) || $self; ># use and eval to capture an error and spit out something more meaningful. > eval ("require HTML::$class"); > $@ and die "AZWEBS ERROR: error in requiring '$class' (error >follows)...\n$@"; > ># now lets try the same method call again with the same arguments ># You will get an error if you don't reassign @ISA in the required package ># as this then becomes recursive. > > &{$AUTOLOAD}(@_) > >} > ># Then return to the FormVar package definitions >package FormVar; > >***** End Code ***** > >If anyone has any questions, give me a buzz!! > >Check 6! > >Tim > From forsythe at primenet.com Fri Oct 22 01:28:27 1999 From: forsythe at primenet.com (Tran Forsythe) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: dumb question References: Message-ID: <006901bf1c56$a75b31c0$0100a8c0@tran> Hmm.. umask only blocks permissions, it never assigns them. I think there's a global umask out there somewhere - anyone with *longing sigh* Unix correct me if I'm wrong? Anyhow, if I'm not, you may just be able to disable that and have 0777 as your default permissions then. Otherwise, my suggestion (nasty as it may be) is to cron a chmod -R Luck, -Kurt ------ "Push to test." "Release to detonate." -Brad Morrison ----- Original Message ----- From: Glen G. Walker To: Sent: Thursday, October 21, 1999 12:12 PM Subject: Phoenix.pm: dumb question OK, so I have an updater that writes files to a folder. On the old server, we did something kinky so the new files would write with permissions of -rwxrwxrwx when created into the various folders. I am trying to figure out how to set up the directories to just automatically change permissions to files written to them and have gotten nowhere with the man files for chmod or umask. Any suggestions? ---------------------------------------------------------------------------- --- Glen G. Walker, coyotl@primenet.com www.primenet.com/~coyotl ---------------------------------------------------------------------------- --- From phaedrus at endless.org Fri Oct 22 09:42:22 1999 From: phaedrus at endless.org (Phaedrus) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: dumb question In-Reply-To: <006901bf1c56$a75b31c0$0100a8c0@tran> Message-ID: Glen.. This is probably all stuff that you are aware of, but: Off the top of my head: Permissions always start at 666 (everything for everyone). Umasks may be set in the /etc/profile or csh equivilent (the global config file for your shell), your login .profile or .cshrc (by shell), or a umask statement. Remember that Perl does not speak octal (does it?) and wants a hex or dec number. Octal will just confuse it. Hope this helps (somehow). Goodluck. -scott Here is an excerpt from 'man perlfunc', on creating new files: If the file named by FILENAME does not exist and the open() call creates it (typically because MODE includes the O_CREAT flag), then the value of PERMS specifies the permissions of the newly created file. If you omit the PERMS argument to sysopen(), Perl uses the octal value 0666. These permission values need to be in octal, and are modified by your process's current umask. The umask value is a number representing disabled permissions bits--if your umask were 027 (group can't write; others can't read, write, or execute), then passing sysopen() 0666 would create a file with mode 0640 (0666 &~ 027 is 0640). On Thu, 21 Oct 1999, Tran Forsythe wrote: > Date: Thu, 21 Oct 1999 23:28:27 -0700 > From: Tran Forsythe > Reply-To: phoenix-pm-list@happyfunball.pm.org > To: phoenix-pm-list@happyfunball.pm.org > Subject: Re: Phoenix.pm: dumb question > > > Hmm.. umask only blocks permissions, it never assigns them. I think there's > a global umask out there somewhere - anyone with *longing sigh* Unix correct > me if I'm wrong? Anyhow, if I'm not, you may just be able to disable that > and have 0777 as your default permissions then. > > Otherwise, my suggestion (nasty as it may be) is to cron a chmod -R > > Luck, > -Kurt > > ------ > > "Push to test." > > "Release to detonate." > -Brad Morrison > > ----- Original Message ----- > From: Glen G. Walker > To: > Sent: Thursday, October 21, 1999 12:12 PM > Subject: Phoenix.pm: dumb question > > > > OK, so I have an updater that writes files to a folder. On the old server, > we did something kinky so the new files would write with permissions of > -rwxrwxrwx when created into the various folders. I am trying to figure > out how to set up the directories to just automatically change permissions > to files written to them and have gotten nowhere with the man files for > chmod or umask. > > Any suggestions? > > ---------------------------------------------------------------------------- > --- > Glen G. Walker, coyotl@primenet.com > www.primenet.com/~coyotl > ---------------------------------------------------------------------------- > --- > > > From Ron.Giffin at motorola.com Fri Oct 22 16:38:02 1999 From: Ron.Giffin at motorola.com (Giffin Ron-P08295) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Glob limit Message-ID: <01CA656A687ED211926B00805F779140A7B81D@az25exm02.geg.mot.com> Hi, I'm using glob to build a list (array) of filenames. There are about 4000 filenames that the glob should find (*.dat). I get various errors depending on how I call glob. I would be disappointed if this were a Perl limitation, however I'm betting it is a system problem. Any fixes or workarounds? Thanx, -- Ron From edelsys at edelsys.com Fri Oct 22 16:53:16 1999 From: edelsys at edelsys.com (EdelSys Consulting) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Glob limit In-Reply-To: <01CA656A687ED211926B00805F779140A7B81D@az25exm02.geg.mot.c om> Message-ID: <3.0.6.32.19991022145316.00877430@swlink.net> At 02:38 PM 10/22/1999 -0700, you wrote: >Hi, >I'm using glob to build a list (array) of filenames. There are about 4000 >filenames that the glob should find (*.dat). I get various errors depending >on how I call glob. I would be disappointed if this were a Perl limitation, >however I'm betting it is a system problem. Any fixes or workarounds? >Thanx, What operating system are you using? Did you try using opendir, readdir, closedir functions? > > -- Ron > > > -- -- Anthony R. Nemmer -- EdelSys Consulting -- http://www.edelsys.com/ -- edelsys@edelsys.com -- EFNet IRC Teratogen -- ICQ #14638605 -- edelsys@hotmail.com -- (480) 968-6438 -- P.O. Box 1883, Tempe, Arizona 85280-1883 -- From kev at primenet.com Fri Oct 22 16:48:47 1999 From: kev at primenet.com (Kevin Buettner) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Glob limit In-Reply-To: Giffin Ron-P08295 "Phoenix.pm: Glob limit" (Oct 22, 2:38pm) References: <01CA656A687ED211926B00805F779140A7B81D@az25exm02.geg.mot.com> Message-ID: <991022214847.ZM17093@saguaro.lan> On Oct 22, 2:38pm, Giffin Ron-P08295 wrote: > I'm using glob to build a list (array) of filenames. There are about 4000 > filenames that the glob should find (*.dat). I get various errors depending > on how I call glob. I would be disappointed if this were a Perl limitation, > however I'm betting it is a system problem. Any fixes or workarounds? I'm betting it's a system limitation as well. (You didn't say what kind of system you were running it on or what the various errors were.) In any event, you might want to try using File::Find or perhaps opendir/ readdir/closedir. (Personally, I like File::Find.) Kevin -- Kevin Buettner kev@primenet.com, kevinb@cygnus.com From Ron.Giffin at motorola.com Fri Oct 22 17:06:30 1999 From: Ron.Giffin at motorola.com (Giffin Ron-P08295) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Glob limit Message-ID: <01CA656A687ED211926B00805F779140A7B81E@az25exm02.geg.mot.com> I don't believe opendir,... will help. I get the errors when I use the unix wildcard * IE: @files = `ls *.dat` ; or @files = glob ( "*.dat" ) ; or even foreach $file ( <*.dat> ) { ... } I will look at file::find. -----Original Message----- From: Kevin Buettner [mailto:kev@primenet.com] Sent: Friday, October 22, 1999 2:49 PM To: phoenix-pm-list@happyfunball.pm.org Subject: Re: Phoenix.pm: Glob limit On Oct 22, 2:38pm, Giffin Ron-P08295 wrote: > I'm using glob to build a list (array) of filenames. There are about 4000 > filenames that the glob should find (*.dat). I get various errors depending > on how I call glob. I would be disappointed if this were a Perl limitation, > however I'm betting it is a system problem. Any fixes or workarounds? I'm betting it's a system limitation as well. (You didn't say what kind of system you were running it on or what the various errors were.) In any event, you might want to try using File::Find or perhaps opendir/ readdir/closedir. (Personally, I like File::Find.) Kevin -- Kevin Buettner kev@primenet.com, kevinb@cygnus.com From kev at primenet.com Fri Oct 22 17:20:37 1999 From: kev at primenet.com (Kevin Buettner) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Glob limit In-Reply-To: Giffin Ron-P08295 "RE: Phoenix.pm: Glob limit" (Oct 22, 3:06pm) References: <01CA656A687ED211926B00805F779140A7B81E@az25exm02.geg.mot.com> Message-ID: <991022222037.ZM17189@saguaro.lan> On Oct 22, 3:06pm, Giffin Ron-P08295 wrote: > I don't believe opendir,... will help. I get the errors when I > use the unix wildcard * IE: > @files = `ls *.dat` ; or @files = glob ( "*.dat" ) ; or even > foreach $file ( <*.dat> ) { ... } I will look at file::find. I did say I was partial to File::Find, but in this case opendir/ readdir/closedir might be better. (Unless you need to traverse a directory structure in which case File::Find would probably be better.) Try this: --- test-opendir.pl --- #!/usr/bin/perl -w opendir DIR, '.' or die "Can't open .: $!"; @files = grep /.dat$/, readdir DIR; closedir DIR or die "Can't close .: $!"; print join "\n", sort @files; print "\n"; --- end test-opendir.pl --- -- Kevin Buettner kev@primenet.com, kevinb@cygnus.com From Ron.Giffin at motorola.com Fri Oct 22 17:46:46 1999 From: Ron.Giffin at motorola.com (Giffin Ron-P08295) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Glob limit Message-ID: <01CA656A687ED211926B00805F779140A7B81F@az25exm02.geg.mot.com> Thanx Kevin. Works great. Just what I wanted. -----Original Message----- From: Kevin Buettner [mailto:kev@primenet.com] Sent: Friday, October 22, 1999 3:21 PM To: phoenix-pm-list@happyfunball.pm.org Subject: Re: Phoenix.pm: Glob limit On Oct 22, 3:06pm, Giffin Ron-P08295 wrote: > I don't believe opendir,... will help. I get the errors when I > use the unix wildcard * IE: > @files = `ls *.dat` ; or @files = glob ( "*.dat" ) ; or even > foreach $file ( <*.dat> ) { ... } I will look at file::find. I did say I was partial to File::Find, but in this case opendir/ readdir/closedir might be better. (Unless you need to traverse a directory structure in which case File::Find would probably be better.) Try this: --- test-opendir.pl --- #!/usr/bin/perl -w opendir DIR, '.' or die "Can't open .: $!"; @files = grep /.dat$/, readdir DIR; closedir DIR or die "Can't close .: $!"; print join "\n", sort @files; print "\n"; --- end test-opendir.pl --- -- Kevin Buettner kev@primenet.com, kevinb@cygnus.com From doug.miles at bpxinternet.com Thu Oct 28 12:58:30 1999 From: doug.miles at bpxinternet.com (Douglas E. Miles) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: [Meeting 11/02/1999] Message-ID: <38188EC6.31D20D9C@bpxinternet.com> We'll be having a Phoenix.pm meeting Tuesday November 2nd at 7:00PM. It will be held at The Willow House, which is located at 149 W. McDowell Rd., which is just West of Bowne on McDowell. This is a social meeting, so just show up, hang out, and have fun. The Willow House has coffee, and sandwiches, so bring some money if you are hungry. If you want more information, visit http://www.willowhouse.com/. See you there! -- People understand instinctively that the best way for computer programs to communicate with each other is for each of the them to be strict in what they emit, and liberal in what they accept. The odd thing is that people themselves are not willing to be strict in how they speak, and liberal in how they listen. --Larry Wall, 2nd State of the Onion Address, August 1998 From doug.miles at bpxinternet.com Fri Oct 29 14:20:11 1999 From: doug.miles at bpxinternet.com (Douglas E. Miles) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Meeting 11/02/1999 Message-ID: <3819F36B.8028131F@bpxinternet.com> "Douglas E. Miles" wrote: > > We'll be having a Phoenix.pm meeting Tuesday November 2nd at 7:00PM. > It will be held at The Willow House, which is located at 149 W. McDowell > Rd., which is just West of Bowne on McDowell. This is a social meeting, > so just show up, hang out, and have fun. The Willow House has coffee, > and sandwiches, so bring some money if you are hungry. If you want more > information, visit http://www.willowhouse.com/. See you there! -- For a list of the ways which technology has failed to improve our quality of life, press 3. From doug.miles at bpxinternet.com Fri Oct 29 14:47:14 1999 From: doug.miles at bpxinternet.com (Douglas E. Miles) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Server problems Message-ID: <3819F9C2.E4C8C82D@bpxinternet.com> As some of you may have noticed, the server that supports our web server and mailing list has been having problems this week. From what little I have heard, it sounded fairly catastrophic. That's why my meeting announcement is so late this week. Also, our web page contest has been delayed because of this. We'll discuss the situation at the meeting. -- For a list of the ways which technology has failed to improve our quality of life, press 3. From doug.miles at bpxinternet.com Fri Oct 29 16:09:54 1999 From: doug.miles at bpxinternet.com (Douglas E. Miles) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Is anyone out there? Message-ID: <381A0D22.FDF9CB01@bpxinternet.com> Just checking the list. Reply if you feel like it. I just want to make sure we're operational again. -- For a list of the ways which technology has failed to improve our quality of life, press 3. From doug.miles at bpxinternet.com Fri Oct 29 16:14:44 1999 From: doug.miles at bpxinternet.com (Douglas E. Miles) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Parse::RecDescent Message-ID: <381A0E44.FBE18419@bpxinternet.com> Anybody out there use Parse::RecDescent? I won't pollute the list with my question if nobody knows anything about it. :) -- For a list of the ways which technology has failed to improve our quality of life, press 3. From rcox at email.uophx.edu Fri Oct 29 16:42:31 1999 From: rcox at email.uophx.edu (Rich Cox) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Is anyone out there? References: <381A0D22.FDF9CB01@bpxinternet.com> Message-ID: <000f01bf2256$84003080$351da8c0@apollogrp.edu> Yeah Doug.. It's working! .. Rich Cox UOP Internet Tech Support 1-877-832-4867 x4724 ----- Original Message ----- From: Douglas E. Miles To: Phoenix.pm Sent: Friday, October 29, 1999 2:09 PM Subject: Phoenix.pm: Is anyone out there? > Just checking the list. Reply if you feel like it. I just want to make > sure we're operational again. > > -- > For a list of the ways which technology has failed > to improve our quality of life, press 3. > From phaedrus at endless.org Fri Oct 29 16:42:32 1999 From: phaedrus at endless.org (Phaedrus) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Is anyone out there? In-Reply-To: <381A0D22.FDF9CB01@bpxinternet.com> Message-ID: La la, la lista! La la, la lista! From billc at campuswide.com Fri Oct 29 16:23:01 1999 From: billc at campuswide.com (Bill Capen) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Is anyone out there? Message-ID: yup -----Original Message----- From: Douglas E. Miles [mailto:doug.miles@bpxinternet.com] Sent: Friday, October 29, 1999 2:10 PM To: Phoenix.pm Subject: Phoenix.pm: Is anyone out there? Just checking the list. Reply if you feel like it. I just want to make sure we're operational again. -- For a list of the ways which technology has failed to improve our quality of life, press 3. From phaedrus at endless.org Fri Oct 29 16:48:56 1999 From: phaedrus at endless.org (Phaedrus) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Parse::RecDescent In-Reply-To: <381A0E44.FBE18419@bpxinternet.com> Message-ID: > From: Douglas E. Miles > > Anybody out there use Parse::RecDescent? I won't pollute the list with > my question if nobody knows anything about it. :) > Doug - Could you please ask us anyway, just as a brain teaser if nothing else? Saves money on having to buy crossword puzzle books in the store, and god knows there are no Perl algorithms crossword puzzles... -scott From Mark.Pease at motorola.com Fri Oct 29 17:04:21 1999 From: Mark.Pease at motorola.com (Mark Pease) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Is anyone out there? References: <381A0D22.FDF9CB01@bpxinternet.com> Message-ID: <381A19E5.30B45BBE@motorola.com> "Douglas E. Miles" wrote: > > Just checking the list. Reply if you feel like it. I just want to make > sure we're operational again. > > -- > For a list of the ways which technology has failed > to improve our quality of life, press 3. Works for me! Just so this is not a completely empty message, here is something that I put together several years ago. Enjoy! 12 Steps to Programming Freedom 1. We admitted we were powerless over programming - that our lives had become unmanageable. 2. Came to believe that a Language greater than AWK/SED/Shell could restore us to sanity. 3. Made a decision to turn our programming efforts over to the care of Perl as we understood It. 4. Made a searching and fearless inventory of our programming practices. 5. Admitted to Larry, to ourselves, and to another programmers the exact nature of out wrongs. 6. Were entirely ready to have Perl remove all these defects of programming practice. 7. Humbly start programming in Perl to remove our shortcomings. 8. Made a list of all programs we had harmed, and became willing to make amends to them all. 9. Made a direct amends to such programs, by rewriting in Perl, wherever possible, except when to do so would injure them or others. 10. Continued to take personal inventory of programming practices and when we were wrong promptly admitted it. 11. Sought through object-oriented programming to improve our conscious contact with Perl as we understood It, studying the Camel for knowledge of Perl's syntax and the power to carry that out. 12. Having had an awakening as the result of these steps, we tried to carry this message to other programmers and to practice these principles in all our programs. -- Mark Pease Mark.Pease@mototorola.com Motorola DigitalDNA(tm) Laboratories perl@perl.sps.mot.com 2100 E. Elliot Rd. Phone:(602)413-8191 Mail Stop: AZ34 EL701 Tempe, AZ 85284 Pager:(800)381-3304 FAX:(602)413-8183 Co-Author (with Carl Dichter) of "Software Engineering with Perl" From Mark.Pease at motorola.com Fri Oct 29 17:05:25 1999 From: Mark.Pease at motorola.com (Mark Pease) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Parse::RecDescent References: <381A0E44.FBE18419@bpxinternet.com> Message-ID: <381A1A25.3E2EEE25@motorola.com> "Douglas E. Miles" wrote: > > Anybody out there use Parse::RecDescent? I won't pollute the list with > my question if nobody knows anything about it. :) > > -- > For a list of the ways which technology has failed > to improve our quality of life, press 3. Yes. What's up? -- Mark Pease Mark.Pease@mototorola.com Motorola DigitalDNA(tm) Laboratories perl@perl.sps.mot.com 2100 E. Elliot Rd. Phone:(602)413-8191 Mail Stop: AZ34 EL701 Tempe, AZ 85284 Pager:(800)381-3304 FAX:(602)413-8183 Co-Author (with Carl Dichter) of "Software Engineering with Perl" From sinck at ip100.corp.quepasa.com Fri Oct 29 17:15:34 1999 From: sinck at ip100.corp.quepasa.com (David Sinck) Date: Thu Aug 5 00:17:36 2004 Subject: Phoenix.pm: Parse::RecDescent References: <381A0E44.FBE18419@bpxinternet.com> Message-ID: <14362.7302.773515.568182@ip100.corp.quepasa.com> \_ > From: Douglas E. Miles \_ > \_ > Anybody out there use Parse::RecDescent? I won't pollute the list with \_ > my question if nobody knows anything about it. :) \_ > \_ \_ Doug - \_ \_ Could you please ask us anyway, just as a brain teaser if nothing else? \_ Saves money on having to buy crossword puzzle books in the store, and god \_ knows there are no Perl algorithms crossword puzzles... Bah...try to resolve how TPJ's obfuscated code contest entries work. :-) From Ron.Giffin at motorola.com Fri Oct 29 17:26:38 1999 From: Ron.Giffin at motorola.com (Giffin Ron-P08295) Date: Thu Aug 5 00:17:37 2004 Subject: Phoenix.pm: Is anyone out there? Message-ID: <01CA656A687ED211926B00805F779140A7B82C@az25exm02.geg.mot.com> I like your 12 steps. Think I'll take them to my Coda group. They will probably throw me out! -----Original Message----- From: Mark Pease [mailto:Mark_Pease-RXYE40@email.mot.com] Sent: Friday, October 29, 1999 3:04 PM To: phoenix-pm-list@happyfunball.pm.org Subject: Re: Phoenix.pm: Is anyone out there? "Douglas E. Miles" wrote: > > Just checking the list. Reply if you feel like it. I just want to make > sure we're operational again. > > -- > For a list of the ways which technology has failed > to improve our quality of life, press 3. Works for me! Just so this is not a completely empty message, here is something that I put together several years ago. Enjoy! 12 Steps to Programming Freedom 1. We admitted we were powerless over programming - that our lives had become unmanageable. 2. Came to believe that a Language greater than AWK/SED/Shell could restore us to sanity. 3. Made a decision to turn our programming efforts over to the care of Perl as we understood It. 4. Made a searching and fearless inventory of our programming practices. 5. Admitted to Larry, to ourselves, and to another programmers the exact nature of out wrongs. 6. Were entirely ready to have Perl remove all these defects of programming practice. 7. Humbly start programming in Perl to remove our shortcomings. 8. Made a list of all programs we had harmed, and became willing to make amends to them all. 9. Made a direct amends to such programs, by rewriting in Perl, wherever possible, except when to do so would injure them or others. 10. Continued to take personal inventory of programming practices and when we were wrong promptly admitted it. 11. Sought through object-oriented programming to improve our conscious contact with Perl as we understood It, studying the Camel for knowledge of Perl's syntax and the power to carry that out. 12. Having had an awakening as the result of these steps, we tried to carry this message to other programmers and to practice these principles in all our programs. -- Mark Pease Mark.Pease@mototorola.com Motorola DigitalDNA(tm) Laboratories perl@perl.sps.mot.com 2100 E. Elliot Rd. Phone:(602)413-8191 Mail Stop: AZ34 EL701 Tempe, AZ 85284 Pager:(800)381-3304 FAX:(602)413-8183 Co-Author (with Carl Dichter) of "Software Engineering with Perl" From phaedrus at endless.org Fri Oct 29 17:13:42 1999 From: phaedrus at endless.org (Phaedrus) Date: Thu Aug 5 00:17:37 2004 Subject: Phoenix.pm: Parse::RecDescent In-Reply-To: <14362.7302.773515.568182@ip100.corp.quepasa.com> Message-ID: > Bah...try to resolve how TPJ's obfuscated code contest entries work. > > :-) > Now THAT sounds like a brain teaser. I've heard so many references to these. Where are the winning entries archived? thanks! -scott From Bryan.Lane at VITALPS.COM Fri Oct 29 17:26:56 1999 From: Bryan.Lane at VITALPS.COM (Bryan Lane) Date: Thu Aug 5 00:17:37 2004 Subject: Phoenix.pm: Is anyone out there? Message-ID: I got it. -----Original Message----- From: Douglas E. Miles [mailto:doug.miles@bpxinternet.com] Sent: Friday, October 29, 1999 2:10 PM To: Phoenix.pm Subject: Phoenix.pm: Is anyone out there? Just checking the list. Reply if you feel like it. I just want to make sure we're operational again. -- For a list of the ways which technology has failed to improve our quality of life, press 3. From sinck at ip100.corp.quepasa.com Fri Oct 29 17:54:46 1999 From: sinck at ip100.corp.quepasa.com (David Sinck) Date: Thu Aug 5 00:17:37 2004 Subject: Phoenix.pm: Parse::RecDescent References: <14362.7302.773515.568182@ip100.corp.quepasa.com> Message-ID: <14362.9654.264904.995520@ip100.corp.quepasa.com> \_ Now THAT sounds like a brain teaser. I've heard so many references to \_ these. Where are the winning entries archived? They should be linked from www.tpj.com; if they aren't let me know and I'll go scan hardcopy for a link. David From dmiles at primenet.com Fri Oct 29 19:15:08 1999 From: dmiles at primenet.com (Doug and Julie Miles) Date: Thu Aug 5 00:17:37 2004 Subject: Phoenix.pm: Perl job opportunities Message-ID: <3.0.3.32.19991029171508.009d6b60@pop.primenet.com> If you are interested, tell them I sent you. I can use $500. :) >From: "Julie Hatcher" >To: >Subject: Perl job opportunities >Date: Fri, 29 Oct 1999 17:00:11 -0500 >X-MSMail-Priority: Normal >X-Mailer: Microsoft Outlook IMO, Build 9.0.2416 (9.0.2910.0) >Importance: Normal >X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2615.200 > >We are a National Consulting company looking for potential employees >with Perl Programming experience. > >We have full benefits: >* 401k >* Profit sharing >* Stock Options >* Multiple compensation models >* Great nationwide group health insurance >* Great relocation and/or travel package > >and more... > >The following Perl Programmer position offers an annual compensation in >excess of $100,000! > >********************************************************************** >1. Perl programming experience required >2. HP OpenView IT/Operations experience is a bonus >3. HP-UX or NT Operating System experience is a bonus >4. SQL, Patrol, HP-NNM, Ciscoworks, CGI or Oracle experience is a bonus >5. Ability to travel or relocate is required >********************************************************************** > >Please reply with a resume as soon as possible to jhatcher@writeme.com > >We will also pay $500 for any one you refer to us that we eventually >hire. > > From doug.miles at bpxinternet.com Fri Oct 29 22:15:04 1999 From: doug.miles at bpxinternet.com (Douglas E. Miles) Date: Thu Aug 5 00:17:37 2004 Subject: Phoenix.pm: Re: Parse::RecDescent Message-ID: <381A62B8.AFB09C98@bpxinternet.com> >"Douglas E. Miles" wrote: >> >> Anybody out there use Parse::RecDescent? I won't pollute the list with >> my question if nobody knows anything about it. :) >> >> -- >> For a list of the ways which technology has failed >> to improve our quality of life, press 3. > >Yes. What's up? I'm trying to parse something in the form of . Where something and something else can be multiple words. I know that the code below is totally wrong, but hopefully gives you the idea. The problem is that the word(s) (/\w+/) greedily gobbles up all of the words in the statement. I have tried several variations with lookaheads (...) but haven't had any luck. ANY ideas would be great. Thanks! OK, here's my code: #! /usr/bin/perl use Parse::RecDescent; my $grammar = q{ statement : x verb y { print join('|', @item) . "\n"; } x : word(s) { print join('|', @item) . "\n"; $::x = $item[1]; } y : word(s) /$/ { print join('|', @item) . "\n"; $::y = $item[1]; } word : /\w+/ { print join('|', @item) . "\n"; } verb : /is|are|was/i { print join('|', @item) . "\n"; $::verb = $item[1]; } }; my $parse = new Parse::RecDescent ($grammar); print "> "; while (<>) { $parse->statement($_); print "> "; } -- "We've heard that a million monkeys at a million keyboards could produce the Complete Works of Shakespeare; now, thanks to the Internet, we know this is not true." --Robert Wilensky