From 8d76d68d298a29843e4b9badb35bca051f129043 Mon Sep 17 00:00:00 2001 From: Jason Etheridge Date: Fri, 25 Oct 2019 14:32:17 -0400 Subject: [PATCH] do file no longer sees lexicals Signed-off-by: Jason Etheridge --- text/clean_csv | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) 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( -- 1.7.2.5