#open newest
open(NEW,"<$path/newestm.txt");
@newest_members = <NEW>;
close(NEW);

#open whosonline
use DB_File;    
tie %whop, "DB_File", "$path/whosonline" or die "Can't open FILENAME: $!\n";
foreach $newm (@newest_members) {
 #############THIS IS THE PART I DON'T KNOW ;'(
if blahblha (values %whop)       #im figuring its going to need a if statement
print <<EOF;
$newm<b>*</b> - 
EOF
} 
else {
print <<EOF;
$newm -
EOF
}
}
untie %whop;
dbmclose %whop;