Help for this page

Select Code to Download


  1. or download this
    [mellimik@localhost cgi-bin]$ perl -cw formCreator.pl
    Scalar found where operator expected at formCreator.pl line 286, near 
    +"?:\|(.*))?$/"
            (Missing operator before $/?)
    syntax error at formCreator.pl line 286, near "[^"
    formCreator.pl had compilation errors.
    
  2. or download this
    if (/$_[0] =~ /^([^:]+):([^|]+)(?:\|(.*))?$/ ||
         $_[0] =~ /^([^|)+)\|(.*)$/) {
    
  3. or download this
    if (/$_[0] =~ /^([^:]+):([^|]+)(?:\|(.*))?$/ ||
         $_[0] =~ /^([^|])+)\|(.*)$/) {