expand email alias



I have list of email aliases as well as users.

I need to find in tcl whether it is an user or email ailias and if
alias expand it.

is there nay wey?
.