in reply to extracting email attachments

quotemeta
if ($subentity->mime_type =~ m/\Q$x/i){ if ($subentity->mime_type =~ m/\Q$newx/i){

Replies are listed 'Best First'.
Re^2: extracting email attachments
by jrtaylor (Initiate) on Apr 01, 2014 at 20:08 UTC
    OK it is now getting the file name. How do get rid of the "/" in the file name so I can save it?
      Figured it out. This is what I added before I open the file for writting.
      $attname[$x]=~ s/[^A-Za-z0-9\-\.]//g;