#!/usr/bin/perl -w

use strict;

my $foo1 = "kev";
my $bar1 = "kev";
my $foo2 = "spencer";
my $bar2 = "spencer";

if ($foo1 eq $bar1 && $foo2 eq $bar2) {
   print "yep, works fine for me\n";
}


##</code><code>##

%foo.pl
yep, works fine for me
%