perl '-F: ' -al0ne '!/^u/&&print qq($F[1] );/^$/&&print$/'