# @emails exists already
use Mail::Address;
my @sorted_by_domain_then_user =
    map { $_-> format }
        sort { $a->host cmp $b->host
                or $a->user cmp $b->user }
            map {Mail::Address->parse($_)} @emails;