E:\>perl
print 1/0;
Illegal division by zero at - line 1.

E:\>