Free www google video 0.3 software for linux

WWW::Google::Video is a fetch the Google Video Information.

SYNOPSIS

use WWW::Google::Video;

$foo=new WWW::Google::Video;

$foo->fetch(http://video.google.com/videoplay?docid=1808273720725631796);
# The Google Video Page URL, such as http://video.google.com/videoplay?docid=blahblahblah

print $foo->{url},"n"; # Google Video FLV Original File URL !!
print $foo->{length},"n"; # Video Length Information
print $foo->{name},"n"; # Video Name Information

foreach(@{ $foo->{pic} }){ # By using Reference to an Array
print $_,"n"; # To show the preview pictures.
}

The WWW::Google::Video is a class implementing a interface for fetch the Google Video Information.

To use it, you should create WWW::Google::Video object and use its method fetch(), to fetch the information of Video.

It uses LWP::Simple for making request to Google.

GetVideo is a Firefox extension that allows you to download videos from YouTube and Google directly.

Unlike VideoDownloader it does not use a proxy page, and unoike unplug it does not create a layer over the current page.

It simply try to get the absolute video path and prompt for download it.

Google Video Downloader is a Firefox extension that adds a button in the status bar. You can download the source .flv or .avi file directly in two clicks

If You:

- Would like to download files from other videohostings;
- Have DownThemAll od FlashGot;
- Would like to permanently choose preferred Google Video format.

WWW::Google::Groups is a Perl module for Google Groups Agent.

BROWSING

use WWW::Google::Groups;

$agent = new WWW::Google::Groups
(
server => groups.google.com,
proxy => my.proxy.server:port,
);


$group = $agent->select_group(comp.lang.perl.misc);

$group->starting_thread(0); # Set the first thread to fetch
# Default starting thread is 0

while( $thread = $group->next_thread() ){
while( $article = $thread->next_article() ){

# the returned $article is an Email::Simple object
# See Email::Simple for its methods

print join q/ /, $thread->title, header(From).>, $/;
}
}
If you push raw to the argument stack of $thread->next_article(), it will return the raw format of messages.
while( $thread = $group->next_thread() ){
while( $article = $thread->next_article(raw) ){
print $article;
}
}
Even, you can use this more powerful method. It will try to mirror the whole newsgroup and save the messages to a Unix mbox.
$agent->save2mbox(
group => comp.lang.perl.misc,
starting_thread => 0,
max_article_count => 10000,
max_thread_count => 1000,
target_mbox => perl.misc.mbox,
);

WWW::Google::SiteMap is a Perl extension for managing Google SiteMaps.

SYNOPSIS

use WWW::Google::SiteMap;

my $map = WWW::Google::SiteMap->new(file => sitemap.gz);

# Main page, changes a lot because of the blog
$map->add(WWW::Google::SiteMap::URL->new(
loc => http://www.jasonkohles.com/,
lastmod => 2005-06-03,
changefreq => daily,
priority => 1.0,
));

# Top level directories, dont change as much, and have a lower priority
$map->add({
loc => "http://www.jasonkohles.com/$_/",
changefreq => weekly,
priority => 0.9, # lower priority than the home page
}) for qw(
software gpg hamradio photos scuba snippets tools
);

$map->write;

The Sitemap Protocol allows you to inform search engine crawlers about URLs on your Web sites that are available for crawling. A Sitemap consists of a list of URLs and may also contain additional information about those URLs, such as when they were last modified, how frequently they change, etc.

This module allows you to create and modify sitemaps.

WWW::Google::Notebook is a Perl interface for Google Notebook.

SYNOPSIS

use WWW::Google::Notebook;
my $google = WWW::Google::Notebook->new(
username => $username,
password => $password,
);
$google->login;
my $notebooks = $google->notebooks; # WWW::Google::Notebook::Notebook object as arrayref
for my $notebook (@$notebooks) {
print $notebook->title, "n";
my $notes = $notebook->notes; # WWW::Google::Notebook::Note object as arrayref
for my $note (@$notes) {
print $note->content, "n";
}
}
my $notebook = $google->add_notebook(title); # WWW::Google::Notebook::Notebook object
print $notebook->title;
$notebook->rename(title2);
my $note = $notebook->add_note(note); # WWW::Google::Notebook::Note object
print $note->content;
$note->edit(note2);
$note->delete;
$notebook->delete;

This module priovides you an Object Oriented interface for Google Notebook, using unofficial API.

WWW::Google::SiteMap::Index is a Perl extension for managing Google SiteMap Indexes.

SYNOPSIS

use WWW::Google::SiteMap::Index;

my $index = WWW::Google::SiteMap::Index->new(
file => sitemap-index.gz,
);

$index->add(WWW::Google::SiteMap::URL->new(
loc => http://www.jasonkohles.com/sitemap1.gz,
lastmod => 2005-11-01,
));

A sitemap index is used to point Google at your sitemaps if you have more than one of them.