package SQL::Translator;
use strict;
-use vars qw( $VERSION $DEFAULT_SUB $DEBUG $ERROR );
+use warnings;
+our ( $DEFAULT_SUB, $DEBUG, $ERROR );
use base 'Class::Base';
require 5.005;
-$VERSION = '0.11010';
+our $VERSION = '0.11010';
$DEBUG = 0 unless defined $DEBUG;
$ERROR = "";