On Fri, Jun 06 2014, Vladimir Marek <Vladimir.Marek@oracle.com> wrote:

> Hi,
>

 // stuff deleted //

>
> I'm attaching my perl script if anyone is interested. It's in no way
> complete solution. It is supposed to be used as
>
> notmuch search --output=files --duplicate=2 '*' > dups
> ./dedup # It opens the file 'dups'
>
> The attached version does not remove anyting (the 'unlink' command is
> commented out).
>
>
> Interestingly this does not work (it seems to return all messages):
> notmuch search --output=messages --duplicate=2 '*'
>
> Also I have found that if I run 'notmuch search' and 'notmuch new' at
> the same time, the notmuch search crashes sometimes. That's why I don't
> use
>
> notmuch search ... | ./dedup
>
> Use with care :)

To me, any perl code that lacks use strict; use warning; looks like a BIG
footgun ;/

>
> Thank you for your help
> -- 
> 	Vlad


Tomi

> #!/usr/bin/perl
>
> use Data::Dumper;
> use List::Util;
>
>
> @TO_IGNORE= (
>