perl -lne 'print ((split /:/)[0] . " " . (split /:/)[4])' /etc/passwd