cat /etc/passwd | perl -e 'print join ":", @$_ for sort { $b->[2] <=> $a->[2] } map { [ split /:/, $_ ] } <>'

##</code><code>##

cat /etc/passwd | sort -t : -k3 -nr
# the above method works great with GNU /bin/sort!