I am off subject but I just want to add a little comment about this line:
($j,$j,$j,$j, $size, $j, $j, $j, $j) = split(" ", $_);
You do not need this useless variable $j.
You could just use the 5th field like this:
($size) = (split(" ", $_))[4];
The parentheses around $size used to force...