#!\usr\bin\perl -w
use strict;

my %DigitalKitty = (

 age         => 24,
 gender      => "female",
 occupation  => [ 'college student', 'lab assistant', 
                  'web developer', 'programmer'],
 country     => "United States",
 education   => "Working towards undergraduate degree(s)",
 use_perl    => ['home', 'work', 'school'],
 PerlMonks   => "3 - 4 times/day. 7 days/week.",

 );