--- bin/deleteccf	2014/12/02 14:06:51	1.5
+++ bin/deleteccf	2018/01/15 10:02:11	1.6
@@ -1,6 +1,6 @@
-#! /usr/local/bin/perl -w
+#! /xdata/ccflib/perl5/perlbrew/perls/perl-5.18.4/bin/perl -w
 #
-# $Id: deleteccf,v 1.4 2013/02/14 14:26:44 ccflib Exp $
+# $Id: deleteccf,v 1.5 2014/12/02 14:06:51 ccflib Exp $
 #
 # This script simply deletes all CCFs put in the subdir ccfdev/deleted.
 # It is intended to be run by a crontab, either on xvsoc01 or in sasbld01
@@ -14,7 +14,7 @@
 # Can not use Ccflib.pm located in $HOME/cgi because it has definitions for directories only on xvsoc01.
 # use Ccflib;
 
-my $host=qx/hostname | cut -d. -f1/ ;
+my $host=qx/\/bin\/hostname | cut -d. -f1/ ;
 my $homedir="/home/ccflib" ;
 chomp($host);
 $homedir="/data/xmm/ccflib" if  ( $host eq "xvsoc01" ) ;