Help for this page

Select Code to Download


  1. or download this
    @backupFiles = `ssh user\@backupserver ls /usr/local/apache/htdocs`;
  2. or download this
    while (1) {
  do_something();
  sleep 60;
}
  3. or download this
    my @files = map { "'$_'" }
            grep {not $chompedList{basename($_)}
            </usr/myfiles/*.htm>;
system "scp -C @files user\@backupserver:/usr/local/apache/htdocs";
  4. or download this
    #!/usr/bin/perl -W
use warnings 'all';
...
  }
  sleep 60;
}