my @new_directories = map { "$pwd/$_" } for ('some_dir', 'another_dir'); $ENV{LSF_PATH} = join ":", @new_directories, $ENV{LSF_PATH};