"my" variable $ref_data masks earlier declaration in same scope at ...
Use of uninitialized value $new_ip in concatenation (.) or string at ...