Select Code to Download

<time datetime=2017-09-03T23:17:53Z>

...
##This is the data that I am interested in.##
More text.
More text.

my %mycorpus = getCorpus('C:\Users\li\test4');  

...
    foreach my $date (sort keys %counts){            
        print "$date = $counts{$date}\n";    
    }

2017-08-31 = 42
2017-09-01 = 25
...
2017-09-03 = 34
2017-09-04 = 26
.....

my %mycorpus = getCorpus('C:\Users\li\test4'); 

...
    foreach my $date (sort keys %counts){        
        print "$date = $counts{$date}\n";    
    }

2017-09-01 = 1
2017-09-02 = 3
...
2017-09-05 = 1
2017-09-06 = 3
2017-09-07 = 3