#!/bin/bash

# usage: usersubreddits user [pages]
# Which subreddits does user post in?

go () {
  if (( $1 > 0));then
    go $(($1 - 1)) "$(curl -A usersubreddits-1.0 "$2" |
                        tr \< \\n                     |
                        tee >( grep '>permalink$' |
                                 cut -d/ -f5    >&9 ) |
                        grep '>next$'                 |
                        cut -d\" -f2)"
  fi
}

go ${2:-7} http://www.reddit.com/user/"$1" 9>&1 |
  sort                                          |
  uniq -c                                       |
  sort -nr