open (ME, ">>$0"); print ME "data\n"; close(ME); __DATA__