perl -e '$a=inf; print ++$a,"\n"'
ing