Changeset 12988 for lang/perl/WebService-Simple/trunk/example

Timestamp:

06/01/08 19:51:03 (6 months ago)

Author:

yusukebe

Message:

Responseのparse_responseにオプションを渡せるようにした

Files:

• lang/perl/WebService-Simple/trunk/example/flickr_search.pl (modified) (1 diff)

lang/perl/WebService-Simple/trunk/example/flickr_search.pl

@@ -13 +13 @@
 my $response =
   $flickr->get( { method => "flickr.photos.search", text => "cat" } );
-print Dumper $response->parse_response;
+print Dumper $response->parse_response( KeyAttr => [] );