Help for this page

Select Code to Download


  1. or download this
    my $url  = "ftp://$id:$pw\@$dom/logs/";
$url     = new URI::URL("$url/$logweb");
  2. or download this
    my $site = "ftp://$id:$pw\@$dom/logs";
my $url  = new URI::URL("$site/$logweb");
  3. or download this
    sub Yesterday {
  # sidetrack: following golf just a thought ...
  my($yy, $ym, $yd) = Add_Delta_Days(Today(), -1);
  return sprintf "%04d-%02d-%02d", $yy, $ym, $yd;
}