Yor are declaring $le_data which you don't need. You already have the lines in the @le_data array. In Perl, you access an array element using $array_name. Just remove the

my $le_data;
[download]

line. And in the if condition, you need to do $le_data[5]