#!/usr/local/bin/perl
use strict;
use warnings;

my $var;

for ($var = 0; $var <= 10; $var++){
 print "Let's increment $var\n";
}

my $var2;
while($var2 < 10){
  print "$var2\n";
}