chomp( @input = <STDIN> );
push( @list, split( /\s+/, $_ ) ) foreach @input;
foreach ( @list ) {
    print "$names[$_-1]\n";
}