Updated perl examples.