Have a ++ (I'm out of cigars ;)) that worked perfectly after I changed the last Base to Foo! Many thanks to both of you for you help

$japh->{'Caillte'} = $me;