s/\w+\s+(\w+)\s+(\d+)\s+\d\d:\d\d:\d\d\s+(\d\d\d\d)/$1 $2 $3/;


<div>
hi ozo,<br />
&nbsp;i tried the statement you have provided but it only extract &quot;thur&quot; and<br />
insert it into the database. 
</div>


hi ozo,
 i tried the statement you have provided but it only extract "thur" and
insert it into the database.

<div>
sorry..<br />
my mistake i want to modify the above perl statement from<br />
&quot;thur jul 22 10:10:18 2004&quot; to &quot;2004/07/22&quot; 
</div>


sorry..
my mistake i want to modify the above perl statement from
"thur jul 22 10:10:18 2004" to "2004/07/22"

<div>
hi ozo. the state ment work, <br />
however it is unable to insert the date into the database and <br />
also i have have duplicate dates but i have many text files<br />
with different date.
</div>


hi ozo. the state ment work,
however it is unable to insert the date into the database and
also i have have duplicate dates but i have many text files
with different date.

<div>
<div class="content wysiwyg-content">
hi.. <br />
i have this statment in the perl script that allows me to extract the date &quot;02/31/04&quot;<br />
and insert it to the database in the form of &quot;2004/02/31&quot;<br />
this is the statment :<br />
&nbsp; if( /Start Date\s*:\s*(\S+)/ ) {<br />
&nbsp; &nbsp; $job = $1;<br />
&nbsp; &nbsp; ($date = $2) =~ s!(\d\d)/(\d\d)/(\d\d)!20$<wbr />3/$1/$2!;<br />
<br />
however, the date formate given &nbsp;is in this form &quot;thur jul 22 10:10:18 2004&quot;<br />
how do i modify the above statment to extract onlt &quot;jul 22 2004&quot;<br />
<br />
thanks.
</div>
</div>


hi.. 
i have this statment in the perl script that allows me to extract the date "02/31/04"
and insert it to the database in the form of "2004/02/31"
this is the statment :
  if( /Start Date\s*:\s*(\S+)/ ) {
    $job = $1;
    ($date = $2) =~ s!(\d\d)/(\d\d)/(\d\d)!20$3/$1/$2!;

however, the date formate given  is in this form "thur jul 22 10:10:18 2004"
how do i modify the above statment to extract onlt "jul 22 2004"

thanks.

perl code

Perl is a high-level, general-purpose, interpreted, dynamic programming languages with over 25 years of development. Perl 5 runs on over 100 platforms from portables to mainframes and is suitable for both rapid prototyping and large-scale development projects.  Perl gained widespread popularity as a Common Gateway Interface (CGI) scripting language, in part due to its regular expression and string parsing abilities. In addition to CGI, Perl is used for graphics programming, system administration, network programming, finance, bioinformatics, and other applications.