bin/fs_to_db.pl
changeset 70 dfc2f094a04f
parent 60 7ad91b3d5562
equal deleted inserted replaced
68:c810480b2c37 70:dfc2f094a04f
    16 use Mojo::Base -strict;
    16 use Mojo::Base -strict;
    17 use lib 'lib';
    17 use lib 'lib';
    18 
    18 
    19 use Mojo::JSON qw/decode_json/;
    19 use Mojo::JSON qw/decode_json/;
    20 use Mojo::Util qw/decode slurp/;
    20 use Mojo::Util qw/decode slurp/;
    21 use Mojo::Loader;
    21 use Mojo::Loader qw/load_class/;
    22 use File::Basename;
    22 use File::Basename;
    23 use Mojolicious;
    23 use Mojolicious;
    24 use Mojo::Home;
    24 use Mojo::Home;
    25 
    25 
    26 if(scalar @ARGV == 0) {
    26 if(scalar @ARGV == 0) {
    35     return $app->plugin('Config');
    35     return $app->plugin('Config');
    36 }
    36 }
    37 
    37 
    38 my $config = load_config();
    38 my $config = load_config();
    39 
    39 
    40 my $loader = Mojo::Loader->new;
       
    41 
       
    42 my $storage_class = $config->{Storage}->{Type};
    40 my $storage_class = $config->{Storage}->{Type};
    43 if (my $e = $loader->load($storage_class)) {
    41 if (my $e = load_class($storage_class)) {
    44     die ref $e ? "Exception: $e" : 'Not found!';
    42     die ref $e ? "Exception: $e" : 'Not found!';
    45 }
    43 }
    46 
    44 
    47 my $storage = $storage_class->new(config => $config->{Storage});
    45 my $storage = $storage_class->new(config => $config->{Storage});
    48 
    46