my $keyword = $ARGV[0] || die << "USAGE";

use: agenda keyword (databasefile separator pos.key)

  default database:  $db_file
  default separator: $separator
  default pos.key:   $pri

and so on
USAGE

# the line above marks the end