The Telegraph - Calcutta

| Monday, April 11, 2005 |

Advertise with us

IN TODAY'S PAPER

Front Page
Nation
Calcutta
Bengal
Opinion
International
Business
Sports
At Leisure

CITY NEWSLINES

Calcutta
North Bengal
North East
Guwahati
Jamshedpur
Jharkhand
Ranchi

WEEKLY FEATURES

Knowhow

ARCHIVES

Since 1st March, 1999

THE TELEGRAPH

-	About Us
-	Advertise
-	Feedback
-	Contact Us

SCORE CARD

<% dim line() redim line(28) dim dat1,dat2,dat3 dim txt dim reg,temp set reg=new regexp reg.global=true reg.IgnoreCase=true line(0)="*AUSTRALIA" line(1)="B. Clark c Jain b Sharma 19" line(2)="L. Keightley c Dhar b Goswami 5" line(3)="K. Rolton not out 107" line(4)="M. Jones lbw David 17" line(5)="L. Sthalekar c and b Dhar 55" line(6)="A. Blackwell not out 4" line(7)="Extras (lb-2, w-2, nb-4) 8" line(8)="Total (for 4 wkts, 50 ovs) 215" line(9)="Fall of wickets: 1/24, 2/31, 3/71, 4/210" line(10)="Bowling: Goswami 9-2-45-1, Sharma 10-2-39-1, Dhar 6-0-34-1, Al Khader 10-1-35-0, David 10-1-39-1, Marathe 5-0-21-0" line(11)="*INDIA" line(12)="A. Jain c Sthalekar b Smith 29" line(13)="J. Sharma run out 5" line(14)="A. Chopra run out 10" line(15)="M. Raj lbw Nitschke 6" line(16)="R. Dhar run out 6" line(17)="H. Kala run out 3" line(18)="A. Sharma lbw Sthalekar 22" line(19)="J. Goswami c sub b Fitzpatrick 18" line(20)="D. Marathe not out 7" line(21)="N. David b Fitzpatrick 0" line(22)="N. Al Khader b Nitschke 0" line(23)="Extras (b-2, lb-3, w-5, nb-1) 11" line(24)="Total (all out in 46 ovs) 117" line(25)="Fall of wickets: 1/14, 2/39, 3/54, 4/59, 5/63, 6/64, 7/93, 8/115, 9/116." line(26)="Bowling: Fitzpatrick 8-1-23-2, Smith 10-4-20-1, Hayes 10-1-28-0, Nitschke 9-2-14-2, Rolton 5-1-9-0, Sthalekar 4-1-18-1" redim preserve line(26) response.write " " for i=0 to ubound(line)-1 reg.pattern=" " set temp=reg.Execute(line(i)) if temp.count=0 and left(line(i),1)="*" then 'Segregate name response.write " " & vbcrlf response.write " " & vbcrlf response.write " " & vbcrlf elseif temp.count=0 and left(line(i),1)<>"*" then 'Segregate info e.g. innings response.write " " & vbcrlf response.write " " & vbcrlf response.write " " & vbcrlf else 'The rest is data dat1=" " dat2=" " dat3=" " txt=split(line(i)," ",-1) for j=0 to ubound(txt) if txt(j)<>"" then if dat1=" " then dat1=txt(j) elseif dat2=" " then dat2=txt(j) elseif dat3=" " then dat3=txt(j) end if end if next if dat3=" " and dat2<>" " then dat3=dat2 dat2=" " end if response.write " " response.write " " & vbcrlf response.write " " & vbcrlf response.write " " & vbcrlf response.write " " & vbcrlf end if next response.write "

" & vbcrlf response.write "" & mid(line(i),2) & "" response.write "
" & vbcrlf response.write line(i) & " " response.write "
" & vbcrlf response.write dat1 response.write "	" & vbcrlf response.write dat2 response.write "	" & vbcrlf response.write dat3 response.write "

" %>