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