perl -F: -lane 'print "@F[0, 4]"' /etc/passwd

##</code><code>##

cut -d: -f1,5 /etc/passwd|tr : \ 

##</code><code>##

$ \(-
-bash: (-: command not found