Perl Script Error with find command

Shell Programming and Scripting
1

Guys,

I need to find all the files ending with either dmp or dmp.Z. This command is giving me error.

@files =`find $path \(-name ".dmp" -o -name ".dmp.Z"\) -mtime +30`;

sh: 0403-057 Syntax error at line 1 : `(' is not expected.

Thanks in advance

2

You need to double the backslashes in order for them to be passed through to the shell. Backticks in Perl undergo "double-quotish" substitution so one level of backslashes gets eaten by Perl, basically.

3

Thanks era,

You mean like this.
@files =`find $path \\(-name ".dmp" -o -name ".dmp.Z"\\) -mtime +30`;

This is not working either.

4

If you copy+pasted that verbatim then the error message "find: invalid predicate `(-name'" should be self-explanatory -- you need a space in between there. Also before the closing paren.

5

:b:

cool. It is working now.

@files =`find $path \\( -name ".dmp" -o -name ".dmp.Z" \\) -mtime +30`;

Thanks a lot era.