view release on metacpan or  search on metacpan

Changes  view on Meta::CPAN

Revision history for Perl extension Firefox::Sync::Client.

0.01  Tue Aug 14 19:25:34 2012
        - initial version of the module

0.02  Fri Aug 17 20:46:07 2012
        - Added prerequisites to Makefile.PM

0.03  Tue Sep 11 21:56:04 2012
        - Added dependency to 'LWP::Protocol::https' in Makefile.PL and README
        - Removed static host and port of test server in LWP credentials 
        - Changed from usage of Mcrypt to Crypt::Rijndael for data decryption

0.04  Sat Sep 29 23:31:04 CEST 2012
        - Added caching mechanism and thus, dependency to Storable

lib/Firefox/Sync/Client.pm  view on Meta::CPAN

    return decode_json($res->content);
}

sub really_fetch_json {
    my ($self, $url) = @_;

    # Initialize LWP
    my $ua = LWP::UserAgent->new;
    $ua->agent ("FFsyncClient/0.1 ");
    $ua->credentials ( $self->{'hostname'} . ':' . $self->{'port'}, 'Sync', $self->{'username'} => $self->{'password'} );

    # Do the request
    my $res = $ua->get($url);
    die $res->{'_msg'} if ($res->{'_rc'} != '200');

    return $res;
}

sub repair_json {
    my ($self, $json) = @_;