@echo off

perl update
pause