X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FSQL%2FTranslator%2FParser%2FExcel.pm;h=846095a4ef776b39065c9a6b3f298cb47f3fac43;hb=97d0d7788d2b9058b29fbe264f06e3979529c0c4;hp=da1be59317f1de4d47bc5936d19817dbe02e82c5;hpb=ea93df61568d8fa52a9764a09c4351928ff9374d;p=dbsrgits%2FSQL-Translator.git diff --git a/lib/SQL/Translator/Parser/Excel.pm b/lib/SQL/Translator/Parser/Excel.pm index da1be59..846095a 100644 --- a/lib/SQL/Translator/Parser/Excel.pm +++ b/lib/SQL/Translator/Parser/Excel.pm @@ -1,23 +1,5 @@ package SQL::Translator::Parser::Excel; -# ------------------------------------------------------------------- -# Copyright (C) 2002-2009 SQLFairy Authors -# -# This program is free software; you can redistribute it and/or -# modify it under the terms of the GNU General Public License as -# published by the Free Software Foundation; version 2. -# -# This program is distributed in the hope that it will be useful, but -# WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -# General Public License for more details. -# -# You should have received a copy of the GNU General Public License -# along with this program; if not, write to the Free Software -# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA -# 02111-1307 USA -# ------------------------------------------------------------------- - =head1 NAME SQL::Translator::Parser::Excel - parser for Excel @@ -47,9 +29,10 @@ and field sizes. True by default. =cut use strict; -use vars qw($DEBUG $VERSION @EXPORT_OK); +use warnings; +our ($DEBUG, @EXPORT_OK); $DEBUG = 0 unless defined $DEBUG; -$VERSION = '1.59'; +our $VERSION = '1.59'; use Spreadsheet::ParseExcel; use Exporter; @@ -191,7 +174,6 @@ sub parse { return 1; } -# ------------------------------------------------------------------- sub ET_to_ST { my $et = shift; $ET_to_ST{$et} || $ET_to_ST{'Text'};