Rocksea - knowledge creator

FTP batch 작업을 위한 Perl Script ( 참고용 ) #!/usr/bin/perl use Net::FTP; use Cwd; `rm -rf *.jpg* *error.ht*`; `cd /path-to-dir/`; #+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ sub writeLog() { my ($msg) = @_; my ($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) = localtime(time); my $yyyymmdd = sprintf("%04d-%02d-%02d", $year + 1900, $mon +1, $mday); my..