fork download
  1. strings <- c("cloch/51.wav",
  2. "grand/Grand_bombarde/02-suchy_Grand_bombarde/038-D.wav",
  3. "grand/Grand_bombarde/02-suchy_Grand_bombarde/039-D#.wav",
  4. "AB_AeolinaL/025-C#.wav",
  5. "AB_AeolinaL/026-D.wav",
  6. "AB_violadamourL/rel99999/091-G.wav",
  7. "AB_violadamourL/rel99999/092-G#.wav",
  8. "AB_violadamourR/024-C.wav",
  9. "AB_violadamourR/025-C#.wav")
  10. sub("/[^\\s/]+\\.wav$", "", strings)
  11.  
Success #stdin #stdout 0.22s 39396KB
stdin
Standard input is empty
stdout
[1] "cloch"                                       
[2] "grand/Grand_bombarde/02-suchy_Grand_bombarde"
[3] "grand/Grand_bombarde/02-suchy_Grand_bombarde"
[4] "AB_AeolinaL"                                 
[5] "AB_AeolinaL"                                 
[6] "AB_violadamourL/rel99999"                    
[7] "AB_violadamourL/rel99999"                    
[8] "AB_violadamourR"                             
[9] "AB_violadamourR"