Question

This code outputs the scalars in the row array properly:

  $line = "This is my favorite test";
  @row = split(/ /, $line);

  print $row[0];
  print $row[1];

The same code inside a foreach loop doesn’t print any scalar values:

  foreach $line (@lines){
      @row = split(/ /, $line);
      print $row[0];
      print $row[1];
  }

What could cause this to happen?

I am new to Perl coming from python. I need to learn Perl for my new position.

Answer 1

As already mentioned in Jefromi’s comments, whatever the problem is, it exists outside of the code you posted. This works entirely fine:

$lines[0] = "This is my favorite test";

foreach $line (@lines) {
    @row = split(/ /, $line);
    print $row[0];
    print $row[1];
}

The output is Thisis