sub move_logs { my ($logs, $target_path) = @_; # : (etc.) } # ... my $log_path = '\\\\10.1.1.5\\Weblogiclogs\\' . strftime( '%y%m%d%H%M', localtime); my $logs = "\\\\192.168.2.5\\Weblogiclogs\\*.log"; move_logs($logs, $log_path);
foreach my $file (glob($logs)) { move($log, $log_path) || die "screaming"; }
In reply to Re: moving logs files on a remote share.
by tadman
in thread moving logs files on a remote share.
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |