/[CCFs]/bin/deleteccf
ViewVC logotype

Diff of /bin/deleteccf

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.3 by ccflib, Fri Oct 31 15:52:32 2003 UTC revision 1.4 by ccflib, Thu Feb 14 14:26:44 2013 UTC
# Line 2  Line 2 
2  #  #
3  # Giuseppe Vacanti (cosine science & computing bv)  # Giuseppe Vacanti (cosine science & computing bv)
4  #  #
5  # $Id: deleteccf,v 1.2 2002/03/19 15:05:09 ccflib Exp $  # $Id: deleteccf,v 1.3 2003/10/31 15:52:32 ccflib Exp $
6  #  #
7    # This script simply deletes all CCFs put in the subdir ccfdev/deleted, and it is intended to be run by
8    # a crontab, either on xmm or in xvsas05.
9    
10  require 5;  require 5;
11  use strict;  use strict;
12  use vars '%ENV';  use vars '%ENV';
# Line 12  $ENV{'PATH'} .= "$ENV{'HOME'}/bin:"; Line 15  $ENV{'PATH'} .= "$ENV{'HOME'}/bin:";
15  use Ccflib;  use Ccflib;
16    
17  #chdir $Ccflib::develrm or die("Cannot access $Ccflib::develrm\n");  #chdir $Ccflib::develrm or die("Cannot access $Ccflib::develrm\n");
18    # Ccflib.pm is located in $HOME/cgi and provides definitions of dircetories for ccflib
19    #
20    # Of course this is possible only on the host that knows where is /home/ccflib, not xvsoc01.
21  chdir "/home/ccflib/ftp-area/private/ccfdevel/deleted/" or die("Cannot access /home/ccflib/ftp-area/private/ccfdevel/deleted/\n");  chdir "/home/ccflib/ftp-area/private/ccfdevel/deleted/" or die("Cannot access /home/ccflib/ftp-area/private/ccfdevel/deleted/\n");
22    
23  my $deletes;  my $deletes;
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.27