print $ENV{'USERNAME'}."\n"; # besser print getlogin."\n";