added: perl dictionary