print "$data->{ date }, $data->{ day }, $data->{ name }\n" #### pp @{ $data }{ (@parms) };