Moin Moin!
Hallo,
gelöst habe ich es so,
sub isroot
{
my $tmp=whoami
;
chomp($tmp);if ($tmp eq 'root')
{return 1;}
else
{return 0;}
}
>
> gruß
> piet
Oder kurz, ohne Extra-Prozess und ohne Angriffsmöglichkeiten über $ENV{'PATH'}:
$<==0
Siehe [perlvar](http://perldoc.perl.org/perlvar.html).
Alexander
--
Today I will gladly share my knowledge and experience, for there are no sweeter words than "I told you so".