{ my $self = shift; my $slobbo = "select * from bleh where whatever = "; my $connection = $self->connection; foreach ($self->things) { my $name = new thang($_); my $thangsname = XXXXXXX my $sth = $connection->connection->prepare( $slobbo.$thangsname ); } }