Perl REST client example code