Select Code to Download

foreach (@trt_files) # Each time round the loop, $_
                     # is set to an alias to one of the
...
                              # or @trt_files).
    print "$_\n";    # Prints the (unchanged) value of $_
}

foreach (@trt_files)
{
    s/date/$date/;
    print "$_\n";
}