我浏览了s'flow和其他站点，以在Perl中使用regex进行简单的解决方案。
$str = q(//////);#
假设我有六个斜线或七个斜线，或其他字符，例如q（aaaaa）
我希望他们能像分割['//','//']，
我试过了@my_split = split ( /\/\/,$str);但是没用
正则表达式可能吗？
出现此问题的原因是，说我拥有此域名：
$site_name = q(http://www.yahoo.com/blah1/blah2.txt);
我想使用单斜杠拆分以获取“域名”，但我做不到。我试过了
split( '/'{1,1}, $sitename);＃没有工作。我期望它在一个斜杠上比两个斜杠分开。
谢谢。