#!/usr/bin/awk -f
# HP 2013-07-29
{
  prv = cur;
  cur = $1;
  if (substr(prv,5,4)+1 != substr(cur,5,4)+0) {
    print prv " -> " cur
  }
}