my ($file) = $url =~ m!([^/]*)$!;