#!/usr/bin/sh -e
# Fortune implementation in awk

awk '$1 == "%" {
  sub(/%/, "")
  ++f
}

{
  fortunes[f] = fortunes[f] (length(fortunes[f])?"\n":"") $0
}

END {
  "date +%N" | getline time
  srand(time)
  print fortunes[int(rand() * f) + 1]
}' ${1:-"/usr/share/fortune/cookie"}