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

NAME

CGI::FCKeditor - FCKeditor For OOP Module

SYNOPSIS

  use CGI::FCKeditor;

  #Simple
  my $fck = CGI::FCKeditor->new();
  $fck->set_base('/FCKeditor/');  #FCKeditor Directory
  my $form_input_source = $fck->fck;    #output html source
  
  #Basic
  my $fck = CGI::FCKeditor->new();
  $fck->set_name('fck');        #HTML <input name>(default 'fck')
  $fck->set_base('/FCKeditor/');        #FCKeditor Directory
  $fck->set_set('Basic');       #FCKeditor Style(default 'Default')
  $fck->set_value('READ ME');   #input field default value(default '')
  my $form_input_source = $fck->fck;    #output html source
  
  #Short
  my $fck = CGI::FCKeditor->new('fck','/FCKeditor/','Basic','READ ME');
  my $form_input_source = $fck->fck;

DESCRIPTION

CGI::FCKeditor is FCKeditor(http://www.fckeditor.net/) Controller for Perl OOP. FCKeditor(http://www.fckeditor.net/) is necessary though it is natural.

METHODS

new

  my $fck = CGI::FCKeditor->new();

Constructs instance.

set_name

  $fck->set_name('fck');

Set <input name="fck"> on HTML source. Default 'fck'.

set_base

  $fck->set_base('/dir/FCKeditor/');

Set URL directory with fckeditor.js. Default '/FCKeditor'.

set_width

  $fck->set_width('100%');

Set FCKeditor Width. Default '100%'.

set_height

  $fck->set_height('500');

Set FCKeditor Height. Default '500'.

set_set

  $fck->set_set('Basic');

Set FCKeditor Style. Default 'Default'.

set_value

  $fck->set_value('Read ME');

Set <input value="Read ME"> on HTML source. Default ''.

fck

  $form_input_source = $fck->fck;

FCKeditor Render on HTML.

AUTHOR

Kazuma Shiraiwa

This module owes a lot in code to fckeditor.pl(Author:Takashi Yamaguchi) in FCKeditor_2.3.2.

COPYRIGHT AND LICENSE

Copyright (C) 2006 by Kazuma Shiraiwa. This program is free software; you may redistribute it and/or modify it under the same terms as Perl itself.