use EDI::Config; use POSIX qw(uname); use File::Copy; use File::Basename;