Statement Perl

  1. Home
  2. Perl
  3. Statement
  4. A while loop is often used to read from a file until there is no more data available
#!/usr/local/bin/perl
    # Set the value of x
    $x=1;
    while ($x <= 10)
    {
       print $x++ . ", ";
    }
    print "\n";