NAME

WWW::Tube8 - Get video informations from tube8.com

SYNOPSIS

use LWP::UserAgent;
use WWW::Tube8;

my $ua = LWP::UserAgent->new(
    timeout => 30,
);

my $t8 = WWW::Tube8->new({
    url => 'http://www.tube8.com/category/hoge-hoge-/00000/',
    ua  => $ua, # optional
});

print $t8->flv          . "\n";
print $t8->thumb        . "\n";
print $t8->get_3gp      . "\n";
print $t8->url          . "\n";
print $t8->id           . "\n";
print $t8->title        . "\n";
print $t8->title_inurl  . "\n";
print $t8->category     . "\n";
print $t8->category_url . "\n";
print $t8->duration     . "\n";

METHOD

new($hash_ref)

Creates a new WWW::Tube8 instance. required param only url.

you can get video infomations like follow

flv

thumb

get_3gp

url

id

title

title_inurl

category

category_url

duration

AUTHOR

Copyright (c) 2009, Dai Okabayashi <bayashi@cpan.org>

LICENCE

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