Help for this page
#C:\strawberry\perl\bin\perl.exe my $filename = "input.txt"; ... #$line=~s/(\d{2}\/\d{2}\/\d{4})/($3\/$1\/$2)/g; #print $line; #}
DD: 11/09/2009 AU: jas dimaano PP: Employee ID list ... PP: Perhaps you'll earn more than 10-50k of money! Why not?! This does +n't make any sense. Right? So I better end this now. PP: This is the end of this test document. ===