sub determineType 
{
   $sub_ref = shift;
   $rval = $sub_ref(@_);
   return @$rval if( ref($rval) eq 'ARRAY' );
   return %$rval if( ref($rval) eq 'HASH' );
}