my @new = split /\s+/, $item;

##</code><code>##

    my($eleven, $fourteen) = (split /\s+/, $item)[10,13];