# Generate a standalone checkbox, initialize checked
print $query->checkbox({-name=>'CheckboxAloneOne',
-checked=>'checked'});
print $query->br();
# Extract out whatever the state of the standalone checkbox was.
# (Either "on" or an empty string)
my $textInput = $query->param(-name=>'CheckboxAloneOne');
print $query->hr();
print $query->p('The checkboxalone state was:'), $query->br();
print $query->em({-align=>'center'}, $textInput);
print $query->hr();