Select Code to Download

my $report = <<EOF;

...
      "Generating Email!\n\n";

system ("mail test@server.com < Report_$d.txt");