open (XCACLS, "xcacls.txt") or die "Cant open file: $!\n";

while (<XCACLS>) {
    chomp;
    if (/regex goes here/) {
        code goes here
    }
}