Select Code to Download

perl -MLWP::Simple -e 'my $page = get(qq|http://redis.io/topics/securi
+ty|); if($page=~m/(\S+\@\S+)/g){print qq|$1\t|}'

<antirez@gmail.com>
 #note: dumb regex on purpose to conf
+ound e-mail scanners