grep { s/user::/USER:$o:/} @A; # make native Linux dir/file permissions uppercase grep { s/group::/GROUP:$g:/} @A; # idem grep { s/other::/OTHER::/} @A; # idem