$ perl -wle '$en = EN-1000-0003-3; print $en'
Argument "EN" isn't numeric in subtraction (-) at -e line 1.
-1006