--- a/deploy.pl	Mon May 12 18:05:30 2014 +0400
+++ b/deploy.pl	Wed May 14 01:22:21 2014 +0400
@@ -1,11 +1,17 @@
 #!/usr/bin/perl -w
 use strict;
+use lib '.';
+use config;
+use config::bootstrap;
+use IMPL::require {
+    DoxModel => 'Benzin::Doxygen::Model'
+};
 
-my @dirs = qw(
-	doxygen-data
-	mysql-data
-);
+mkdir 'doxygen-data' unless -e 'doxygen-data';
 
-mkdir $_ foreach grep not(-e $_), @dirs;
+unless (-e 'mysql-data') {
+	mkdir 'mysql-data';
+	`mysql_install_db --datadir=./mysql-data`;
+}
 
-`mysql_install_db --datadir=./mysql-data`;
\ No newline at end of file
+DoxModel->Deploy($config::doxConnection);
\ No newline at end of file