$name =~ s/^.*\\//;