$from = $1 if $from =~ /<(\S+)>/;