Thanks, I was trying to come up with some shortcuts and was failing miserably and the awnsers I got here reminded me I could do the following, this is the actual code.
my %data = ( DATA => { DIR => "/prod" },
LOGS => { DIR => "/prod/logs" },
SITE1 => { DIR => "/prod/data1",
FILE => "/prod/data1/LSTD.DAT" },
SITE2 => { DIR => "/prod/data2",
FILE => "/prod/data2/LSTD.DAT" },
LOG1 => { FILE => "/prod/logs/stdaudit01_3
+289.log_1" },
LOG2 => { FILE => "/prod/logs/stdaudit02_8
+750.log_1" } );
# assign $data{$_}{'COPY_D'} and $data{$_}{'COPY_F'} Where needed
for ( keys (%data) )
{
if ( $data{$_}{'DIR'} ) { $data{$_}{'COPY_D'} = join '', $ARCHIVE
+_DIR, $data{$_}{'DIR'} }
if ( $data{$_}{'FILE'} ) { $data{$_}{'COPY_F'} = join '', $ARCHIVE
+_DIR, $data{$_}{'FILE'} }
}
I just needed to provide an interface to do some copying once a flashcopy is made of a disk...
Ted
--
"That which we persist in doing becomes easier, not that the task itself has become easier, but that our ability to perform it has improved."
--Ralph Waldo Emerson
|