($EDO) = $_ =~ /=*EDO=(\w+[-]\w+[-]\w+)=*/ if /^=/;