my @data = split(',',$_);
  $Employee_Rec->{Emp_No}    = $data[0];
  $Employee_Rec->{Emp_Lname} = $data[1];
  ...