title: Encode::Guess->guess gives different results to guess_encoding
body: <p>I have this script. Somefile.xsd is a file that contains a few UTF-8 chars. I've however found that I can't get <code>guess_encoding</code> to report the same encoding as Encode::Guess->guess. Ignoring the fact it's an XSD, what obvious thing (and I'm sure it probably is obvious) am I missing that I haven't done?</p>
  
  <pre><code>use Encode;
  use Encode::Guess;
  
  open (FILE, "&lt;", "somefile.xsd");
  
  print ("Reading file...\n");
  #$text = &lt;FILE&gt;;
  while ($text = &lt;FILE&gt;) {
      $encoding1 = Encode::Guess-&gt;guess($text);
      if (ref($encoding1)) {
          $name = $encoding1-&gt;name;
          print "$name : $text" if ($name ne "ascii");
      } else {
          print ("Not found : $text");
      }
  
      $encoding2 = guess_encoding($text, qw/iso-8859-15 ascii iso-8859-1 utf8/);
      if (ref($encoding2)) {
          $name = $encoding2-&gt;name;
          print "$name : $text" if ($name ne "ascii");
      } else {
          print ("Not found : $text");
      }
  
  }
  
  close(FILE);
  </code></pre>
  
  <p>When I run this, it gives these results:</p>
  
  <pre><code>H:\play&gt;perl encoding.pl
  Reading file...
  utf8 :                  &lt;xs:enumeration value="Bokmål, Norwegian; Norwegian Bokmål"/&gt;
  Not found :                     &lt;xs:enumeration value="Bokmål, Norwegian; Norwegian Bokmål"/&gt;
  utf8 :                  &lt;xs:enumeration value="Occitan (post 1500); Provenæ ¬"/&gt;
  Not found :                     &lt;xs:enumeration value="Occitan (post 1500); Provenæ ¬"/&gt;
  utf8 :                  &lt;xs:enumeration value="Volapük"/&gt;
  Not found :                     &lt;xs:enumeration value="Volapük"/&gt;
  </code></pre>
  
  <p><strong>Edited to clarify</strong>: I want to use the version of <code>guess_encoding</code> with the second option (i.e., a list of suspects). Removing the list gives me nothing over just calling <code>Encode::Guess-&gt;guess</code>. The use case is that I want to check a file matches one of a set of encodings, and passing the valid list in seems more elegent than calling guess and looking the name up in a list, especially when I've had <code>$encoding-&gt;name</code> give me a result of <code>iso-8859-15 or utf8</code>, which means I can't simply check for equality against a list.</p>