X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FSQL%2FTranslator%2FProducer%2FSqlfXML.pm;fp=lib%2FSQL%2FTranslator%2FProducer%2FXML.pm;h=f6333f2145b618324acf0d1ce08054c9c5082b6e;hb=c957e92dd6b604eed3167580716f418b9dec42f8;hp=2315b201fbc8c432ea81a1482f69ca397a1e0c86;hpb=cd617ba8fb3ad289b0a82bf7e8dad2b6521285e6;p=dbsrgits%2FSQL-Translator.git diff --git a/lib/SQL/Translator/Producer/XML.pm b/lib/SQL/Translator/Producer/SqlfXML.pm similarity index 90% rename from lib/SQL/Translator/Producer/XML.pm rename to lib/SQL/Translator/Producer/SqlfXML.pm index 2315b20..f6333f2 100644 --- a/lib/SQL/Translator/Producer/XML.pm +++ b/lib/SQL/Translator/Producer/SqlfXML.pm @@ -1,7 +1,7 @@ -package SQL::Translator::Producer::XML; +package SQL::Translator::Producer::SqlfXML; # ------------------------------------------------------------------- -# $Id: XML.pm,v 1.11 2003-07-31 20:48:23 dlc Exp $ +# $Id: SqlfXML.pm,v 1.1 2003-08-06 17:14:09 grommit Exp $ # ------------------------------------------------------------------- # Copyright (C) 2003 Ken Y. Clark , # darren chamberlain , @@ -24,7 +24,7 @@ package SQL::Translator::Producer::XML; use strict; use vars qw[ $VERSION ]; -$VERSION = sprintf "%d.%02d", q$Revision: 1.11 $ =~ /(\d+)\.(\d+)/; +$VERSION = sprintf "%d.%02d", q$Revision: 1.1 $ =~ /(\d+)\.(\d+)/; use IO::Scalar; use SQL::Translator::Utils qw(header_comment); @@ -145,11 +145,21 @@ sub produce { =head1 NAME -SQL::Translator::Producer::XML - XML output +SQL::Translator::Producer::SqlfXML - XML output =head1 SYNOPSIS - use SQL::Translator::Producer::XML; + use SQL::Translator; + + my $translator = SQL::Translator->new( + show_warnings => 1, + add_drop_table => 1, + ); + print = $obj->translate( + from => "MySQL", + to => "SqlfXML", + filename => "fooschema.sql", + ); =head1 DESCRIPTION @@ -161,4 +171,5 @@ Ken Y. Clark Ekclark@cpan.orgE, darren chamberlain Edarren@cpan.orgE =head1 SEE ALSO -L +perl(1), SQL::Translator, SQL::Translator::Parser::SqlfXML, +SQL::Translator::Schema, XML::Writer.