$dir =~ m|/$|;  # Do you get the point?!?