<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE glsa SYSTEM "http://www.gentoo.org/dtd/glsa.dtd">
<glsa id="201401-33">
  <title>Perl Digest-Base module: Arbitrary code execution</title>
  <synopsis>A vulnerability has been found in the Digest-Base Perl module,
    allowing remote attackers to execute arbitrary code.
  </synopsis>
  <product type="ebuild">digest-base</product>
  <announced>2014-01-29</announced>
  <revised count="1">2014-01-29</revised>
  <bug>385487</bug>
  <access>remote</access>
  <affected>
    <package name="perl-core/digest-base" auto="yes" arch="*">
      <unaffected range="ge">1.170.0</unaffected>
      <vulnerable range="lt">1.170.0</vulnerable>
    </package>
  </affected>
  <background>
    <p>Digest-Base is a set of Perl modules that calculate message digests</p>
  </background>
  <description>
    <p>The vulnerability is caused due to the “Digest-&gt;new()” function
      not properly sanitising input before using it in an “eval()” call.
    </p>
  </description>
  <impact type="high">
    <p>The vulnerability might allow an attacker to execute arbitrary code.</p>
  </impact>
  <workaround>
    <p>There is no known workaround at this time.</p>
  </workaround>
  <resolution>
    <p>All Digest-Base module users should upgrade to the latest version:</p>
    
    <code>
      # emerge --sync
      # emerge --ask --oneshot --verbose "&gt;=perl-core/digest-base-1.170.0"
    </code>
    
  </resolution>
  <references>
    <uri link="https://nvd.nist.gov/nvd.cfm?cvename=CVE-2011-3597">CVE-2011-3597</uri>
  </references>
  <metadata tag="requester" timestamp="2013-08-22T09:43:15Z">
    pinkbyte
  </metadata>
  <metadata tag="submitter" timestamp="2014-01-29T08:01:48Z">
    pinkbyte
  </metadata>
</glsa>