$ perl -le'$_="\
"; print length;'
1