Soy una principiante en esto del Perl y tengo que hacer un script para un proyecto en la universidad

Función 1: introducir una función
apretar enter y que me pregunte
Función 2: introducir función
y que me las busque en el archivo. Si salen las 2, ¡BINGO!, sino ERROR
Muchas gracias por la atención. ¡¡¡Si me ayudáis, me salváis la vida!!!

Gracias