File:  [Local Repository] / db / prgsrc / createindex.pl
Revision 1.1: download - view: text, annotated - select for diffs - revision graph
Wed Oct 18 15:46:45 2000 UTC (23 years, 6 months ago) by boris
Branches: MAIN
CVS tags: HEAD
Initial revision

#!/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>