lineas_ayuda () 
{ 

    for a in tar find mkisofs cdrecord mplayer xine mysql perl gcc vi emacs man less;
    do
        b=$($a --help 2>&1 | wc -l );
        printf "%3s %s\n" $b $a;
    done
}

153 tar
 24 find
162 mkisofs
 82 cdrecord
 41 mplayer
114 xine
155 mysql
 30 perl
 60 gcc
 68 vi
 70 emacs
 49 man
220 less