Re: Recursive search and delete

[NetWallah]

in reply to Recursive search and delete

Please use <code> tags to preserve format for your code </code>.

Your statement:

 if ( $currentFile eq $searchfile )

Looks for an exact string match between the $currentFile and "abc*.xml*".

It is unlikely to find a file with that name.
You could use regular expressions to match the file name, but I would recommend re-designing your code around the File::Find module and friends (File::Find::Match).