title: Perl email script--content encoding issue
body: <p>I decided to dive into perl with some of the starter scripts on their site.  I started with <a href="http://learn.perl.org/examples/email.html" rel="nofollow">http://learn.perl.org/examples/email.html</a> to try a basic email sending script.</p>
  
  <p>Here's the actual code:</p>
  
  <pre><code>#!/usr/bin/perl
  use strict;
  use warnings;
  
  #Character encoding var
  my $encoding='text/plain; charset="iso-8859-5"';
  
  #Create the message
  use Email::MIME;
  my $message = Email::MIME-&gt;create(
          header_str =&gt; [
                  From =&gt; 'gmail@gmail.com',
                  To =&gt; 'gmail2@gmail.com',
                  Subject =&gt; 'I sent you this message using Perl.',
          ],
          body_str =&gt; 'I sent you this message using Perl.  One of those languages that would\' would\'ve been helpful much sooner in my life...',
          );
  use Email::Sender::Simple qw(sendmail);
  sendmail($message);
  </code></pre>
  
  <p>What I get when I do <code>perl script.pl</code> is an error message of</p>
  
  <pre><code>body_str was given, but no charset is defined at /usr/local/share/perl/5.10.1/Email/MIME.pm line 243
      Email::MIME::create('Email::MIME', 'header_str', 'ARRAY(0x9a04818)', 'body_str', 'I sent you this message using Perl.  One ...') called at script.pl line 10
  </code></pre>
  
  <p>I did some searching around the Email::MIME module and found the body_str section but it didn't shed any light on the error message.  I'm assuming I need to set the encoding but I'm not sure how to go about doing it.</p>