@array=split( /-/, $sites); # from perldoc, it seems better to use a pattern rather than a string
if ($array[0] eq "three") # $array0 != $array[0]
{
print "three ";
}
if ($array[1] eq "seven")
{
print "seven ";
}