From d5d36bac73f37a92d4ee2d18a807b2acbccf16f3 Mon Sep 17 00:00:00 2001
From: dakkar <dakkar@thenautilus.net>
Date: Mon, 21 Jun 2010 23:20:31 +0100
Subject: initial version

---
 script/dump_schema.pl | 13 +++++++++++++
 1 file changed, 13 insertions(+)
 create mode 100644 script/dump_schema.pl

(limited to 'script/dump_schema.pl')

diff --git a/script/dump_schema.pl b/script/dump_schema.pl
new file mode 100644
index 0000000..ec1e1bc
--- /dev/null
+++ b/script/dump_schema.pl
@@ -0,0 +1,13 @@
+#!/usr/bin/env perl
+use strict;
+use warnings;
+use DBIx::Class::Schema::Loader qw/ make_schema_at /;
+
+make_schema_at(
+    'TFLMonitor::Schema',
+    {
+        debug => 1,
+        dump_directory => './lib',
+    },
+    [ 'dbi:SQLite:dbname=monitor.db', ],
+);
-- 
cgit v1.2.3