Select Code to Download

#!/usr/bin/perl
use warnings;
...
__DATA__
psclxgmprdonx03
totlxfiprdsp502

my $dir = 'c:\temp';
my $file = $dir . '/' . 'RH5_CSV_Americas.csv';
...
}
close (FILES);
}