I think you can puzzle this out yourself if you have some starting points in PFC:
Use the directory class to get the file names to delete:
predicatesThen, use the file class to delete the files:
getFilesInDirectory_nd : (string Directory) -> string FullFileName nondeterm.
% @short Retrieves names of all files in the directory.
% @detail This predicate will return all existing files in the specified Directory.
% Both absolute and relative directory names, such as ".", can be used in the #Directory string.
% An empty string means current directory.
% The predicate fails if nothing is found.
predicatesNote that getFileInDirector_nd/1 is nondeterministic, so you can backtrack into it to get each file matching your input file mask. Also, you should implement some try/catch/finally code to handle exceptions due to a locked file, etc.
moveToRecycleBin : (string FileName).
% @short Moves file FileName to RecycleBin
% @detail When you delete a file by this predicate, the file appears
% in the Recycle Bin.
% Note: you can pass a directory name to this predicate.
% @exception nativeCallException is raised if internal API function call failed
This should get you started!