#!/usr/bin/env perl

use strict;
use warnings;

use CGI qw/-nosticky :standard/;

print header, html(
    start_form,
    checkbox(
        -nosticky => 1,
        -name => "checkbox",
        -label => "Broken (using nosticky)",
        -checked => 0
    ),
    br,
    checkbox(
        -override => 1,
        -name => "checkbox",
        -label => "Working (using override)",
        -checked => 0
    ),
    br,
    submit,
    end_form
);