@setlocal
@echo Update %1...
@set TEMPF1=C:\HOMEPAGE\GA\mperl\src\%1.txt
@set TEMPF2=C:\GTools\perl\%1.pl
@if NOT EXIST %TEMPF1% goto ERR1
@if NOT EXIST %TEMPF2% goto ERR2

@call cmpwebsrc %1
@echo Continue with UPDATE?
@pause

copy %TEMPF2% %TEMPF1%

@goto END

:ERR1
@echo ERROR: Can NOT find %TEMPF1% file...
@goto WAIT

:ERR2
@echo ERROR: Can NOT find %TEMPF2% file...
@goto WAIT

:WAIT
@pause
:END
@endlocal
