The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

WWW::Vimeo::Simple::Album - Album requests for the Vimeo Simple API

VERSION

version 0.08

SYNOPSIS

This module is a full object-oriented implementation of the Vimeo Simple API. The specifications are available at http://vimeo.com/api/docs/simple-api.

Album requests implementation.

    use feature 'say';
    use WWW::Vimeo::Simple::Album;

    # create a new album object
    my $album = WWW::Vimeo::Simple::Album -> new(id => $album_id);

    # retrieve album's information
    $album -> info;

    # print album's information
    say $album -> title;
    say $album -> description;
    say $album -> url;

    # retrieve album's videos
    my $videos = $album -> videos;

    foreach my $video (@$videos) {
      say $video -> title;
      say $video -> description;
      say $video -> url;
    }

METHODS

new( id => $album_id )

Create a WWW::Vimeo::Simple::Album object using the given album ID.

An Album object has the following attributes:

  • id

    Album ID

  • created_on

    Date the album was created

  • last_modified

    Date the album was last modified

  • title

    Album title

  • description

    Album description

  • url

    URL for the album page

  • thumbnail

    Thumbnail

  • total_videos

    Total # of videos added to the album

  • user_id

    ID of the user who made the album

  • user_display_name

    Name of the User who created the album

  • user_url

    The URL to the album creator's profile

info

Fetch album info for the specified album.

videos( $page )

Fetch videos in that album, page optional (default 1). This method returns an array reference of WWW::Vimeo::Simple::Video objects.

INTERNAL SUBROUTINES

_make_url( $request )

Build a Vimeo Simple API url

AUTHOR

Alessandro Ghedini <alexbio@cpan.org>

LICENSE AND COPYRIGHT

Copyright 2011 Alessandro Ghedini.

This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.

See http://dev.perl.org/licenses/ for more information.