<html>
<head>
<meta content="text/html; charset=ISO-8859-1"
http-equiv="Content-Type">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<div class="moz-cite-prefix"><font face="Helvetica, Arial,
sans-serif">Wow! I'll take that compliment, sir! "Greater love
no man hath than he that complementeth the Perl of his friends"
(or something like that, right?)<br>
<br>
** <b>One thing to note for anyone trying out that code: it
just got some important bug fixes, so you'll want to git pull</b>
**<br>
<br>
--Tommy Butler<br>
<br>
On 12/30/2013 02:38 PM, Rob Eaglestone wrote:<br>
</font></div>
<blockquote
cite="mid:CABNTyr9gj7G6QO-Hk8ULN3JLiaiC04RBuHGAtZ6TzF8mrAsVpg@mail.gmail.com"
type="cite">
<div dir="ltr"><font face="Helvetica, Arial, sans-serif">That's
beautiful Perl, Tommy. I see I will have to replace my old
"Programming Perl" book with one updated for the 2000s (mine
is dated 1996, and shows Perl at version 5.003).<br>
</font></div>
<div class="gmail_extra">
<font face="Helvetica, Arial, sans-serif"><br>
<br>
</font>
<div class="gmail_quote"><font face="Helvetica, Arial,
sans-serif">On Tue, Dec 24, 2013 at 12:41 PM, Tommy Butler <span
dir="ltr"><<a moz-do-not-send="true"
href="mailto:dfwpm@internetalias.net" target="_blank">dfwpm@internetalias.net</a>></span>
wrote:<br>
</font>
<blockquote class="gmail_quote" style="margin:0 0 0
.8ex;border-left:1px #ccc solid;padding-left:1ex">
<div bgcolor="#FFFFFF" text="#000000"> <font
face="Helvetica, Arial, sans-serif">Full disclosure: I'm
not competing in the contest as John and I are hosting
it and have written the code that generates the random
dataset.<br>
</font> <font face="Helvetica, Arial, sans-serif"><br>
However I wrote some example code that does work and
which I'd like to share to help give others a gentle
push if anyone is having trouble getting started.<br>
</font> <font face="Helvetica, Arial, sans-serif"><br>
Feel free to steal/fork/laugh at the code as much as you
like. The code isn't extensively commented but it is
very readable. It's also simple and concise and makes
use of CPAN modules, some of which use XS code to get
performance gains -- which is within the rules for the
"traditional Perl solution" competition category.<br>
</font> <font face="Helvetica, Arial, sans-serif"><br>
One provision is that my code purposely does not solve
all the problems. In particular it doesn't handle hard
links. That's up to you to solve.<br>
</font> <font face="Helvetica, Arial, sans-serif"><br>
</font> <font face="Helvetica, Arial, sans-serif"><a
moz-do-not-send="true"
href="https://github.com/tommybutler/dupfind"
target="_blank">https://github.com/tommybutler/dupfind</a><span
class="HOEnZb"><font color="#888888"><br>
<br>
--Tommy Butler</font></span></font><font
face="Helvetica, Arial, sans-serif"><br>
</font></div>
</blockquote>
</div>
</div>
</blockquote>
</body>
</html>