Help for this page

Select Code to Download

Select or download this

if (my $error = system("adduser","foo"))
{
     die "Trouble brewing\n";
}