#!/usr/bin/perl -w print "Test one: ", "four" eq "six", "\n"; print "Test two: ", "four" == "six", "\n";