Removes the last suffix (including the last dot) from a filename. If no dot exists, the full string is returned.

removeFileSuffix(filepath)

Arguments

filepath

A filename (with optional path -- which is retained)

Value

The input with removed suffix

Examples

 removeFileSuffix("test.tar.gz")  # --> 'test.tar'
#> [1] "test.tar"
 removeFileSuffix("test.mzML")  # --> 'test'
#> [1] "test"
 removeFileSuffix("/path/to/test.mzML")  # --> '/path/to/test'
#> [1] "/path/to/test"
 removeFileSuffix("test_no_dot")  # --> 'test_no_dot'
#> [1] "test_no_dot"