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

View of /FigKernelScripts/extract_data_for_syncing_after_update.pl

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.4 - (download) (as text) (annotate)
Thu Jun 3 15:48:54 2004 UTC (15 years, 6 months ago) by overbeek
Branch: MAIN
Changes since 1.3: +9 -7 lines
package outputs from extract_data_for_syncing_after_update into a directory

use P2Pupdate;

use FIG;
my $fig = new FIG;

# usage: extract_data_for_syncing_after_update SyncFromDate(MM/DD/YYYY) AssignmentsPackage AnnotationsPackage TranslationRulesPackage SubsystemsPackage

( 
 ($sync_from_date      = shift @ARGV) &&
  ($dir                = shift @ARGV)
)
    || die "usage: usage: extract_data_for_syncing_after_update SyncFromDate(MM/DD/YYYY) Dir";
(! -d $dir) || die "$dir already exists";
mkdir($dir,0777) || die "could not make $dir";
$assignments_package  = "$dir/$assignments_package";
$annotations_package  = "$dir/$annotations_package";
$trans_rules_package  = "$dir/$trans_rules_package";
$subsys_package       = "$dir/$subsys_package";

&P2Pupdate::package_translation_rules($FIG_Config::fig,$trans_rules_package);
&P2Pupdate::package_subsystems($fig,$subsys_package,0);

my(@genomes) = $fig->genomes;
&P2Pupdate::package_assignments($fig,"master","master",$sync_from_date,\@genomes,$assignments_package);
&P2Pupdate::package_annotations($fig,"master",$sync_from_date,\@genomes,$annotations_package);


MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3