foreach_in_collection j_obj [get_pins /path/to/ip/instance/* -filter "layer_name == LB" ] {
	set j_port_name [get_object_name [get_ports -of [get_nets -of $j_obj ] -phy ] ]
	set j_name [get_attr $j_obj full_name ]
	set j_bbox [get_attr $j_obj bbox ]
	set j_center_x [expr ([lindex [lindex $j_bbox 0 ] 0 ] + [lindex [lindex $j_bbox 1 ] 0])/2 ]
	set j_center_y [expr ([lindex [lindex $j_bbox 0 ] 1 ] + [lindex [lindex $j_bbox 1 ] 1])/2 ]
	puts "create_shape -shape_type rect -shape_use rdl -layer LB -port $j_port_name -boundary \{ \{[expr $j_center_x - 5 ] [expr $j_center_y -5]\} \{ [expr $j_center_x + 5] [expr $j_center_y + 5 ] \} \} "
#	eval "create_shape -shape_type rect -shape_use rdl -layer LB -port $j_port_name -boundary \{ \{[expr $j_center_x - 5 ] [expr $j_center_y -5]\} \{ [expr $j_center_x + 5] [expr $j_center_y + 5 ] \} \} "
	eval "remove_terminals [get_terminals -of [get_ports $j_port_name ] ] "
	puts "this is"
}