open (LOGFILE, "/var/log/tac_acc.log");
while (<LOGFILE>) {
  print
        if /$username/;
  #if (/$username/) {
   #print "<br>",$_;
#  }
}