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

NAME

Gtk2::Ex::Entry::SSN -- Gtk2 widget for entering social security numbers

SYNOPSIS

 use Gtk2::Ex::Entry::SSN;
 $w = Gtk2::Ex::DateEntry->new(value => '012-345-6789');
 $w->get_value;

WIDGET HIERARCHY

    Gtk2::Widget
      Gtk2::Entry
        Gtk2::Ex::Entry::SSN

DESCRIPTION

Gtk2::Ex::Entry::SSN displays and edits a social security number.

Navigate between the three components of a social security number using the left and right arrow keys. The value of the widget will be stored internally as a 9 character string consisting only of digits (i.e. "0123456789"). However, the text that is displayed in the widget will be displayed with hyphens between the components (i.e. "012-345-6789").

FUNCTIONS

$te = Gtk2::Ex::Entry::SSN->new ()

Create and return a new SSN Entry widget.

$te->get_selected_component

Returns the currently selected component - any of 0, 1, or 2; An emptry string will be returned if the selection bounds contains more or less than 1 individual component, and will return 'all' if all componentes are selected.

$te->set_selected_component($component)

Highlights the given component, which can then be edited by typing over it. You can pass the values 0, 1, 2, 'all', 'none', undef, or an emptry string.

$te->get_value

Return the internal value of the widget.

$te->set_value ($value)

Set the internal value of the widget.

SIGNALS

value-changed

Emitted after a succesful value change.

AUTHORS

Jeffrey Ray Hallock <jeffrey.hallock at gmail dot com>

COPYRIGHT & LICENSE

    Copyright (c) 2011 Jeffrey Ray Hallock.

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