added perl dir