perl -wE "say scalar( () = 'aa' .. 'zz');"