for my $data_pair (@data_list) {
    if($data_pair->{'key'} eq 'correct') {

        my $cor= $data_pair->{'value'};

        if($data_pair->{'key'} eq 'date') {
            my $date = $data_pair->{'value'};
            ...
        }
     }
}

##</code><code>##

         $sql_content .= "
INSERT IGNORE INTO correct SET
       text='".$cor."',
       date='".$date."';