$var =~ s{/[^/]+}{};