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

my %staff = (

   Mike  => {

     age    => 27,
     skills => "python, java, bioinformatics, biochemistry",
     phone  => '213.xxx.xxxx',
     email  => 'xxx@xxx.xxx',
   },

   Cindy  => {

     age    => 23,
     skills => "perl, java, bioinformatics, microbiology",
     phone  => '213.xxx.xxxx',
     email  => 'xxx@xxx.xxx',
   },

   Katie => {

     age    => 24,
     skills => "perl, java, C, XML, " .
               "MySQL, PHP, " .
                "bioinformatics, genetic programming,\n" .
                "chemical analysis",
     phone  =>  '310.xxx.xxxx',
     email  =>  'xxx@xxx.xxx',
   },

   Carl  => {

     age    => 25,
     skills => "Python, PHP, postgresql, bioinformatics, biochemistry",
     phone  => '310.xxx.xxxx',
     email  => 'xxx@xxx.xxx',
   },

   Michelle  => {

     age    => 31,
     skills => "bioinformatics, biochemistry, molecular biology",
     phone  => '415.xxx.xxxx',
     email  => 'xxx@xxx.xxx',
   },

);