Help for this page

Select Code to Download


  1. or download this
      s{\s(")?(\w+):(\w)((([^"\n]*)")|([^\s\n]*)([\s\n]))}
   { " <a>$2:$3" . ( ($1 && $5) ? "$6</a>" : "$7</a>$8" ) }eg;
  2. or download this
      my $p = qr{\s(")?(\w+):(\w)((([^"\n]*)")|([^\s\n]*)([\s\n]))};
  s|$p| " <a>$2:$3" . ( ($1 && $5) ? "$6</a>" : "$7</a>$8" ) |eg;