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

#####  <foo>

# -- comment --> print 1 + 1 (comment color only)

print "ooo ***** One plus one is ", 1 + 1, " ***** ooo\n"; # foo print

print "ooo ***** One plus one is ", 1 + 1, " ***** ooo\n";

print 'o"o';
print "o'o";

# A single quote: "
# Two quotes on comment line: "foo"

for (my $foo = 0; $foo < 3; $foo++) {
	print "Hi\n";
}

print "A \"file\"...";

print "oo-- A Quote: \" --oo", 1 + 1;

my $foo = "span style=\"color:#717171"; print "$foo\n";

$foo = "span style=\"color:\#717171"; print "$foo\n";