"$data_file="learn.data";
open(DAT, $data_file) || die("Could not open file!");
@raw_data=<DAT>;