user graff perl user since 1995, still learning (naturally). <P> Favorite Larry Wall quote (seen on the perlunicode mail list on May 10, 2004): <P><blockquote><em>Perl's always been about providing reasonable defaults, and will continue to do so. But changing what's reasonable is tricky, and sometimes you have to go through a period in which nothing can be considered reasonable.</em> </blockquote> <P> Favorite code that I've posted: <P> <hr> <table width="100%"> <tr class="highlight"> <td>416690</td> <td>[id://416690]</a> (script: "uni")</td> <td>SoPW</td> <td align="right">Updated: 2004-12-21 23:31</td> </tr> <tr> <td>1002076</td> <td>[id://1002076]</a></td> <td>SoPW</td> <td align="right">2012-11-03 00:44</td> </tr> <tr class="highlight"> <td>883695</td> <td>[id://883695]</a></td> <td>Cool uses for Perl</td> <td align="right">Updated: 2011-03-02 06:10</td> </tr> <tr> <td>868213</td> <td>[id://868213]</a></td> <td>SoPW</td> <td align="right">2010-10-28 23:12</td> </tr> <tr class="highlight"> <td>689110</td> <td>[id://689110]</a></td> <td>Code/Text Processing</td> <td align="right">2008-05-29 19:40</td> </tr> <tr> <td>613806</td> <td>[id://613806]</a></td> <td>Code/Text Processing</td> <td align="right">2007-05-06 04:02</td> </tr> <tr class="highlight"> <td>580477</td> <td>[id://580477]</a></td> <td>SoPW</td> <td align="right">2006-10-24 23:24</td> </tr> <tr> <td>573646</td> <td>[id://573646]</a></td> <td>Code/Text Processing</td> <td align="right">2006-09-19 02:02</td> </tr> <tr class="highlight"> <td>425868</td> <td>[id://425868]</a></td> <td>SoPW</td> <td align="right">2005-01-28 01:17</td> </tr> <tr> <td>345275</td> <td>[id://345275]</a></td> <td>Code/Utility Scripts</td> <td align="right">2004-04-14 20:45</td> </tr> <tr class="highlight"> <td>325146</td> <td>[id://325146]</td> <td>Snippets</td> <td align="right">2004-01-30 01:14</td> </tr> <tr> <td>217983</td> <td>[id://217983]</td> <td>SoPW</td> <td align="right">2002-12-05 23:44</td> </tr> <tr class="highlight"> <td>154018</td> <td>[id://154018]</td> <td>Code/Utilities</td> <td align="right">Updated: 2011-03-02 06:35</td> </tr> <tr> <td>160735</td> <td><a href="/index.pl?node_id=160735">cmpcol -- print intersection, union, xor of two lists</a></td> <td>Code/Utilities</td> <td align="right">2002-04-20 01:30</td> </tr> <tr class="highlight"> <td>721864</td> <td>[id://721864]</td> <td>Code/Utilities</td> <td align="right">2008-11-05 18:51</td> </tr> <tr> <td>275104</td> <td><a href="/index.pl?node_id=275104">Semfile.pm -- Sean Burke's module for semaphore files</a></td> <td>SoPW</td> <td align="right">2003-07-17 00:10</td> </tr> <tr class="highlight"> <td>171422</td> <td><a href="/index.pl?node_id=171422">Re: File::Find redux: how to limit hits?</a></td> <td>SoPW</td> <td align="right">2002-06-04 03:31</td> </tr> <tr> <td>154616</td> <td><a href="/index.pl?node_id=154616">DbiFunc.pm -- DBI wrapper</a></td> <td>Craft</td> <td align="right">2002-03-27 03:20</td> </tr> <tr class="highlight"> <td>247164</td> <td><a href="/index.pl?node_id=247164">Check a perl script for repeat "my" declarations</a></td> <td>Cool uses for Perl</td> <td align="right">2003-03-31 20:53</td> </tr> <tr> <td>170323</td> <td><a href="/index.pl?node_id=170323">Tabulate sub defs, sub calls in Perl code</a></td> <td>Cool uses for Perl</td> <td align="right">2002-05-30 03:02</td> </tr> <tr class="highlight"> <td>166379</td> <td><a href="/index.pl?node_id=166379">Tk cryptogram (no, not cryptography)</a></td> <td>Cool uses for Perl</td> <td align="right">2002-05-14 01:25</td> </tr> <tr> <td>210114</td> <td><a href="/index.pl?node_id=210114">Re: gzip written in perl</a></td> <td>SoPW</td> <td align="right">2002-11-03 22:29</td> </tr> </table> 2013-05-18 20:52:33 29914 358966 3695 Philadelphia -5 85 on