($curFrom) = grep(/^From:/, @header);
($curSubject) = grep(/^Subject:/, @header);