Select Code to Download

#!/usr/bin/perl

use strict;
use warnings;
use Date::Manip;

$date_two_days_ago = ParseDate('3 days ago');

my $date_two_days_ago = ParseDate('3 days ago');

#!/usr/bin/perl
...
close DATA;
close FH;
__DATA__