It works correctly for me. A few things to check:

• Does your module file CCD/Human.pm begin and end like this?

  package CCD::Human;
  ...
  1;    # return a true value
  [download]

• Does your client code use CCD::Human;?

• Are the data items on each line of .../home/ki/Downloads/currenthumanccds.txt separated by tab characters?

• Is the file .../home/ki/output.txt created when you run the script? What does it contain?

Hope that helps,