@echo off
echo %0
if exist %0.pl perl %0.pl else goto :modules
goto :EOF

:modules
if exist modules\%0.pl perl modules\%0.pl else goto :perl
goto :EOF

:perl
if exist perl\%0.pl perl perl\%0.pl else goto :perl
goto :EOF