[Mon Jun 17 23:09:46 2002] [error]usage: tie @array, Tie::File, filename, [option => value]... at d:/httpd/apache/perl/velog.pl line 16

[Mon Jun 17 23:24:44 2002] [error] [client 127.0.0.1]File does not exist: d:/httpd/apache/htdocs/kjh

##</code><code>##

[Mon Jun 17 23:09:46 2002] [error]
usage: tie @array, Tie::File, filename, [option => value]... at d:/httpd/apache/perl/velog.pl line 16

[Mon Jun 17 23:24:44 2002] [error] [client 127.0.0.1]
File does not exist: d:/httpd/apache/htdocs/kjh

##</code><code>##

    s/^               #start of string
      (               #start capture
        (?:           #begin non-capturing repeating
          \[          #literal [
          [^]]*       #anything that isn't a ]
          ]\s*        #ending ] and optional spaces
        )+            #end non capturing repeating
      )               #end capture
      /               #end match
      $1<br>/gx;