$ perl -ple'$_=eval'
1/0