Select Code to Download

>perl -wMstrict -le
"my $data = 'A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W,X,Y,Z';
...
 printf qq{'$_'  } for @ra;
"
'A,B,C,D,E,F'  'G,H,I,J,K,L'  'M,N,O,P,Q,R'  'S,T,U,V,W,X'  'Y,Z'

>perl -wMstrict -le
"my $data = 'A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W,X,Y,Z';
...
 printf qq{'$_'  } for @ra;
"
'A,B,C,D,E'  'F,G,H,I,J'  'K,L,M,N,O'  'P,Q,R,S,T'  'U,V,W,X,Y'  'Z'