MINI

C:/app/Administrator/product/11.2.0/dbhome_1/sysman/admin/scripts/storage/
files >> C:/app/Administrator/product/11.2.0/dbhome_1/sysman/admin/scripts/storage/sRawmetrics.pm
 #
# Copyright (c) 2001, 2004, Oracle. All rights reserved.  
#
#  $Id: sRawmetrics.pm 25-jun-2004.18:35:51 ajdsouza Exp $
#
#
# NAME
#	 sRawmetrics.pm
#
# DESC
#	OSD for implementing storage intercaes
#
#
# FUNCTIONS
#
#
# NOTES
#
#
# MODIFIED 	(MM/DD/YY)
# ajdsouza	07/06/04 - Created
#

# Initialize the environment variables at compile time
BEGIN
{
 $ENV{PATH} = "";
}

package storage::sRawmetrics;

require v5.6.1;

use strict;
use warnings;
use locale;
use storage::sUtilities;

#-----------------------------------------------------------------------------------------
# Global package variables
#-----------------------------------------------------------------------------------------
# Global package variable to hold sub name
our $AUTOLOAD;

#------------------------------------------------
# subs declared
#-----------------------------------------------

#-------------------------------------------------
# Variables in package scope
#------------------------------------------------

#-----------------------------------------------------------------------------------------
# FUNCTION : AUTOLOAD
#
# DESC 
# If sub is not defined here then pass an error message
#
# ARGUMENTS
# Args to be passed to the sub
#
#-----------------------------------------------------------------------------------------
sub AUTOLOAD
{
  my ( @args ) = @_;    

  my $sub = $AUTOLOAD;

  $sub =~ s/.*:://;	
    
  warn "Invoked subroutine $sub is not found , storage reporting functionality is not ported to platform $^O\n" and return if  $^O;

  warn "Invoked subroutine $sub is not found , storage reporting functionality is not ported to this platform \n" and return;

}

1;
#-----------------------------------------------------------------