Try

system 'echo "rYr" | phylip sub_program_1';
or
system 'echo -e "r\nY\nr" | phylip sub_program_1';