Select Code to Download

foo    ENUM( "bar", "baz") NOT NULL

my $foo_bar = 1;  # Could store the string representation, too
my $foo_baz = 2;
...
    inflate => sub { my $f = shift; bless \$f, __PACKAGE__ . '::FOO' }
+, 
    deflate => sub { my $f = shift; $$f; }, 
);