| Net-Delicious documentation | Contained in the Net-Delicious distribution. |
Net::Delicious::Subscription - OOP for del.icio.us subscription thingies
use Net::Delicious;
my $del = Net::Delicious->new({...});
foreach my $sub ($del->inbox_subscriptions()) {
# $sub is a Net::Delicious::Subscription
# object.
print "$sub\n";
}
OOP for del.icio.us subscription thingies.
Returns a new Net::Delicious::Subscription object. Woot!
Returns a string.
Returns a string.
Returns a string.
Return the object as a hash ref safe for serializing and re-blessing.
1.13
$Date: 2008/03/03 16:55:04 $
Aaron Straup Cope <ascope@cpan.org>
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;