#!perl -lp
$_+=0