Herausfinden ob mann root ist (gelöst) - #150207 (Allgemeines zu Perl)

GwenDragon

2011-07-07 10:34

User since
2005-01-17
14749 Artikel
Admin1

Code (perl): (dl )

1
2
3

my $user_name = getlogin();
if ($user_name eq 'root') {
}

oder

Code (perl): (dl )

1
2
3

my $user_name = $ENV{LOGNAME} || $ENV{USER} || getpwuid($<);
if ($user_name eq 'root') {
}

Last edited: 2011-07-07 10:37:42 +0200 (CEST)

die Drachin Gwen