Count FlexibleContexts usage on hackage

scan-hackage.sh

#!/bin/bash

ROOT=http://hackage.haskell.org

PACKAGES=`curl -s http://hackage.haskell.org/packages/ \
  | sed 's/href/\n/g' \
  | grep -o '/package/[^"]*'`

echo Total number of packages
echo $PACKAGES | wc -w

FC=0
EX=0
for p in $PACKAGES ; do
  CABAL=`curl -s "$ROOT$p" \
    | grep -o '/package/[^"]*.cabal'`
  TEXT=`curl -s "$ROOT$CABAL"`
  echo "$TEXT" | grep -i extensions:
  if [[ $? == 0 ]] ; then
    EX=$(($EX+1))
  fi
  echo "$TEXT" | grep FlexibleContexts
  if [[ $? == 0 ]] ; then
    FC=$(($FC+1))
  fi
  >&2 printf .
done > /dev/null

echo
echo Packages with extensions
echo $EX
echo Packages with FlexibleContexts
echo $FC