Changeset 2670 for trunk/tools

Timestamp:

Oct 5, 2008, 11:22:57 PM (16 years ago)

Author:

plg

Message:

feature 885 added: pwg.images.add web API method now supports additional
high resolution format.

File:

• trunk/tools/piwigo_remote.pl (modified) (2 diffs)

trunk/tools/piwigo_remote.pl

@@ -7 +7 @@
 use LWP::UserAgent;
 use Getopt::Long;
+use Encode qw/is_utf8 decode/;
 
 my %opt = ();
 GetOptions(
     \%opt,
-    qw/action=s file=s thumbnail=s categories=s define=s%/
+    qw/action=s file=s thumbnail=s high=s categories=s define=s%/
 );
 
@@ -62 +63 @@
         categories => $opt{categories},
     };
+
+    if (defined $opt{high}) {
+        $form->{high_content} = encode_base64(read_file($opt{high}));
+        $form->{high_sum} = file_md5_hex($opt{high});
+    }
 
     foreach my $key (keys %{ $opt{define} }) {