Commit 2cc5d3c7 authored by Gavin Brown's avatar Gavin Brown

fixed

parent 185ba2fd
......@@ -52,12 +52,14 @@ syslog(LOG_DEBUG, sprintf('connected to %s', $config->{'cp.host'}));
printf($IN "cd '%s'\n", $config->{'cp.directory'});
foreach my $file (@files) {
printf($IN "put '%s'\n", $file);
my $cmd = sprintf("put '%s'", $file);]
syslog(LOG_DEBUG, $cmd);
print $IN "$cmd\n";
}
close($IN);
while ($OUT) {
while (<$OUT>) {
chomp;
syslog(LOG_DEBUG, $_);
}
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment