Andreas Marienborg > Catalyst-Plugin-Facebook-0.2 > Catalyst::Plugin::Facebook

Download:
Catalyst-Plugin-Facebook-0.2.tar.gz

Dependencies

Annotate this POD (1)

View/Report Bugs
Module Version: 0.2   Source  

VERSION ^

version 0.2

NAME ^

Catalyst::Plugin::Facebook - Build Facebook applications in Catalyst easier

SYNOPSIS ^

This module adds quick and easy access to WWW::Facebook::API within a Catalyst application.

  use Catalyst qw/Facebook/;
  __PACKAGE__->config(
    'facebook' => {
      'api_key' => 'api_key_xyz',
      'secret' => '12345ddd',
    }
  );

  sub auto : Private { 
      my ( $self, $c ) = @_;
      if (! $self->can_display($c)) {
          return;
      }
      return 1;
  }

  sub can_display {
      my ($self, $c) = @_;
      if (! $c->facebook->canvas->in_fb_canvas()) {
          $c->res->redirect('http://apps.facebook.com/iplaywow/');
          return 0;
      }
      if (! $c->facebook->canvas->get_fb_params->{'added'} ) {
          $c->res->redirect($c->facebook->get_add_url());
          return 0;
      }
      my $user = $c->facebook->canvas->get_fb_params->{'user'};
      if (! $user) {
          $c->res->redirect($c->facebook->get_login_url());
          return 0;
      }
      return 1;
  }

CONFIGURATION ^

This package uses the 'facebook' configuration namespace. See the WWW::Facebook::API module for all of the configuration options available.

The two required configuration options are 'api_key' and 'secret'.

INTERFACE ^

METHODS

facebook

This method, which will be available on your Catalyst context object, will return the full WWW::Facebook::API object.

fb

fb is just an alias for facebook.

BUGS ^

Please report any bugs or feature requests to bug-catalyst-plugin-facebook at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Catalyst-Plugin-Facebook. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

SUPPORT ^

You can find documentation for this module with the perldoc command.

    perldoc Catalyst::Plugin::Facebook

You can also look for information at:

COPYRIGHT & LICENSE ^

Copyright 2007 Nick Gerakines, all rights reserved.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

AUTHOR ^

  Nick Gerakines <nick@gerakines.net>

COPYRIGHT AND LICENSE ^

This software is copyright (c) 2009 by Nick Gerakines.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.

syntax highlighting: