sub iterate_with_obj my $obj = shift; my $method = shift; my $back = TRUE; for(@_) { if($obj->$method($_) == FALSE) { $back = FALSE; } } return $back; } iterate_with_obj($rep, 'attach', @param);