###########################
###  sample script  of  file_change #####

set  fix_file  [open  "fix.tcl"  w]

foreach_in_collection cel  [get_cells *dummy_*]  {

set  cel_name  [get_attr  [get_cells $cel]  full_name]
set  ref_name  [get_attr  [get_cells $cel]  ref_name]

puts $fix_file "size_cell  $cel_name  $ref_name"

}

close $fix_file