#!/usr/bin/perl
-# $Id: sqlt-graph.pl,v 1.1 2003-06-16 18:23:08 kycl4rk Exp $
+# $Id: sqlt-graph.pl,v 1.2 2003-06-16 18:25:59 kycl4rk Exp $
=head1 NAME
-auto-graph.pl - Automatically create a graph from a database schema
+sqlt-graph.pl - Automatically create a graph from a database schema
=head1 SYNOPSIS
- ./auto-graph.pl -d|--db=db_parser [options] schema.sql
+ ./sqlt-graph.pl -d|--db=db_parser [options] schema.sql
Options:
use Pod::Usage;
use SQL::Translator;
-my $VERSION = (qw$Revision: 1.1 $)[-1];
+my $VERSION = (qw$Revision: 1.2 $)[-1];
#
# Get arguments.