$cp="cp-f"; $rc=system("$cp $source_file $target_file"); if(!$rc) { print "error: $! \n"; exit 2; }