in reply to Status of all interfaces

based in the former, a little golf

ifconfig|perl -nle'next unless (/up\s/i); print;'

In Section Seekers of Perl Wisdom