foreach my $path ( @directories ) { $self->push('directory', Apache::CVS::Directory->new($self->path() . "/$path")); }