perl -ple'$_=eval||$@||0'