!perl
exit shift;

##</code><code>##

@echo off
call el.pl %1
echo %errorlevel%