From jhorner at 2jnetworks.com Wed Sep 5 11:00:29 2001 From: jhorner at 2jnetworks.com (J. J. Horner) Date: Thu Aug 5 00:05:27 2004 Subject: Meeting Scheduled ! Message-ID: <20010905120029.A9216@2jnetworks.com> I have another idea: If we have tutorials in our meetings only geared toward beginners, we may lose some advanced users. I think we should give two tutorials per meeting, or just do a beginners' tutorial on one meeting, then an advanced tutorial ("Working with Configuration Files", "Eval for Fun and Profit", etc), on the next meeting. Any ideas? Anyone going to get this message? Thanks, JJ -- J. J. Horner "H*","6d6174686c696e40326a6e6574776f726b732e636f6d" *************************************************** "H*","6a6a686f726e65724062656c6c736f7574682e6e6574" Freedom is an all-or-nothing proposition: either we are completely free, or we are subjects of a tyrannical system. If we lose one freedom in a thousand, we become completely subjugated. -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 232 bytes Desc: not available Url : http://mail.pm.org/archives/knoxville-pm/attachments/20010905/30e05d20/attachment.bin From kelley-mis at lisega.com Wed Sep 5 11:36:20 2001 From: kelley-mis at lisega.com (Nathan Kelley) Date: Thu Aug 5 00:05:27 2004 Subject: Meeting Scheduled ! References: <20010905120029.A9216@2jnetworks.com> Message-ID: <001001c13628$e589f560$2d0000c0@kelley2k> I got it... And I agree about easy/advanced tutorials Nathan Kelley ----- Original Message ----- From: "J. J. Horner" To: "Martin, David" Cc: Sent: Wednesday, September 05, 2001 12:00 PM Subject: Re: Meeting Scheduled ! http://knoxville.pm.org/ From MARTINDT at eetcorp.com Wed Sep 5 14:01:09 2001 From: MARTINDT at eetcorp.com (Martin, David) Date: Thu Aug 5 00:05:27 2004 Subject: Tutorials for meetings Message-ID: <60BC96DADB63D31196DF00508B444E158DD516@EET> Joy ! the list lives! I like the idea of having a beginner and an advanced tutorial as part of the festivities. You never know what advanced thing might be wanted by a beginner, or what curious thing a more advanced programmer might learn while preparing a beginner tutorial. Here are some ideas for beginner tutorials: localtime() how to make subroutines package scope regular expressions using perl from the command line pragmas like : strict, constant, vars, libs how to build perl from source perl debugger Plain Old Documentation (POD) perl on platforms other than Windows and Linux how to use various common modules: GD.pm, Tie::Registry, PDF::Create.pm, DBI.pm, Win32::ODBC.pm, CGI.pm, CGI::Lite.pm, Tk.pm, Quantum::Entanglement.pm ideas for advanced tutorials: h2xs - rolling your own perl modules references, data structures manipulating the symbol table regular expressions (yeah, this is on both lists!) closures classical data structures using perl builtins: lists, stacks, queues extending perl with swig, h2xs using home-made C program client-side perlscript how to get your own CPAN directory using embedding perl in text editors (emacs? vim?) comparison of perl and tcl, python, or ruby languages I'll bet there are another fifty things at least could be done in either category. hopefully we'll do them all eventually. > David Martin > EET Corp > martindt@eetcorp.com > 865.671.7800 > www.eetcorp.com > -- To the tune of "Yellow Submarine" "In the town where I was born lived a man who wrote in C And he told us of his life in the land of subroutines..." http://knoxville.pm.org/ From sml at zfx.com Wed Sep 5 14:47:35 2001 From: sml at zfx.com (Steve Lane) Date: Thu Aug 5 00:05:27 2004 Subject: Tutorials for meetings References: <60BC96DADB63D31196DF00508B444E158DD516@EET> Message-ID: <3B968157.5F0F160E@zfx.com> "Martin, David" wrote: > I like the idea of having a beginner and an advanced tutorial as part of the > festivities. You never know what advanced thing might be wanted by a > beginner, or what curious thing a more advanced programmer might learn while > preparing a beginner tutorial. > > Here are some ideas for beginner tutorials: > localtime() > how to make subroutines > package scope > regular expressions > using perl from the command line > pragmas like : strict, constant, vars, libs > how to build perl from source > perl debugger > Plain Old Documentation (POD) > perl on platforms other than Windows and Linux > how to use various common modules: GD.pm, Tie::Registry, PDF::Create.pm, > DBI.pm, Win32::ODBC.pm, CGI.pm, CGI::Lite.pm, Tk.pm, > Quantum::Entanglement.pm > > ideas for advanced tutorials: > h2xs - rolling your own perl modules > references, data structures > manipulating the symbol table > regular expressions (yeah, this is on both lists!) > closures > classical data structures using perl builtins: lists, stacks, queues > extending perl with swig, h2xs using home-made C program > client-side perlscript > how to get your own CPAN directory > using embedding perl in text editors (emacs? vim?) > comparison of perl and tcl, python, or ruby languages this is one helluva list of possible tutorials. they're all worthwhile, but here are my particular favorites from your list: localtime() how to make subroutines regular expressions using perl from the command line pragmas like : strict, constant, vars, libs how to build perl from source how to use various common modules: DBI.pm, CGI.pm, CGI::Lite.pm references, data structures manipulating the symbol table here's something from the stlouis list which would be excellent too: "Would anyone be willing to give a quick tutorial on how to locate, install, and uninstall perl modules? For example, LWP.pm and XML.pm." and to the list of commonly-used modules, i'd add LWP.pm (i use it almost daily), MIME::Entity (my current favorite way to send multipart email), Time::HiRes (simple but handy), Image::Size, Text::CSV, Tie::IxHash, List::Util, and Scalar::Util. mod_perl might make a good advanced topic, as might Inline.pm and Filter::*. -- Steve Lane http://knoxville.pm.org/ From jhorner at 2jnetworks.com Thu Sep 6 13:50:27 2001 From: jhorner at 2jnetworks.com (J. J. Horner) Date: Thu Aug 5 00:05:27 2004 Subject: CPAN account Message-ID: <20010906145027.A17751@2jnetworks.com> My CPAN account is active. As soon as my module and directories show up on the main lists, I'll let you know. Also, I'm beginning work on a new module for mod_perl. I'll detail my trials to the list so that others may learn. Thanks, JJ -- J. J. Horner "H*","6d6174686c696e40326a6e6574776f726b732e636f6d" *************************************************** "H*","6a6a686f726e65724062656c6c736f7574682e6e6574" Freedom is an all-or-nothing proposition: either we are completely free, or we are subjects of a tyrannical system. If we lose one freedom in a thousand, we become completely subjugated. -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 232 bytes Desc: not available Url : http://mail.pm.org/archives/knoxville-pm/attachments/20010906/8fa2a167/attachment.bin From sml at zfx.com Thu Sep 13 12:26:31 2001 From: sml at zfx.com (Steve Lane) Date: Thu Aug 5 00:05:27 2004 Subject: what are the binary characters of ASCII? Message-ID: <3BA0EC47.C67CD6A8@zfx.com> from `perldoc perlfunc`: The `-T' and `-B' switches work as follows. The first block or so of the file is examined for odd characters such as strange control codes or characters with the high bit set. If too many strange characters (>30%) are found, it's a `-B' file, otherwise it's a `-T' file. i'd like to know what is the set of ascii characters that perl considers "binary". i haven't been able to find anything online with a quick search. this is my current best guess: print if /[\000-\010\016-\031\200-\377]/; can anyone give a better set of "binary" ASCII characters? the reason i want to know this is: i'm parsing some large logfiles, and a small fraction of the lines in the files have "binary" characters, and i want to reject those lines as junk. so i'm looking for a suitable regex that will match such lines, which means i need a character class that matches all "binary" characters and no "text" characters, while understanding whether a character is "binary" may be in the eye of the beholder. -- Steve Lane http://knoxville.pm.org/ From MARTINDT at eetcorp.com Thu Sep 13 12:59:21 2001 From: MARTINDT at eetcorp.com (Martin, David) Date: Thu Aug 5 00:05:27 2004 Subject: what are the binary characters of ASCII? Message-ID: <60BC96DADB63D31196DF00508B444E158DD549@EET> it would be helpful to know if any of the things that are making perl think this is a binary file are in the high part of the ASCII character set. I had a telephone usage log to parse that was presumed binary because of ASCII HUL (value '\0') characters at the end of the lines. (I discovered this by dumping the first page or so of it with hexdump) If this is the only thing going on, you might be able to fix the files on the fly or pre-emptively by trimming out the NULs. David Martin EET Corp martindt@eetcorp.com 865.671.7800 www.eetcorp.com -- To the tune of "Yellow Submarine" "In the town where I was born lived a man who wrote in C And he told us of his life in the land of subroutines..." > -----Original Message----- > From: Steve Lane [mailto:sml@zfx.com] > Sent: Thursday, September 13, 2001 1:27 PM > To: knoxville-pm-list@pm.org > Subject: what are the binary characters of ASCII? > > > from `perldoc perlfunc`: > > The `-T' and `-B' switches work as follows. The > first block or so of the file is examined for odd > characters such as strange control codes or > characters with the high bit set. If too many > strange characters (>30%) are found, it's a `-B' > file, otherwise it's a `-T' file. > > i'd like to know what is the set of ascii characters > that perl considers "binary". i haven't been able > to find anything online with a quick search. this > is my current best guess: > > print if /[\000-\010\016-\031\200-\377]/; > > can anyone give a better set of "binary" > ASCII characters? > > the reason i want to know this is: i'm parsing some > large logfiles, and a small fraction of the lines in > the files have "binary" characters, and i want to > reject those lines as junk. so i'm looking for > a suitable regex that will match such lines, which > means i need a character class that matches all > "binary" characters and no "text" characters, > while understanding whether a character is "binary" > may be in the eye of the beholder. > -- > Steve Lane > http://knoxville.pm.org/ > http://knoxville.pm.org/ From sml at zfx.com Thu Sep 13 20:15:03 2001 From: sml at zfx.com (Steve Lane) Date: Thu Aug 5 00:05:27 2004 Subject: what are the binary characters of ASCII? References: <60BC96DADB63D31196DF00508B444E158DD549@EET> Message-ID: <3BA15A17.2E769939@zfx.com> > > -----Original Message----- > > From: Steve Lane [mailto:sml@zfx.com] > > Sent: Thursday, September 13, 2001 1:27 PM > > To: knoxville-pm-list@pm.org > > Subject: what are the binary characters of ASCII? > > > > > > from `perldoc perlfunc`: > > > > The `-T' and `-B' switches work as follows. The > > first block or so of the file is examined for odd > > characters such as strange control codes or > > characters with the high bit set. If too many > > strange characters (>30%) are found, it's a `-B' > > file, otherwise it's a `-T' file. > > > > i'd like to know what is the set of ascii characters > > that perl considers "binary". i haven't been able > > to find anything online with a quick search. this > > is my current best guess: > > > > print if /[\000-\010\016-\031\200-\377]/; > > > > can anyone give a better set of "binary" > > ASCII characters? > > > > the reason i want to know this is: i'm parsing some > > large logfiles, and a small fraction of the lines in > > the files have "binary" characters, and i want to > > reject those lines as junk. so i'm looking for > > a suitable regex that will match such lines, which > > means i need a character class that matches all > > "binary" characters and no "text" characters, > > while understanding whether a character is "binary" > > may be in the eye of the beholder. "Martin, David" wrote: > it would be helpful to know if any of the things that are making perl think > this is a binary file are in the high part of the ASCII character set. I > had a telephone usage log to parse that was presumed binary because of ASCII > HUL (value '\0') characters at the end of the lines. (I discovered this by > dumping the first page or so of it with hexdump) If this is the only thing > going on, you might be able to fix the files on the fly or pre-emptively by > trimming out the NULs. i'm not trying the fix the file. i just want to know what Perl's "binary" character set is defined to be, so i can replicate the behaviour of the -B test on a string, rather than having to write the string out to a temporary file and then using -B on the temporary file. -- Steve Lane http://knoxville.pm.org/ From MARTINDT at eetcorp.com Mon Sep 17 10:24:11 2001 From: MARTINDT at eetcorp.com (Martin, David) Date: Thu Aug 5 00:05:27 2004 Subject: October Meeting Message-ID: <60BC96DADB63D31196DF00508B444E158DD552@EET> Greetings, September meeting went pretty well. Does Monday, October 1, 2001 sound good for the next meeting? Same place (Stefano's) if I can get the room? The tutorials thing sounds very promising -- Any volunteers for a beginner and/or advanced topic? probably does not have to be long or particularly polished, as long as whoever is doing it is comfortable enough with it to explain it. Also, if anyone has something for a suitable door prize, please let me know or just bring it along for the drawing. Use your own definition of "suitable" as long as it's at least vaguely relatable. I will announce on the list when I get the reservation confirmed. > David Martin > EET Corp > martindt@eetcorp.com > 865.671.7800 > www.eetcorp.com > -- To the tune of "Yellow Submarine" "In the town where I was born lived a man who wrote in C And he told us of his life in the land of subroutines..." http://knoxville.pm.org/ From anthony at edge.net Mon Sep 17 11:47:45 2001 From: anthony at edge.net (Anthony Chatman) Date: Thu Aug 5 00:05:27 2004 Subject: October Meeting References: <60BC96DADB63D31196DF00508B444E158DD552@EET> Message-ID: <3BA62931.9040305@edge.net> October 1st is fine with me, but I would prefer October 8th as on October 1st I will be on-call that week, but then again that is what the wireless web is for :) Tony Martin, David wrote: > Greetings, > > September meeting went pretty well. Does Monday, October 1, 2001 sound good > for the next meeting? Same place (Stefano's) if I can get the room? > > The tutorials thing sounds very promising -- Any volunteers for a beginner > and/or advanced topic? probably does not have to be long or particularly > polished, as long as whoever is doing it is comfortable enough with it to > explain it. > > Also, if anyone has something for a suitable door prize, please let me know > or just bring it along for the drawing. Use your own definition of > "suitable" as long as it's at least vaguely relatable. > > I will announce on the list when I get the reservation confirmed. > > >>David Martin >>EET Corp >>martindt@eetcorp.com >>865.671.7800 >>www.eetcorp.com >> >> > -- To the tune of "Yellow Submarine" > "In the town where I was born > lived a man who wrote in C > And he told us of his life > in the land of subroutines..." > > http://knoxville.pm.org/ > > > http://knoxville.pm.org/ From MARTINDT at eetcorp.com Mon Sep 17 12:06:31 2001 From: MARTINDT at eetcorp.com (Martin, David) Date: Thu Aug 5 00:05:27 2004 Subject: October Meeting Message-ID: <60BC96DADB63D31196DF00508B444E158DD555@EET> > October 1st is fine with me, but I would prefer October 8th as on > October 1st I will be on-call that week, but then again that > is what the > wireless web is for :) that may be even better, since this is a small group and all we could be pretty flexible, and it would allow more time for us to figure out who would be able to do tutorials... Anybody have any idea how to get the web site updated? David Martin EET Corp martindt@eetcorp.com 865.671.7800 www.eetcorp.com -- To the tune of "Yellow Submarine" "In the town where I was born lived a man who wrote in C And he told us of his life in the land of subroutines..." > -----Original Message----- > From: Anthony Chatman [mailto:anthony@edge.net] > Sent: Monday, September 17, 2001 12:48 PM > To: knoxville-pm-list@pm.org > Subject: Re: October Meeting > > > > > > Tony > > > > > > > > > Martin, David wrote: > > > Greetings, > > > > September meeting went pretty well. Does Monday, October > 1, 2001 sound good > > for the next meeting? Same place (Stefano's) if I can get the room? > > > > The tutorials thing sounds very promising -- Any > volunteers for a beginner > > and/or advanced topic? probably does not have to be long > or particularly > > polished, as long as whoever is doing it is comfortable > enough with it to > > explain it. > > > > Also, if anyone has something for a suitable door prize, > please let me know > > or just bring it along for the drawing. Use your own definition of > > "suitable" as long as it's at least vaguely relatable. > > > > I will announce on the list when I get the reservation confirmed. > > > > > >>David Martin > >>EET Corp > >>martindt@eetcorp.com > >>865.671.7800 > >>www.eetcorp.com > >> > >> > > -- To the tune of "Yellow Submarine" > > "In the town where I was born > > lived a man who wrote in C > > And he told us of his life > > in the land of subroutines..." > > > > http://knoxville.pm.org/ > > > > > > > > > http://knoxville.pm.org/ > http://knoxville.pm.org/ From kelley-mis at lisega.com Mon Sep 17 13:06:53 2001 From: kelley-mis at lisega.com (Nathan Kelley) Date: Thu Aug 5 00:05:27 2004 Subject: October Meeting References: <60BC96DADB63D31196DF00508B444E158DD555@EET> Message-ID: <001f01c13fa3$88706150$2d0000c0@kelley2k> So far i'm open either week... it's fine either way ----- Original Message ----- From: "Martin, David" To: "'Anthony Chatman'" Cc: "Knoxville PM List (E-mail)" Sent: Monday, September 17, 2001 1:06 PM Subject: RE: October Meeting > > October 1st is fine with me, but I would prefer October 8th as on > > October 1st I will be on-call that week, but then again that > > is what the > > wireless web is for :) > > that may be even better, since this is a small group and all we could be > pretty flexible, and it would allow more time for us to figure out who would > be able to do tutorials... > > Anybody have any idea how to get the web site updated? > > David Martin > EET Corp > martindt@eetcorp.com > 865.671.7800 > www.eetcorp.com > > -- To the tune of "Yellow Submarine" > "In the town where I was born > lived a man who wrote in C > And he told us of his life > in the land of subroutines..." > > > > -----Original Message----- > > From: Anthony Chatman [mailto:anthony@edge.net] > > Sent: Monday, September 17, 2001 12:48 PM > > To: knoxville-pm-list@pm.org > > Subject: Re: October Meeting > > > > > > > > > > > > Tony > > > > > > > > > > > > > > > > > > Martin, David wrote: > > > > > Greetings, > > > > > > September meeting went pretty well. Does Monday, October > > 1, 2001 sound good > > > for the next meeting? Same place (Stefano's) if I can get the room? > > > > > > The tutorials thing sounds very promising -- Any > > volunteers for a beginner > > > and/or advanced topic? probably does not have to be long > > or particularly > > > polished, as long as whoever is doing it is comfortable > > enough with it to > > > explain it. > > > > > > Also, if anyone has something for a suitable door prize, > > please let me know > > > or just bring it along for the drawing. Use your own definition of > > > "suitable" as long as it's at least vaguely relatable. > > > > > > I will announce on the list when I get the reservation confirmed. > > > > > > > > >>David Martin > > >>EET Corp > > >>martindt@eetcorp.com > > >>865.671.7800 > > >>www.eetcorp.com > > >> > > >> > > > -- To the tune of "Yellow Submarine" > > > "In the town where I was born > > > lived a man who wrote in C > > > And he told us of his life > > > in the land of subroutines..." > > > > > > http://knoxville.pm.org/ > > > > > > > > > > > > > > > http://knoxville.pm.org/ > > > http://knoxville.pm.org/ > http://knoxville.pm.org/ From MARTINDT at eetcorp.com Wed Sep 19 14:43:27 2001 From: MARTINDT at eetcorp.com (Martin, David) Date: Thu Aug 5 00:05:27 2004 Subject: October Meeting Scheduled Message-ID: <60BC96DADB63D31196DF00508B444E158DD567@EET> Greetings ! The Second Lately Meeting of Knoxville PERL Mongers is October 8, 2001 beginning at 7:00 pm. at Stefano's, 7213 Kingston Pike. Anyone willing to do either a beginner or more advanced tutorial please mention it on the list. > David Martin > EET Corp > martindt@eetcorp.com > 865.671.7800 > www.eetcorp.com > -- To the tune of "Yellow Submarine" "In the town where I was born lived a man who wrote in C And he told us of his life in the land of subroutines..." http://knoxville.pm.org/ From jhorner at 2jnetworks.com Thu Sep 20 09:26:50 2001 From: jhorner at 2jnetworks.com (J. J. Horner) Date: Thu Aug 5 00:05:27 2004 Subject: October Meeting Scheduled In-Reply-To: <60BC96DADB63D31196DF00508B444E158DD567@EET>; from MARTINDT@eetcorp.com on Wed, Sep 19, 2001 at 03:43:27PM -0400 References: <60BC96DADB63D31196DF00508B444E158DD567@EET> Message-ID: <20010920102650.A18599@2jnetworks.com> I can do a small beginner tutorial. How beginner do you want it? I would probably like to do a tutorial on file access methods, and show some neat tricks for interacting with files. JJ * Martin, David (MARTINDT@eetcorp.com) [010919 15:55]: > Greetings ! > > The Second Lately Meeting of Knoxville PERL Mongers is October 8, 2001 > beginning at 7:00 pm. > > at Stefano's, 7213 Kingston Pike. > > Anyone willing to do either a beginner or more advanced tutorial please > mention it on the list. > > > David Martin > > EET Corp > > martindt@eetcorp.com > > 865.671.7800 > > www.eetcorp.com > > > -- To the tune of "Yellow Submarine" > "In the town where I was born > lived a man who wrote in C > And he told us of his life > in the land of subroutines..." > > http://knoxville.pm.org/ -- J. J. Horner "H*","6d6174686c696e40326a6e6574776f726b732e636f6d" *************************************************** "H*","6a6a686f726e65724062656c6c736f7574682e6e6574" Freedom is an all-or-nothing proposition: either we are completely free, or we are subjects of a tyrannical system. If we lose one freedom in a thousand, we become completely subjugated. -------------- next part -------------- A non-text attachment was scrubbed... Name: not available Type: application/pgp-signature Size: 232 bytes Desc: not available Url : http://mail.pm.org/archives/knoxville-pm/attachments/20010920/4943d27e/attachment.bin From MARTINDT at eetcorp.com Thu Sep 20 09:51:03 2001 From: MARTINDT at eetcorp.com (Martin, David) Date: Thu Aug 5 00:05:27 2004 Subject: October Meeting Scheduled Message-ID: <60BC96DADB63D31196DF00508B444E158DD56A@EET> > I can do a small beginner tutorial. How beginner do you want it? "As simple as you can and still due justice to the topic of the tutorial." Hmm. that might be a pretty good answer for the advanced stuff too. Looking forward to it! David Martin EET Corp martindt@eetcorp.com 865.671.7800 www.eetcorp.com -- To the tune of "Yellow Submarine" "In the town where I was born lived a man who wrote in C And he told us of his life in the land of subroutines..." > -----Original Message----- > From: J. J. Horner [mailto:jhorner@2jnetworks.com] > Sent: Thursday, September 20, 2001 10:27 AM > To: Martin, David > Cc: Knoxville PM List (E-mail) > Subject: Re: October Meeting Scheduled > > > I can do a small beginner tutorial. How beginner do you want it? > > I would probably like to do a tutorial on file access methods, > and show some neat tricks for interacting with files. > > JJ > > * Martin, David (MARTINDT@eetcorp.com) [010919 15:55]: > > Greetings ! > > > > The Second Lately Meeting of Knoxville PERL Mongers is > October 8, 2001 > > beginning at 7:00 pm. > > > > at Stefano's, 7213 Kingston Pike. > > > > Anyone willing to do either a beginner or more advanced > tutorial please > > mention it on the list. > > > > > David Martin > > > EET Corp > > > martindt@eetcorp.com > > > 865.671.7800 > > > www.eetcorp.com > > > > > -- To the tune of "Yellow Submarine" > > "In the town where I was born > > lived a man who wrote in C > > And he told us of his life > > in the land of subroutines..." > > > > http://knoxville.pm.org/ > > -- > J. J. Horner > "H*","6d6174686c696e40326a6e6574776f726b732e636f6d" > *************************************************** > "H*","6a6a686f726e65724062656c6c736f7574682e6e6574" > > Freedom is an all-or-nothing proposition: either we > are completely free, or we are subjects of a > tyrannical system. If we lose one freedom in a > thousand, we become completely subjugated. > http://knoxville.pm.org/ From MARTINDT at eetcorp.com Thu Sep 27 09:55:20 2001 From: MARTINDT at eetcorp.com (Martin, David) Date: Thu Aug 5 00:05:27 2004 Subject: PERL Poetry for Sept 11 Message-ID: <60BC96DADB63D31196DF00508B444E158DD5A3@EET> SHOCK: { fills (my $heart); unbelief (sinks=>'in'); END { my $sorrow; untie my $pain; } } ANGER: { fills (my $heart); curse $the{Dancers}; kill $the{Guilty}; DESTROY {$the{Mastermind}} } GRIEF: { fills (my $heart); bless $the{Dead}; thank (@{$the{Volunteers}}); BEGIN {a new()} } # structure: There are no structures; they have all collapsed. # use strict: There is no discipline; only chaos of madmen. # warnings: There is no warnings; there WERE no warnings. I found this at http://www.perlmonks.org/index.pl?node=Perl%20Poetry > David Martin > EET Corp > martindt@eetcorp.com > 865.671.7800 > www.eetcorp.com > > #--------------- Source Code is... let me see if I can remember... "prohibited?" no, that's not it...Source Code is... maybe it's this... "a terrorist threat?" no, that's not it... oh yeah, SOURCE CODE IS FREE SPEECH http://knoxville.pm.org/ From sml at zfx.com Thu Sep 27 10:55:20 2001 From: sml at zfx.com (Steve Lane) Date: Thu Aug 5 00:05:27 2004 Subject: PERL Poetry for Sept 11 References: <60BC96DADB63D31196DF00508B444E158DD5A3@EET> Message-ID: <3BB34BE8.D6F2996E@zfx.com> here's a modified version that passes `use strict` and warnings: my %the;sis:; BEGIN{$ _-- } SHOCK: { fills (my $heart); unbelief (sinks =>`in`); END { my $sorrow; untie my $pain; } } ANGER: { fills (my $heart); curse ($the {Dancers}); kill $the {Guilty}; DESTROY {$the {Mastermind}} } GRIEF: { fills (my $heart); bless $the {Dead}; thank (@{$the {Volunteers}}); BEGIN {?anew?} } # structure: There are no structures; # they have all collapsed. # use strict: There is no discipline; # only chaos of madmen. # warnings: There is no warnings; # there WERE no warnings. $ perl -Mstrict -wc wtc-poetry wtc-poetry syntax OK the first part is meant to be read as "my thesis begins --" but it's a little clumsy. and i don't have `curse` as a builtin yet. -- Steve "Martin, David" wrote: > > SHOCK: > { > fills (my $heart); > unbelief (sinks=>'in'); > END { my $sorrow; > untie my $pain; } > } > > ANGER: > { > fills (my $heart); > curse $the{Dancers}; > kill $the{Guilty}; > DESTROY {$the{Mastermind}} > } > > GRIEF: > { > fills (my $heart); > bless $the{Dead}; > thank (@{$the{Volunteers}}); > BEGIN {a new()} > } > > # structure: There are no structures; > they have all collapsed. > # use strict: There is no discipline; > only chaos of madmen. > # warnings: There is no warnings; > there WERE no warnings. > > I found this at http://www.perlmonks.org/index.pl?node=Perl%20Poetry -- Steve Lane http://knoxville.pm.org/