File-Dropbox

 view release on metacpan or  search on metacpan

Build.PL  view on Meta::CPAN

	create_readme  => 1,

	configure_requires => {
		'Module::Build' => '0.40',
	},

	requires => {
		'Furl'            => '2.16',
		'JSON'            => '2.0',
		'Net::DNS::Lite'  => '0.1',
		'IO::Socket::SSL' => '1.4',
	},
);

$builder->create_build_script();

META.json  view on Meta::CPAN

   "name" : "File-Dropbox",
   "prereqs" : {
      "configure" : {
         "requires" : {
            "Module::Build" : "0.40"
         }
      },
      "runtime" : {
         "requires" : {
            "Furl" : "2.16",
            "IO::Socket::SSL" : "1.4",
            "JSON" : "2.0",
            "Net::DNS::Lite" : "0.1"
         }
      }
   },
   "provides" : {
      "File::Dropbox" : {
         "file" : "lib/File/Dropbox.pm",
         "version" : "0.7"
      }

META.yml  view on Meta::CPAN

meta-spec:
  url: http://module-build.sourceforge.net/META-spec-v1.4.html
  version: '1.4'
name: File-Dropbox
provides:
  File::Dropbox:
    file: lib/File/Dropbox.pm
    version: '0.7'
requires:
  Furl: '2.16'
  IO::Socket::SSL: '1.4'
  JSON: '2.0'
  Net::DNS::Lite: '0.1'
resources:
  license: http://dev.perl.org/licenses/
version: '0.7'
x_serialization_backend: 'CPAN::Meta::YAML version 0.018'

lib/File/Dropbox.pm  view on Meta::CPAN

package File::Dropbox;
use strict;
use warnings;
use feature ':5.10';
use base qw{ Tie::Handle Exporter };
use Symbol;
use JSON;
use Errno qw{ ENOENT EISDIR EINVAL EPERM EACCES EAGAIN ECANCELED EFBIG };
use Fcntl qw{ SEEK_CUR SEEK_SET SEEK_END };
use Furl;
use IO::Socket::SSL;
use Net::DNS::Lite;

our $VERSION = 0.7;
our @EXPORT_OK = qw{ contents metadata putfile movefile copyfile createfolder deletefile };

my $hosts = {
	content => 'api-content.dropbox.com',
	api     => 'api.dropbox.com',
};