my $input_name = <STDIN>;
push @EMP_INFO, $input_name;

print "What is the location name\n";
my $input_location = <STDIN>;
push @EMP_INFO, <STDIN>; #correct this on your own

print "What is the age \n";
my $input_age = <STDIN>;
push @EMP_INFO, <STDIN>;