Help for this page
Select Code to Download
Select
or
download this
use Regexp::Common qw /delimited/; $str =~ /^$RE{delimited}{-delim=>'/'}$/;