perl -e 'print scalar (a..d),"\n"' 1E0