#!/usr/bin/Perl -w
use strict;

# Comment

print "Hello World";

my $var1 = 1.5;  # All numbers are float
my $var2 = "string"; 

my $i = 0;
for ($i < 10; $i++) {
	print "$i\n";
}