perl -le '$, = q( ); print a..z'