NAME

WWW::Mixi::OO::Page - WWW::Mixi::OO's Pages base class

SYNOPSIS

package WWW::Mixi::OO::Foo;
use base qw(WWW::Mixi::OO::Page);
sub uri {
    shift->absolute_uri('foo.pl');
}
# some implementations...

DESCRIPTION

pages base class.

METHODS

new

# subclass
sub new {
    my $this = shift->SUPER::new(@_);
    # some initializations...
}

# call
my $page = $pkg->new($session);

constructor of page. please override if you need some initializations.

uri

  # subclass
  sub uri {
      my ($this, %options) = @_;
      $this->SUPER::uri(_path => 'foo',
			_params => {
			    a => b,
			},
			%options);
  }

  # call
  my $uri = $page->uri([opt => val], ...);

return URI of page.

parse_uri

  # subclass
  sub parse_uri {
      my ($this, $data, %options) = @_;
      $this->copy_hash_val($data->{params}, \%options, 'page');
      if ($data->{path} eq "show_friend") {
	  # blah...
      }
      if ($data->{uri}->...) {
	  # maybe you won't use this
      }
      $this->SUPER::uri($data, %options);
  }

  # call
  my %options = $page->analyze_uri($uri);

return page information of URI.

parse

# subclass
sub parse {
    my ($this, %options) = @_;
    # parse...
    my $part = $this->parse_extract_parts(qw/.../);
    return () unless defined $part;
    # return
    return ({ a => b, c => d }, { a => e, c => f }, ...);
}

# call
my @datas = $page->parse;

page parser. please return hashref array.

parse_banner

my $data = $page->parse_banner;

parse banner. structure:

link:    link to ad page.
subject: subject of ad(banner's alt text).
image:   image of banner
height:  height of image
width:   width of image

parse_mainmenu

my @data = $page->parse_mainmenu;

parse mainmenu. structure:

link:    link to page
subject: subject of page

parse_tool_bar

my @data = $page->parse_tool_bar;

parse toolbar. structure:

link:    link to page
subject: subject of page
image:   image of toolbar.
height:  height of image
width:   width of image

get

$page->get([opt => val], ...);

handy method. call ->set_content and ->parse.

set_content

$page->set_content($uri);

or

$page->set_content(%options);

set content to specified by uri or options.

UTILITY METHODS

methods to useful for subclass implementations

parse_extract_parts

# array
my @parts = $this->parse_extract_parts(qr|....|);
return () unless @parts;
# more parse with @parts

or

# scalar
my $part = $this->parse_extract_parts(qr|....|);
return () unless defined $part;
# more parse with $part

extract part(s) from current content.

html_attr_to_uri

$page->html_attr_to_uri('src', 'src="foobar" ...');

parse html attrs string(->html_attrs_to_hash) and extract attr(->generate_ignore_case_hash()->{$attrname}) and resolve to absolute URI(->absolute_linked_uri).

html_anchor_to_uri

$page->html_anchor_to_uri("href='...'...");

handy method. call ->html_attr_to_uri with 'href'.

cache

my $cache = $pkg->cache;
if (defined $cache->{foo}) {
    return $cache->{foo};
}
...

get modules's cache storage.

mk_cached_parser

# from subclass
__PACKAGE__->mk_cached_parser(qw(foo bar));
sub _parse_foo {
    # ...
    return $foo; # please return scalar value.
}

generate cached parser (proxy) method. use _parse_(name) to real parser method.

mk_get_method

# from subclass
__PACKAGE__->mk_get_method(qw(foo bar));

generate get handy method.

ACCESSOR

session

parent WWW::Mixi::OO object.

PROXY METHODS

relative_uri

absolute_uri

absolute_linked_uri

refresh_content

post

response

content

page

class_to_page

page_to_class

analyze_uri

convert_from_http_content

convert_to_http_content

convert_login_time

convert_time

see WWW::Mixi::OO::Session.

SEE ALSO

WWW::Mixi::OO

for listed content: WWW::Mixi::OO::ListPage

AUTHOR

Topia <topia@clovery.jp>

COPYRIGHT AND LICENSE

Copyright (C) 2005 by Topia.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.6 or, at your option, any later version of Perl 5 you may have available.