CINXE.COM
jacques
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <!-- Took this out for IE6ites "http://www.w3.org/TR/REC-html40/loose.dtd" --> <html lang="en"> <head id="stdcontainer"> <title> jacques </title> <link rel="canonical" href="https://www.perlmonks.org/?node_id=223311" /> <!-- Theme : Web safe blue PerlMonks Theme --> <script language="javascript" type="text/javascript" src="?node=list%20replies%20toggle%20javascript" integrity="sha384-6jdBZxT7udN82vOTryPaLwqMohSfDF3HXv3M32KAZ7dOREMdAkYh9ZhoaKCgCXcr" crossorigin="anonymous"></script> <link rel="stylesheet" href="/css/common.css" type="text/css" /> <link rel="stylesheet" href="?node_id=204962" type="text/css" /> <!-- No CSS Link in Display Settings --> <!-- No CSS Data in Display Settings --> <link rel="icon" href="/favicon.ico" /> </head> <body id="id-223311"> <!-- monktainer --> <!-- monkbar2001 --> <table id="monkbar" width="100%" border="0" cellpadding="0" cellspacing="0"> <tr class="bannerrow"> <td align="left" width="100%"> <a href="http://pair.com"> <img src="//promote.pair.com/i/pair-banner-current.gif" height = "60" width = "468" alt = "Beefy Boxes and Bandwidth Generously Provided by pair Networks" /> </a> </td> <td rowspan="2" align="right" valign="bottom"> <!-- Monk Pic Turned Off In User Settings --> </td> </tr> <tr class="monkquip"> <td class="monkquip" valign="bottom" width="100%" > Don't ask to ask, just ask </td> </tr> <tr class="titlebar"> <td class="titlebar"> <form method="get" action="?" enctype="application/x-www-form-urlencoded" > <input type="text" name="node" id="search_text" size="20" maxlength="300" /> <input class="titlebar" type="submit" value="Search" /> </form> </td> <td class="titlebar" id="mb2001titlebar" align="right" > <a class="titlebar" href="?">PerlMonks</a> </td> </tr> </table> <!-- /monkbar2001 --> <!-- Begin title bar --> <table width="98%" align="center" id="titlebar-top"> <tbody> <tr> <td valign="middle" class="titlechooser"> <!-- node_info_string: (h3)Title and (span)Author --> <h3 class="other">jacques</h3> <span class="attribution">by <a href="?node_id=223311">jacques</a> <span class="attribution-title">(Priest)</span> </span> <!-- /node_info_string --> </td> <td valign="top" align="right" class="monktitlebar"> <!-- monktitlebar --> <ul class="topnavmenu inline-list"> <li><a href="?node_id=109">Log in</a></li><li><a href="?node_id=101">Create a new user</a></li> <li><a href="?">The Monastery Gates</a></li> <li><a href="?node=Seekers%20of%20Perl%20Wisdom">Seekers of Perl Wisdom</a></li> <li><a href="?node=Meditations">Meditations</a></li> <li><a href="?node=Cool%20Uses%20for%20Perl">Cool Uses For Perl</a></li> <li><a href="?node=Obfuscated%20Code">Obfuscation</a></li> <li><a href="?node=Tutorials">Tutorials</a></li> <li><a href="?node=Perl%20Poetry">Poetry</a></li> <li><a href="?node=Illuminations">Illuminations</a></li> <li><a href="?node=Reviews">Reviews</a></li> <li><a href="?node=Perl%20News">Perl News</a></li> <li><a href="?node=Recently%20Active%20Threads">Recent Threads</a></li> <li><a href="?node=Newest%20Nodes">Newest Nodes</a></li> <li><a href="?node=Super%20Search">Super Search</a></li> <li><a href="?node=Perl%20Monks%20Discussion">PerlMonks Discussion</a></li> <li><a href="?node=Tidings">What's New</a></li> </ul> <!-- args=(monktitlebar sitedoclet -TOPNAV_SPECIAL <li><a href="?node_id=109">Log in</a></li><li><a href="?node_id=101">Create a new user</a></li>) NODE.title = jacques NODE.owner = 223311 N.title = monktitlebar sitedoclet N.owner = 17342 --> <!-- /monktitlebar --> </td> </tr> </tbody> </table> <table width="98%" align="center" id="titlebar-bottom"> <tbody> <tr> <td valign="middle" class="titlechooser"> <!-- node_info_string: (span)Date and (span)Links --> <span class="attribution">on Dec 31, 2002 at 14:07 UTC</span> <span class="addlinks">( <a href="?node_id=223311">[id://223311]</a>=<a href="?node_id=15">user</a>: <a rel="nofollow" href="?node_id=223311;displaytype=print">print</a> <a rel="nofollow" href="?displaytype=print;replies=1;node_id=223311">w/replies</a>, <a href="?node_id=223311;displaytype=xml">xml</a> )</span> <!-- /node_info_string --> </td> <td valign="middle" align="right" class="monktitlebar"> <a href="?node=PerlMonks%20FAQ">Need Help??</a> </td> </tr> </tbody> </table> <!-- End title bar --> <!-- Begin main (monktainer) --> <center> <table width="98%"> <tr> <td width="80%" valign="top" class="main_content"> <!--contained stuff--> <!-- BEGIN general container --> <table class="pm-user-info"><tr> <td><img title="jacques's user image" alt="jacques's user image" src="?updated=20080430235557;node_id=234879" /></td> <td valign="top"> <table> <tr> <td>User since:</td> <td>Dec 31, 2002 at 14:07 UTC <i>(22 years ago)</i></td> </td> </tr><tr> <td>Last here:</td> <td>Aug 08, 2019 at 21:54 UTC <i>(5 years ago)</i></td> </tr><tr> <td>Experience:</td> <td><b> 4758 </b></td> </tr><tr> <td>Level:</td><td><b>Priest (14)</b></td> </tr><tr> <td>Writeups:</td> <td><b> <a href="?node_id=6364;user=jacques">528</a> </b></td> </tr> <tr><td>CPAN ID:</td><td><a href="https://metacpan.org/author/ACCARDO">ACCARDO</td></tr> <tr><td>Location:</td><td>Somewhere hot and tropical</td></tr> <tr> <td>User's localtime:</td><td> Nov 28, 2024 at 04:58 UTC </td> </tr><tr> <td>Scratchpad:</td><td> <a href="?viewmode=public;node_id=363262">View</a> </td> </tr> </td> </tr> <tr class="msg_user"><td>For this user:</td><td><a href="?a=jacques;node=Super%20Search">Search nodes</a></td></tr> </table> </td> </tr> </table> <p> <p> <p> <p> <p> <!-- <style type="text/css"> @import url("index.pl?node_id=204962"); @import url("http://www.perlmonks.org/index.pl?node_id=401810&displaytype=displaycode"); </style> //--> <tt> Before you speak, ask yourself: is it kind, is it necessary, is it true, does it improve on the silence?</tt> <p> <h3><a href="http://www.cafepress.com/perlgear">Buy My Perl T-shirts, support an open-source developer!!</a></h3> <table width='80%' cellpadding='10' cellspacing='10' border='1'> <tr align='left'> <td bgcolor='#fffff'> CPAN author:<br /> <a href='http://search.cpan.org/~accardo/Acme-Bushisms-0.02/Bushisms.pm'>Acme::Bushisms</a><br /> <a href='http://search.cpan.org/~accardo/HTML-Perlinfo/'>HTML::Perlinfo</a><br /> <a href='http://search.cpan.org/~accardo/Win32-Wallpaper-0.04/Wallpaper.pm'>Win32::Wallpaper</a><br /> <a href='http://search.cpan.org/~accardo/Win32-Die-0.01/Die.pm'>Win32::Die</a><br /> <a href='http://search.cpan.org/~accardo/win-0.03/win.pm'>Win</a> (a work in progress)<br /> <td bgcolor='#fffff'> Nodes I have contributed to the Monastery:<br /> <li><a href="?node_id=370072">Can of soda</a> <li><a href="?node_id=411526">On starting a new job</a> <li><a href="?node_id=454953">DBI speed up needed on MySQL</a> <li><a href="?node_id=346159">Java is from Mars, Perl is from Venus</a> <li><a href="?node_id=262550">PerlMessy: Perltidy's little tattletaling sister</a> </td> </tr> </table> <p> <big><tt>Jacques's Cheat Sheet</tt></big> <hr /> <tt class='inlinecode'>make test > test.txt 2>&1</tt> <br />Creating an array from the sql results on a single column. <pre class="code"><div class='codeblock'><tt class='codetext'>my @campaign_ids = @{ $dbh->selectcol_arrayref($events_sql)}; find . -name '*.pm' | wc -l find . -name "myfile*.*" -print 2>/dev/null for i in `ls *.pm`; do perl -Tcw -I ~/public_html/bps $i; done cvs -nq update -dA </tt></div><div class='embed-code-dl'><a href="?node_id=223311;displaytype=displaycode;part=2;abspart=1">[download]</a></div></pre> <a href="http://www.oualline.com/vim-cook.html">vim cookbook</a> <hr /> <big><tt>Nodes of interest</tt></big> <hr /> <a href="http://www.perlmonks.org/?node=273952">Speeding up the DBI</a><br /> <a href="http://www.perlmonks.org/?node=284436">DBI recipes</a> </p> <!-- END general container --> <!--/contained stuff--> </td> <!--nodelet handling code (monktainer)--> <td width="20%" valign="top" align="right" class="nodelets"> <!-- Begin nodelets --> <table class='nodelet_container' id='nodelet_container'> <!-- Nodelet Break --> <tbody class="nodelet" id="Log_In"> <tr><th class="nodelet_head"> <span class="title">Log In</span><a href="?node=About the Log In" class="nodelethead-annot"><sup>?</sup></a> </th></tr> <tr><td class="nodelet_body"> <form method="post" action="?" enctype="multipart/form-data" name="login"> <span><input type="hidden" name="node_id" value="223311" ></input></span> <input type="hidden" name="op" value="login" /> <input type="hidden" name="lastnode_id" value="223311" /> <table border="0"><tr><td> Username:</td><td> <input type="text" name="user" size="10" maxlength="34" /> </td></tr><tr><td> Password:</td><td> <input type="password" name="passwd" size="10" maxlength="10" /> </td></tr></table> <label><input type="checkbox" name="expires" value="+10y" />remember me</label> <input type="submit" name="login" value="Login" /> <br /> <a href="?node_id=2513">What's my password?</a> <br /> <a href="?node_id=101">Create A New User</a> </form> </td></tr> </tbody> <!-- Nodelet Break --> <tbody class="nodelet" id="Domain_Nodelet"> <tr><th class="nodelet_head"> <span class="title">Domain Nodelet</span><a href="?node=About the Domain Nodelet" class="nodelethead-annot"><sup>?</sup></a> </th></tr> <tr><td class="nodelet_body"> <p class='domain_link' align='center'><a class='wwwdomainlink' href="http://www.perlmonks.com/index.pl?node_id=223311">www</a>.<a class='domainlink' href="http://perlmonks.com/index.pl?node_id=223311">com</a> | <a class='wwwdomainlink' href="http://www.perlmonks.net/index.pl?node_id=223311">www</a>.<a class='domainlink' href="http://perlmonks.net/index.pl?node_id=223311">net</a> | <span class='currentdomain'>www</span>.<a class='domainlink' href="http://perlmonks.org/index.pl?node_id=223311">org</a></p> </td></tr> </tbody> <!-- Nodelet Break --> <tbody class="nodelet" id="Chatterbox"> <tr><th class="nodelet_head"> <span class="title">Chatterbox</span><a href="?node=About the Chatterbox" class="nodelethead-annot"><sup>?</sup></a> </th></tr> <tr><td class="nodelet_body"> <form method="get" action="?" enctype="multipart/form-data"> <span><input type="hidden" name="node_id" value="223311" ></input></span><i class="cb_quiet">and all is quiet...</i><br /> <input type="submit" name="foo" value="Refresh" /> </form> <i><br /> <a href="?node=ChatterBox%20FAQ">How do I use this?</a> • <a href="?node=last%20hour%20of%20cb">Last hour</a> • <a href="?node_id=20842">Other CB clients</a></i> </td></tr> </tbody> <!-- Nodelet Break --> <tbody class="nodelet" id="Other_Users"> <tr><th class="nodelet_head"> <span class="title">Other Users</span><a href="?node=About the Other Users" class="nodelethead-annot"><sup>?</sup></a> </th></tr> <tr><td class="nodelet_body"> <span class="other-users-text">Others <span class="other-users-blurb">scrutinizing</span> the Monastery:</span> (4)<br /><ul class="spacey-list"><li><span class='even-row'><span class='item-000'><span class='user-level-26'><span class='user-461912'><a title="GrandFather's home node. Level 26. Member of: janitors" href="?node_id=461912">GrandFather</a></span></span></span></span></li> <li><span class='odd-row'><span class='item-001'><span class='user-level-20'><span class='user-200365'><a href="?node_id=200365" title="Tux's home node. Level 20">Tux</a></span></span></span></span></li> <li><span class='even-row'><span class='item-002'><span class='user-level-16'><span class='user-890813'><a href="?node_id=890813" title="cavac's home node. Level 16. Member of: pmdev, SiteDocClan, QandAEditors">cavac</a></span></span></span></span></li> <li><span class='odd-row'><span class='item-003'><span class='user-level-1'><span class='user-11155664'><a href="?node_id=11155664" title="chatterbot's home node. Level 1">chatterbot</a></span></span></span></span></li> </ul><span class='update-time'><small>As of 2024-11-28 04:57 GMT</small></span> </td></tr> </tbody> <!-- Nodelet Break --> <tbody class="nodelet" id="Sections"> <tr><th class="nodelet_head"> <span class="title">Sections</span><a href="?node=About the Sections" class="nodelethead-annot"><sup>?</sup></a> </th></tr> <tr><td class="nodelet_body"> <ul class="spacey-list"> <li><a href="?node=Seekers%20of%20Perl%20Wisdom">Seekers of Perl Wisdom</a></li> <li><a href="?node=Cool%20Uses%20for%20Perl">Cool Uses for Perl</a></li> <li><a href="?node=Meditations">Meditations</a></li> <li><a href="?node=Perl%20Monks%20Discussion">PerlMonks Discussion</a></li> <li><a href="?node=Categorized%20Questions%20and%20Answers">Categorized Q&A</a></li> <li><a href="?node=Tutorials">Tutorials</a></li> <li><a href="?node=Obfuscated%20Code">Obfuscated Code</a></li> <li><a href="?node=Perl%20Poetry">Perl Poetry</a></li> <li><a href="?node=Perl%20News">Perl News</a></li> <li><a href="?node_id=483086">about</a></li> </ul> <!-- args=(Sections) NODE.title = jacques NODE.owner = 223311 N.title = Sections sitedoclet N.owner = 17342 --> </td></tr> </tbody> <!-- Nodelet Break --> <tbody class="nodelet" id="Information"> <tr><th class="nodelet_head"> <span class="title">Information</span><a href="?node=About the Information" class="nodelethead-annot"><sup>?</sup></a> </th></tr> <tr><td class="nodelet_body"> <ul class="spacey-list"> <li><a href="?node=PerlMonks%20FAQ">PerlMonks FAQ</a></li> <li><a href="?node=the%20Perl%20Monks%20guide%20to%20the%20Monastery">Guide to the Monastery</a></li> <li><a href="?node=Tidings">What's New at PerlMonks</a></li> <li><a href="?node=Voting%2FExperience%20System">Voting/Experience System</a></li> <li><a href="?node=Tutorials">Tutorials</a></li> <li><a href="?node=Reviews">Reviews</a></li> <li><a href="?node=Library">Library</a></li> <li><a href="?node=perlman%3Aperlfaq">Perl FAQs</a></li> <li><a href="?node=Where%20can%20I%20find%20more%20information%20on...">Other Info Sources</a></li> </ul> <!-- args=(Information sitedoclet -TIDINGS_NEW ) NODE.title = jacques NODE.owner = 223311 N.title = Information sitedoclet N.owner = 17342 --> </td></tr> </tbody> <!-- Nodelet Break --> <tbody class="nodelet" id="Find_Nodes"> <tr><th class="nodelet_head"> <span class="title">Find Nodes</span><a href="?node=About the Find Nodes" class="nodelethead-annot"><sup>?</sup></a> </th></tr> <tr><td class="nodelet_body"> <ul class="spacey-list"> <li><a href="?node_id=6364;user=961">Nodes You Wrote</a></li> <li><a href="?node=My%20Watched%20Nodes">My Watched Nodes</a></li> <li><a href="?node=Super%20Search">Super Search</a></li> <li><a href="?node=Perl%20Monks%20User%20Search">List Nodes By Users</a></li> <li><a href="?node=Newest%20Nodes">Newest Nodes</a></li> <li><a href="?node=Recently%20Active%20Threads">Recently Active Threads</a></li> <li><a href="?node=Selected%20Best%20Nodes">Selected Best Nodes</a></li> <li><a href="?node=Best%20Nodes">Best Nodes</a></li> <li><a href="?node=Worst%20Nodes">Worst Nodes</a></li> <li><a href="?node=Saints%20in%20our%20Book">Saints in our Book</a></li> <li><a href="?op=randomnode">Random Node</a></li> </ul> <!-- args=(Find Nodes sitedoclet -USER 961) NODE.title = jacques NODE.owner = 223311 N.title = Find Nodes sitedoclet N.owner = 17342 --> </td></tr> </tbody> <!-- Nodelet Break --> <tbody class="nodelet" id="Leftovers"> <tr><th class="nodelet_head"> <span class="title">Leftovers</span><a href="?node=About the Leftovers" class="nodelethead-annot"><sup>?</sup></a> </th></tr> <tr><td class="nodelet_body"> <ul class="spacey-list" id="user"></ul> <ul class="spacey-list" id="internal"> <li><a href="?node=The%20St.%20Larry%20Wall%20Shrine">The St. Larry Wall Shrine</a></li> <li><a href="?node=Offering%20Plate">Offering Plate</a></li> <li><a href="?node=Awards">Awards</a></li> <li><a href="?node=Quests">Quests</a></li> </ul> <ul class="spacey-list" id="external"> <li><a href="http://www.perl.org/">Perl</a></li> <li><a href="http://blogs.perl.org/">Perl Blogs</a></li> <li><a href="http://perl.com/">Perl.com</a></li> <li><a href="https://perl.theplanetarium.org/">Planet Perl</a></li> <li><a href="http://perlweekly.com/">Perl Weekly</a></li> <li><a href="http://jobs.perl.org/">Perl Jobs</a></li> <li><a href="http://www.pm.org/">Perl Mongers</a></li> <li><a href="http://perldoc.perl.org/">Perl documentation</a></li> <li><a href="https://metacpan.org/">MetaCPAN</a></li> <li><a href="http://cpan.perl.org/">CPAN</a></li> <li><a href="https://raku.org/">Raku</a></li> </ul> <!-- args=(Leftovers sitedoclet -USER_LINKS -TIL <span class="wikilink"><a href="?node_id=11156813">Today I Learned</a></span>) NODE.title = jacques NODE.owner = 223311 N.title = Leftovers sitedoclet N.owner = 17342 --> </td></tr> </tbody> <!-- Nodelet Break --> <tbody class="nodelet" id="Voting_Booth"> <tr><th class="nodelet_head"> <span class="title">Voting Booth</span><a href="?node=About the Voting Booth" class="nodelethead-annot"><sup>?</sup></a> </th></tr> <tr><td class="nodelet_body"> <div class="poll-vote-form"><b>chatterbot is...</b><form method="post" action="?" enctype="multipart/form-data"> <span><input type="hidden" name="displaytype" value="display" ></input></span><span><input type="hidden" name="node_id" value="11162559" ></input></span><p><label><input type="radio" name="vote" value="0" />Great! It updates <a href="?node_id=596792">last hour of cb</a> and helps me join a discussion </label><br /><label><input type="radio" name="vote" value="1" />The! Worst! Thing! Ever! It always ignores my self-upvotes for <a href="?node_id=11155739">cb stats</a>!!?! </label><br /><label><input type="radio" name="vote" value="2" />Somewhat useful in settling debates with coin flips and dice rolls </label><br /><label><input type="radio" name="vote" value="3" /><a href="?node=Chatterbot">Chatterbot</a>? Nobody told me about it! </label><br /><label><input type="radio" name="vote" value="4" />Not my cup of tea. I do not do that live chat thingie...</label><br /><input type="submit" value="Vote" /></p></form><p><a href="?node_id=11162559">Results (53 votes)</a>. Check out <a href="?node=past%20polls">past polls</a>.</p></div> </td></tr> </tbody> </table> <!-- End nodelets --> </td> <!--/nodelet handling code (monktainer)--> </tr> </table> </center> <!-- End main (monktainer)--> <br /> <br /> <div id="footer"> PerlMonks graciously bestowed by <a href="?node=vroom">Tim Vroom</a>.<br/> PerlMonks somehow became entangled with <a href="http://www.perlfoundation.org">The Perl Foundation</a>. <a href="?node=Offering%20Plate">Donate</a> to TPF!<br /> Beefy Boxes and Bandwidth Generously Provided by <a href="http://promote.pair.com/direct.pl?perlmonks.org"> pair Networks</a> <br/>Built with the <a href="http://perl.org">Perl programming language</a>. </div> <!-- /monktainer --> </body> </html>