foreach $loctitle (@titleb){
$online++;
}