From: Ken Youens-Clark Date: Mon, 16 Jun 2003 18:26:59 +0000 (+0000) Subject: Removed this file as it uses the Validator which has been removed. X-Git-Tag: v0.02~18 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=734a3912197aa6e4431506d625de3dcd0722e40a;p=dbsrgits%2FSQL-Translator.git Removed this file as it uses the Validator which has been removed. --- diff --git a/bin/validator_test.pl b/bin/validator_test.pl deleted file mode 100755 index 6c1f326..0000000 --- a/bin/validator_test.pl +++ /dev/null @@ -1,58 +0,0 @@ -#!/usr/local/bin/perl - -use SQL::Translator::Validator; -my $data = { - random => { - type => undef, - indices => [ ], - fields => { - id => { - name => "id", - data_type => "int", - size => 11, - order => 1, - null => 0, - default => 1 - }, - seed => { - name => "seed", - data_type => "char", - size => 32, - order => 2, - null => 0, - default => 1 - }, - - } - }, - session => { - type => "HEAP", - indices => [ - { - name => undef, - primary_key => 1, - fields => [ "id" ], - } - ], - fields => { - id => { - name => "id", - data_type => "int", - size => 11, - order => 2, - null => 0, - default => 1 - }, - foo => { - name => "foo", - data_type => "char", - size => 255, - order => 1, - null => 1 - }, - } - } -}; - -my @r = validate($data); -printf "%s%s", $r[1], $r[0]? "" : "\n";