What you want is

chomp(my $input_name = <STDIN>);
push @EMP_INFO, $input_name;
[download]

Or perhaps you might want to abstract things ever so slightly:

sub Query {
  print "@_\n"; 
  chomp(my $ans = <STDIN>); 
  return $ans;
}

push @EMP_INFO, Query("What is your name?");
push @EMP_INFO, Query("What is the location?");
push @EMP_INFO, Query("What is the age?");
[download]

And your loop is very unperlish. A more perlish way to write it would be:

for my $ei (@EMP_INFO) { print "$ei\n"; }
[download]

Or maybe even

print map { "$_\n" } @EMP_INFO;
[download]

That's assuming that there's other things you want to do in the loop. If not, then just

print "@EMP_INFO";                   # or
print join "\n", @EMP_INFO;
[download]

May be enough