Lesson2_control_structures_example-3-debug2-fixed.pl

#!/usr/bin/perl
# 2013-06-13 Bradley Olson
# Kansas State University
# Summer Perl Course
#
# Debug example 2

#use warnings;
#use strict;

my $i=0;

while ($i lt 10)
{
	print 'moving up by $i';
}