title: Extracting DNA sequences from FASTA file with BioPerl with non-standard header
body: <p>I'm trying to extract sequences from a database using the following code:</p>
  
  <pre><code>use strict;
  use Bio::SearchIO; 
  use Bio::DB::Fasta;
  
  
  my ($file, $id, $start, $end) = ("secondround_merged_expanded.fasta","C7136661:0-107",1,10);
  my $db = Bio::DB::Fasta-&gt;new($file);
  my $seq = $db-&gt;seq($id, $start, $end);
  print $seq,"\n";
  </code></pre>
  
  <p>Where the header of the sequence I'm trying to extract is: <code>C7136661:0-107</code>, as in the file:</p>
  
  <pre><code>&gt;C7047455:0-100
  TATAATGCGAATATCGACATTCATTTGAACTGTTAAATCGGTAACATAAGCAGCACACCTGGGCAGATAGTAAAGGCATATGATAATAAGCTGGGGGCTA
  </code></pre>
  
  <p>The code works fine when I switch the header to something more standard (like <code>test</code>).  I'm thinking that BioPerl doesn't like the non-standard heading.  Any way to fix this so I don't have to recode the FASTA file?</p>