foreach(sort keys %usernames){
  print "$_ $passwords{$_} $bgcolors{$_} $fgcolors{$_}\n";
}