Did you hexdump your data file?

Have a clue about what?

Hopefully you're sufficiently convinced split function isn't broken, so your question is?

I don't think split function is an issue. it's something related when I tried to read a file. it only read the line up to length = 51 and then it will continue to read on the nextline. I already checked the file, there is no newline in the file.

I don't think split function is an issue.

But you did, see split function.

it only read the line up to length = 51 and then it will continue to read on the nextline. I already checked the file, there is no newline in the file.

There is a saying about that #11943 Ah yes, and you are the first person to have noticed this bug since 1987. Sure.

It is not impossible to discover bugs in perl, I've seen it many times, but each time, it was by someone who provided a Short, Self Contained, Correct (Compilable), Example

We only have your word that there is no newline in your datafile, or that a problem exists at all. We need code that proves it :) see How do I post a question effectively?

The datafile

1;2;3;4;5;6;7;8;9;10;11;12;13;14;15;16;17;18;19;20;21;22;23;24;25;26;27;28;29;30;31;32;33;34;35;36

1;2;3;4;5;6;7;8;9;10;11;12;13;14;15;16;17;18;19;20;21;22;23;24;25;26;27;28;29;30;31;32;33;34;35;36

1;2;3;4;5;6;7;8;9;10;11;12;13;14;15;16;17;18;19;20;21;22;23;24;25;26;27;28;29;30;31;32;33;34;35;36

1;2;3;4;5;6;7;8;9;10;11;12;13;14;15;16;17;18;19;20;21;22;23;24;25;26;27;28;29;30;31;32;33;34;35;36

sub split_the_element{
my ($local_fh) = @_;
while (<$local_fh>) {
  chomp;
  my $size = length $_;
  print "size $size\n";
  foreach my $element (split ';', $_) {
     printf $fhout "%s,\n", $element;
  }
 }
[download]

However, the line get chop after the lengh is >= 51. Is there any workaround which can read the full line?

size 51

size 51

size 51

size 51

size 51

size 51

size 51

size 51

size 51

size 36