Added new perl examples

Translated examples to perl:
identity.pl interrupt.pl rtdealer.pl rtreq.pl rtrouter.pl