my ( $key,$value );

# or...

my ( %tips_by_name, %av_by_name, %max_by_name, %min_by_name );