# read trans barcode $primer = Util::Util::fileDecode($transFile); chomp($primer); print "(",$primer,")\n"; # set transaction folder path my $transPath = $wDir. "plsTrans/$primer/tmp/"; if(-d $transPath){ print "Transpath : " . $transPath . "\n"; print "FileName : ". $transFile . "\n"; print "Cmd : >cp $transFile $transPath<\n"; system("mv",$transFile,$transPath); }
In reply to Re^2: Moving Files
by rottmanja
in thread Moving Files
by rottmanja
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |