Fix dynamic query loading import error (!)
This commit is contained in:
@ -6,8 +6,13 @@ use diagnostics;
|
|||||||
|
|
||||||
use DateTime;
|
use DateTime;
|
||||||
use FindBin;
|
use FindBin;
|
||||||
|
|
||||||
|
# Include this for running from runner.pl
|
||||||
use lib "$FindBin::Bin/../../scripts/Queries";
|
use lib "$FindBin::Bin/../../scripts/Queries";
|
||||||
|
|
||||||
|
# Include this for running from menu.pl
|
||||||
|
use lib "$FindBin::Bin/Queries";
|
||||||
|
|
||||||
use feature 'say';
|
use feature 'say';
|
||||||
|
|
||||||
my $local_root = '/home/christoph/Notes/TU/MastersThesis/FailNix';
|
my $local_root = '/home/christoph/Notes/TU/MastersThesis/FailNix';
|
||||||
@ -138,9 +143,9 @@ sub execute_query {
|
|||||||
|
|
||||||
require $file;
|
require $file;
|
||||||
|
|
||||||
my $query = $module->can('query') or die "$module can't query()";
|
my $query = $module->can('query') or die "$module can't query()";
|
||||||
my $args = $module->can('args') or die "$module can't args()";
|
my $args = $module->can('args') or die "$module can't args()";
|
||||||
my $filename = $module->can('filename') or die "$module can't filanem()";
|
my $filename = $module->can('filename') or die "$module can't filename()";
|
||||||
my $postprocess = $module->can('postprocess')
|
my $postprocess = $module->can('postprocess')
|
||||||
or die "$module can't postprocess()";
|
or die "$module can't postprocess()";
|
||||||
|
|
||||||
|
|||||||
@ -38,8 +38,7 @@ sub args { return "--batch --raw"; }
|
|||||||
sub filename {
|
sub filename {
|
||||||
my ($filter_config_name) = @_;
|
my ($filter_config_name) = @_;
|
||||||
$filter_config_name //= '';
|
$filter_config_name //= '';
|
||||||
my $suffix =
|
my $suffix = length($filter_config_name) ? "_$filter_config_name" : "";
|
||||||
length($filter_config_name) ? "_filtered_$filter_config_name" : "";
|
|
||||||
return "resultsdata${suffix}.csv";
|
return "resultsdata${suffix}.csv";
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user