NAME

HTML::FillInForm::Lite::JA - HTMLXXXXXXXXXXXXX

VERSION

The document describes HTML::FillInForm::Lite version 1.12

SYNOPSIS

        use HTML::FillInForm::Lite;
        use CGI;

        my $q = CGI->new();
        my $h = HTML::FillInForm::Lite->new();

        $output = $h->fill(\$html,    $q);
        $output = $h->fill(\@html,    \%data);
        $output = $h->fill(\*HTML,    \&my_param);
        $output = $h->fill('t.html', [$q, \%default]);

        $output = $h->fill(\$html, $q,
                fill_password => 0, # it is default
                ignore_fields => ['foo', 'bar'],
                target        => $form_id,
        );

        # Moreover, it accept any object as data
        # (these classes come form Class::DBI's SYNOPSIS)

        my $artist = Music::Artist->insert({ id => 1, name => 'U2' });
        $output = $h->fill(\$html, $artist);

        my $cd = Music::CD->retrieve(1);
        $output = $h->fill(\$html, $cd);

DESCRIPTION

XXXXXXXXHTMLXXXXXXXXXXXXXXXX XXX"HTML::FillInForm"XPure PerlXXXXXXXXXXX

"HTML::FillInForm"X"HTML::Parser"XXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXX XXXXX"HTML::FillInForm::Lite"X"HTML::FillInForm"XXXXX2XXX XXXXXXXXX

METHODS

new(options...)

"HTML::FillInForm::Lite"XXXXXXXXXXXXXX

XXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

fill_password => bool

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

XXXXXXXXXXX"HTML::FillInForm"XXXXXXX XXXXXXXXXXXXXXXX"HTML::FillInForm::Lite"X XXXXXXXXXXXXXXXXX

ignore_fields => array_ref_of_fields

XXXXXXXXXXXXXXXXXXXXXXXXX

target => form_id

form_idXXXXXXXXXXXXXXXXXXX

escape => bool | ref

XXXXXXXXXXXXX1(X)XXXXXXXXXXXXXXXXXXXXXXX XXHTMLXXXXXXXXXX

XXXXXHTMLXXXXXXXXXXXXXX0(X)XXXXXXXXXX

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

XXXXXXXX"HTML::FillInForm"XXXXXXXXX

decode_entity => bool | ref

XXXXXXXX1(X)XXXXXXXXXXXXXXXXXX XXXXXradio/checkbox/selectXXXXXXHTMLXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXX

XXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXX

"HTML::FillInForm"XXXXXXXXXXXXXHTMLXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXX

layer => :iolayer

XXXXXXXXXXXX:iolayerXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXX

XXXX

        # UTF-8XXXXXXXXXXXXXXXXXX
        $fif = HTML::FillInForm::Lite->new(layer => ':utf8');
        $output = $fif->fill($file, $fdat);

        # EUC-JPXXXXXXXXXXXXXXXXXX
        $fif = HTML::FillInForm::Lite->new(layer => ':encoding(euc-jp)');
        $output = $fif->fill($file, $fdat);

fill(source, form_data [, options...])

sourceXform_dataXXXXXXXsourceXXXform_dataXXXXXXXXX"die"XXXX

XXXXXX"new()"XXXXXX

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXX

"fill()"XXXoptionsXXXXXXXXXXXX "fill()"XXXXXXXX"new()"XXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXX

sourceXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXX

form_dataXXXXXXXXXXXXXXXX"param()"XXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXX

form_dataXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX"undef"XXXXXXXX"()"XXXXXXXXXXXXX

DEPENDENCIES

Perl 5.8.1XX

NOTES

"HTML::FillInForm"XXXXX

XXXXXXXX"HTML::FillInForm"XXXXX2XXXXXXXXXXXXXXXX

"HTML::FillInForm::Lite::Compat"X"HTML::FillInForm"XXXXX1XXXXXXXXXX XXXXXXXXXXXXX"HTML::FillInForm"XXXXXXXXXXX

XXHTMLXXXXX

XXXXXXXXXHTML1.xXXXXXXXXXXXXXXXXX HTML4.xXXXXXXXXXXXXXXXXXXXXXXXXXXX

XXXHTML4XXXXXXXXXXXXXXXXXXXXX

XXXX:

        <INPUT TYPE=checkbox NAME=foo CHECKED> - NG.
        <INPUT TYPE=checkbox NAME=foo CHECKED=CHECKED> - OK, XXXXXXXX
        <input type="checkbox" name="foo" checked="checked" /> - OK, XXXXHTML

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXX"type"XXXXXXXXXXXXXXXXXXX

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

        <select name="foo">
                <option>bar
                <option>baz
        </select>

XXXXHTMLXXXXXXXXXXXXXXXXXX

XXXXXXX

"HTML::FillInForm::Lite"XXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXX

XXXXXXXXXXXXXXXXXXXXXXXXXXXX:

        <script> document.write("<input name='foo' />") </script>

XXXXXXXXXXXXXXXXXXXXX:

        <script> document.write("<input name='foo' value="bar" />") </script>

XXXXXXXXXXXXXX"ignore_fields"XXXXXXXXXXX

BUGS

No bugs have been reported.

Please report any bug or feature request to <gfuji(at)cpan.org>, or through RT <http://rt.cpan.org/>.

AUTHOR

Goro Fuji (X XX) <gfuji(at)cpan.org>

LICENSE AND COPYRIGHT

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