$file =~ m|/([^/]+)$|;