Pergunta de entrevista da empresa Netik

inheritance in perl