Changeset 2519
- Timestamp:
- Sep 12, 2008, 12:09:21 AM (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/tools/piwigo_remote.pl
r2500 r2519 19 19 my %conf; 20 20 $conf{base_url} = 'http://localhost/~pierrick/piwigo/trunk'; 21 $conf{partner_key} = 'youhou';22 21 $conf{response_format} = 'json'; 23 22 $conf{username} = 'pierrick'; … … 38 37 39 38 $result = $ua->post( 40 $conf{base_url}.'/ws.php? partner='.$conf{partner_key}.'&format=json',39 $conf{base_url}.'/ws.php?format=json', 41 40 $form 42 41 ); … … 66 65 67 66 my $response = $ua->post( 68 $conf{base_url}.'/ws.php? partner='.$conf{partner_key}.'&format=json',67 $conf{base_url}.'/ws.php?format=json', 69 68 $form 70 69 ); … … 125 124 my $query = $conf{base_url}.'/ws.php?format='.$conf{response_format}; 126 125 127 if (defined $conf{partner_key}) {128 $query .= '&partner='.$conf{partner_key};129 }130 131 126 foreach my $key (keys %params) { 132 127 $query .= '&'.$key.'='.$params{$key};
Note: See TracChangeset
for help on using the changeset viewer.