Help for this page

Select Code to Download


  1. or download this
    use Regexp::Common qw /delimited/;
    $str =~ /^$RE{delimited}{-delim=>'/'}$/;