- my $rsync= $ENV{'YPPSC_PCTB_RSYNC'};
- $rsync= 'rsync' if !defined $rsync;
-
- my $local= "_master-newcommods.txt";
- my $src= $ENV{'YPPSC_PCTB_DICT_UPDATE'};
- if ($src) {
- my $remote= "$src/master-newcommods.txt";
- $!=0; system 'rsync','-Lt','--',$remote,$local;
- die "$? $!" if $! or $?;
- }
- read_newcommods($local);