print "before $_\n" for @instances;
screwed $_          for @instances;
print "after $_\n"  for @instances;