I fixed it but not sure if we are reading up to three column at the top ,, all I did is changing the DATA to

EmpNum  LOCATION  Shift  Hours
23        54        1     2
11        65        3     5
23        54        2     7
[download]

then I modify it to

print "\t$_->[0]\t$_->[1]\t$_->[2]\n";
[download]

but get the same output

23        54        1
          54        2
11        65        3
[download]