my $address = 'myname@whatever.com';
my $subject = "Comments -- Version: $Version ID: $ID";
system("mail $address -s '$subject' < blah6.txt") == 0
  or die "mail failed: $?";