You can download active perl for windows with crimson editor. both are free. Regards, Ahmed Ashraf Elazab
You could try something like: @res = ($line =~ /cn=(.*?),/ig) print $res[0];
Separate names with a comma.