Edit D:\app\Administrator\product\11.2.0\dbhome_1\sysman\admin\scripts\db\auditSystem.pl

#!/usr/local/bin/perl
# 
# $Header: auditSystem.pl 04-nov-2004.08:42:27 dkjain Exp $
#
# auditSystem.pl
# 
# Copyright (c) 2004, Oracle. All rights reserved.  
#
#    NAME
#      auditSystem.pl - <one-line expansion of the name>
#
#    DESCRIPTION
#      <short description of component this file declares/defines>
#
#    NOTES
#      <other useful comments, qualifications, etc.>
#
#    MODIFIED   (MM/DD/YY)
#    dkjain      10/31/04 - Fixed unable to connect
#    dkjain      10/13/04 - dkjain_esa_impl2
#    dkjain      10/13/04 - Creation
# 
  require "emd_common.pl";
  require "semd_common.pl";
  require "$ENV{EMDROOT}/sysman/admin/scripts/db/esaDbUtils.pl";
  require "$ENV{EMDROOT}/sysman/admin/scripts/db/esaUtils.pl";
  my %stdinArgs = get_stdinvars();
  my $username = $stdinArgs{"EM_TARGET_USERNAME"};
  my $password = $stdinArgs{"EM_TARGET_PASSWORD"};
  my $address = $ENV{EM_TARGET_ADDRESS};
  my $role = $ENV{EM_TARGET_ROLE};
  my $mode = 0;

if($role =~ /SYSDBA/i)
  {
    $mode = 2;
  }
  elsif($role =~ /SYSOPER/i)
  {
    $mode = 4;
  }

my $dbh = open_db_connection("dbi:Oracle:", "$username@".$address,$password,$mode); 
  getUserWithPrivileges($dbh, "AUDIT_SYSTEM","AUDIT SYSTEM");
  close_db_connection($dbh) ;

Ms-Dos/Windows Unix Write backup

jsp File Browser version 1.2 by www.vonloesch.de