@echo off
perl -w %~dpn0.pl