The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Egg::Plugin::HTML::TagCloud - Plugin to use HTML::TagCloud.

SYNOPSIS

  package MyApp;
  use Egg qw/ HTML::TagCloud /;
  
  my $array= $e->get_tagging_data;
  
  my $cloud= $e->tagcloud(10);
  
  $cloud->add($_->{tag_name}, "/tags/$_->{tag_id}", $_->{count}) for @$array;
  
  $e->stash->{tagcloud_content}= $cloud->html_and_css;

DESCRIPTION

It is a plugin to use HTML::TagCloud.

METHODS

tagcloud ([ARGS])

The object of HTML::TagCloud is returned.

Especially, the object is not maintained. However, it only returns it.

ARGS is an option to pass to HTML::TagCloud.

  my $cloud= $e->tagcloud( levels => 20 );

It is acceptable only to pass the figure.

  my $cloud= $e->tagcloud(20);
  

When ARGS is omitted ' levels => 10 ' becomes defaults.

SEE ALSO

Egg::Release, Egg::HTML::TagCloud,

AUTHOR

Masatoshi Mizuno <lushe@cpan.org>

*COPYRIGHT AND LICENSE

Copyright (C) 2008 Bee Flag, Corp. <http://egg.bomcity.com/>.

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.