Portál AbcLinuxu, 6. června 2025 09:30
perl -ne ' @a= m/^(novak[^:]*):.*:(\/.*)$/;if (@a) {$i++;print join("|",@a),"\n"};END{print "$i\n"};' < /etc/passwd
a bez perlu :)
cat /etc/passwd|grep ^novak|sed 's/:.*:/|/'|tee /dev/tty|wc -l
Ps. schválně jsem se vyhýbal awk
ypcat passwd | awk -F":" 'BEGIN {cnt=0} /^novak/ {cnt++; print $1 "|" $7} END {print cnt}'PS: jestli je to ukol na FEL, tak tam mi to naslo 44 uzivatelu.
Tiskni
Sdílej:
ISSN 1214-1267, (c) 1999-2007 Stickfish s.r.o.