in reply to Re: Contemplating some set comparison tasks
in thread Contemplating some set comparison tasks
Generate your sample data!
#! /usr/bin/perl open(RND, '<', '/dev/urandom') or die; sub id { local $/ = \20; unpack 'H40', <RND> } # random ID sub nk { int 1000**(1+rand 42)**-1 } # shaped rnd my @S = map id, 1 .. 20_000; do { print "$_|$S[rand@S]\n" for (id) x nk } for 1 .. 30_000_000;
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^3: Contemplating some set comparison tasks
by Laurent_R (Canon) on Aug 10, 2014 at 09:14 UTC |