my $err = system("who",">>/var/www/cgi-bin/new.txt");
unless ($err == 0)
{
   die "who command failed: $?";
}