in reply to Parsing in perl

You probably want $le_data[4] instead of $le_data[5].

Update: sorry, let me try again. You probably want $line[4] instead of $le_data[5]; also change the outer for loop to go from 0 up to @le_data - 1 instead of from 1.