add perl/php sample code