abs_path($0) =~ m|^(.*)/lib/casa/bin/.*|;
unless( -d $1 ) { die "could not find application contents" }
chdir( "$prefix" ) or die "bad casa root: $prefix";
if ( -e "pipeline" or -l "pipeline" ) {
chomp($date_string = `date "+%Y%m%d-%H%M%S"`);
move("pipeline","pipeline.$date_string");
open( RSYNC, "rsync -avz --copy-links rsync://casa-rsync.nrao.edu/casa-pipeline/current/ pipeline/ 2>&1 |" ) or die $!;
if ( scalar(@output) < $limit ) {
if ( $verbose ) { print "\t$_" }
if ( scalar(@output) > $limit ) {
if ( scalar(@output) > 0 ) { print "\t$msg\n" }