Perl

perl -lne 'print for /.{1,4}|^$/g' yourfile

Sed1

sed -e '
   s/..../&\n/
   /\n$/P;//d
   P;D
' yourfile

Sed2

sed -e '
   s/..../&\n/g
   s/\n$//
' yourfile

Bash

while IFS= read -r l; do
   case $l in '' ) echo; continue ;; esac
   while case $l in '' ) break ;; esac; do
      echo "${l:0:4}"
      l=${l:4:${#l}}
   done
done < yourfile

Классический grep за все время:

$ echo "$a"
aaaa
bbbbbbbbb
cc

$ echo "$a" |egrep -o '(.){1,4}'
aaaa
bbbb
bbbb
b
cc

sed 's_\(....\).*_\1_' /path/to/input

Все, что короче четырех символов, не будет тронуто; все, что длиннее, будет усечено.

fold -w4 yourfile

Output

aaaa
bbbb
bbbb
b
cc