@echo off
setlocal
perl -w "%~dpn0.pl" %*