[Bio] / FigKernelScripts / FFB2_build_updated_FF.pl Repository:
ViewVC logotype

Diff of /FigKernelScripts/FFB2_build_updated_FF.pl

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

revision 1.18, Mon Nov 22 17:41:30 2010 UTC revision 1.19, Mon Nov 22 17:58:30 2010 UTC
# Line 32  Line 32 
32    
33  my $sort_args = "-T $FIG_Config::temp -S 4G";  my $sort_args = "-T $FIG_Config::temp -S 4G";
34    
35  mkdir($newD,0777) || die "You have an existing $newD; remove it and try again";  if (-d $newD)
36    {
37        if (-f "$newD/families.2c")
38        {
39            die "Not overwriting existing families in $newD\n";
40        }
41    }
42    else
43    {
44        mkdir($newD,0777) || die "Error creating $newD: $!";
45    }
46    
47  my $mc = new Cache::Memcached::Fast({ servers => ["$mchost:$mcport"] } );  my $mc = new Cache::Memcached::Fast({ servers => ["$mchost:$mcport"] } );
48  $mc or die "Could not connect to memcached at $mchost:$mcport\n";  $mc or die "Could not connect to memcached at $mchost:$mcport\n";

Legend:
Removed from v.1.18  
changed lines
  Added in v.1.19

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3