From: Jason Etheridge <jason@equinoxinitiative.org>
Date: Fri, 25 Oct 2019 18:32:17 +0000 (-0400)
Subject: do file no longer sees lexicals
X-Git-Url: http://git.equinoxoli.org/?p=migration-tools.git;a=commitdiff_plain;h=8d76d68d298a29843e4b9badb35bca051f129043

do file no longer sees lexicals

Signed-off-by: Jason Etheridge <jason@equinoxinitiative.org>
---

diff --git a/text/clean_csv b/text/clean_csv
index 599a5d0..2781a07 100755
--- a/text/clean_csv
+++ b/text/clean_csv
@@ -585,7 +585,7 @@ if ($apply && -e $ARGV[0] . '.fixes') {
 ################################################################## CSV Setup
 $CSV_options{sep_char} = get_separator( path => $ARGV[0], lucky => 1 );
 if ($config && -e $config) {
-	do $config;
+	eval `cat $config`;
 }
 $csv = Text::CSV_XS->new(\%CSV_options);
 $csv->callbacks(