Net::Delicious::Subscription - OOP for del.icio.us subscription thingies


Net-Delicious documentation Contained in the Net-Delicious distribution.

Index


Code Index:

NAME

Top

Net::Delicious::Subscription - OOP for del.icio.us subscription thingies

SYNOPSIS

Top

  use Net::Delicious;
  my $del = Net::Delicious->new({...});

  foreach my $sub ($del->inbox_subscriptions()) {

      # $sub is a Net::Delicious::Subscription
      # object.

      print "$sub\n";
  }

DESCRIPTION

Top

OOP for del.icio.us subscription thingies.

NOTES

Top

PACKAGE METHODS

Top

__PACKAGE__->new(\%args)

Returns a new Net::Delicious::Subscription object. Woot!

OBJECT METHODS

Top

$obj->user()

Returns a string.

$obj->tag()

Returns a string.

$obj->url()

Returns a string.

$obj->as_hashref()

Return the object as a hash ref safe for serializing and re-blessing.

VERSION

Top

1.13

DATE

Top

$Date: 2008/03/03 16:55:04 $

AUTHOR

Top

Aaron Straup Cope <ascope@cpan.org>

SEE ALSO

Top

Net::Delicious

LICENSE

Top

Copyright (c) 2004-2008 Aaron Straup Cope. All rights reserved.

This is free software, you may use it and distribute it under the same terms as Perl itself.


Net-Delicious documentation Contained in the Net-Delicious distribution.
# $Id: Subscription.pm,v 1.14 2008/03/03 16:55:04 asc Exp $
use strict;

package Net::Delicious::Subscription;
use base qw (Net::Delicious::Object);

$Net::Delicious::Subscription::VERSION = '1.14';

use overload q("") => sub { shift->user() };

use Net::Delicious::Constants qw (:uri);

# Defined in Net::Delicious::Object

# Defined in Net::Delicious::Object

# Defined in Net::Delicious::Object

sub url {
    my $self = shift;
    return URI->new_abs(join("/", $self->user(),$self->tag()), URI_DELICIOUS); 
}

# Defined in Net::Delicious::Object

return 1;