#!/home/perl/5.16.2/bin/perl -w
use warnings;
use strict;

use Mail::Message;
my $message = Mail::Message->build ( file => '/etc/passwd' );
