# $lengthandn=$line[4].',', $line[5];
#                         ^
$lengthandn = $line[4] . ',' . $line[5];