open(IN,"input.txt") or die("Can't open input.txt");
while(<IN>) {
  chomp;

  magic code here ... ???

  print "$Employee_Rec->{Emp_No}     \n";
  print "$Employee_Rec->{Emp_Lname}  \n";
  print "$Employee_Rec->{Emp_Fname}  \n";
  print "$Employee_Rec->{Emp_SSN}    \n";
  print "$Employee_Rec->{Emp_DOB}    \n";
  print "$Employee_Rec->{Emp_aka}    \n";
}
close(IN);