# STEP 2.5   --> read_date_from_notetxt
sub read_date_from_notetxt {
    my $file = shift;
    
    read_config $file => my %notetxtrecord;
    my $datestring = $notetxtrecord{''}{'Found'};
    print "DATESTRING:  $datestring\n";

    # FIXME: this is not working right now    
    my @datearray;
    @datearray = split(/./,$datestring);
    print "Date-Array 2nd position: ";
    print $datearray[2];
    print "\n";
    my $timestring = $datearray[2]."-".$datearray[1]."-".$datearray[0]."T00:00Z";
    
    print $timestring."\n\n";
    return $timestring;    
}