title: Cannot Understand a Short simple Algorithm in Perl
body: <p>I never worked with Perl, that's why I need a little help to understand the following code:</p>
  
  <pre><code>for ($i=0; $i&lt;@ARGV; $i++) {
      open F, $ARGV[$i];
      while (&lt;F&gt;) {
          chomp;
          ($y,@x) = split;
          print $y;
          map { print " *$_ $i$_" } @x;
          print "\n";
      }
  }
  </code></pre>
  
  <p>I see that it iterates over a file(per line?),
  and then <code>while(&lt;F&gt;)</code>, meaning not empty?
  The chomp strips the string from newlines, spaces etc.</p>
  
  <p>The concept in general of perl confuses me, can anyone explain the example to me?</p>