print $RE{delimited}{-delim => '[\\\/]'};