#!/usr/local/bin/perl -w
=head1 NAME
createindex.pl - a script for creation of index of the database
=head1 SYNOPSIS
createindex.pl [B<-h]] | [B<-o> I<output_file>]
=head1 DESCRIPTION
This script will dump the current information about tournaments
tree to the standard output or I<output_file> in the format
ç|I<file> N*tabstops I<Name>
where ç is for groups, I<file> is for packages, N is the depth+2, I<Name>
is the name of the group/tournament
=head1 BUGS
The database, user and password are hardcoded.
=head1 AUTHOR
Boris Veytsman
=head1 $Id: createindex.pl,v 1.1 2000/10/18 15:46:45 boris Exp $
=cut
use DBI;
use strict;
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>