The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

SYNOPSIS

use CGI::FormBuilderX::More;
use CGI::FormBuilderX::More::InputTie;

my $form = CGI::FormBuilderX::More->new( ... );
my %hash;
tie %hash, $form; # %hash is now tied to the input of $form

if (exists $hash{username}) {
    ...
}

$hash{password} = "12345"

METHODS

TIEHASH($form)

my %hash;
tie %hash, $form;

# %hash is now tied to $form input

STORE($key, $value)

$hash{$key} = $value

sub {
    return $form->input_store($key, $value)
}

FETCH($key)

$value = $hash{$key};

sub {
    return $form->input_fetch($key)
}

EXISTS($key)

exists $hash{$key};

sub {
    return ! $form->missing($key)
}

SCALAR

sub {
    return scalar $form->{params}->param
}

FIRSTKEY

N/A

NEXTKEY

N/A

DELETE

N/A

CLEAR

N/A