| joinDate hour day month year monthIndex |

joinDate := '16:21 - 15 de jun. de 2011'.
hour := joinDate copyFrom: 1 to: 5.
day := joinDate copyFrom: 9 to: 10.
year := joinDate copyFrom: 23 to: 26.
month := joinDate copyFrom: 14 to: 17.

monthIndex := Dictionary new.
monthIndex 
		at: 'ene' put: '01';
		at: 'feb' put: '02';
		at: 'mar' put: '03';
		at: 'abr' put: '04';
		at: 'may' put: '05';
		at: 'jun' put: '06';
		at: 'jul' put: '07';
		at: 'ago' put: '08';
		at: 'sep' put: '09';
		at: 'oct' put: '10';
		at: 'nov' put: '11';
		at: 'dic' put: '12'.

month = 'jun' "<-- This gives false"

"So, this two doesn't work:"
"month := monthIndex at: month."
"(hour,day,month,year)asDate"