Hi!
I'm stuck. Can you help me?

After the backup by Oracle RMAN tool I parse the log file and create
two hash tables:

%channel =  #It collects information specific to channels
 {ch1}
    ->[0]   allocated channel: ch1
        ->[1]   channel ch1: SID=596 device type=DISK
        ->[2]   channel ch1: starting compressed full datafile backup set
        ->[3]   channel ch1: specifying datafile(s) in backup set
 {ch2}
    ->[0]   allocated channel: ch2
        ->[1]   channel ch2: SID=15 device type=DISK
        ->[2]   channel ch2: starting compressed full datafile backup set
        ->[3]   channel ch2: specifying datafile(s) in backup set

%channel_files = #It collects information about files that are
processed by the channel
 {ch1}
    ->[0]   input datafile file number=00014 name=/foo/oradata/foo/foo-
data04.dbf
    ->[1]   input datafile file number=00019 name=/foo/oradata/foo/foo-
data05.dbf
 {ch2}
    ->[0]   input datafile file number=00013 name=/foo/oradata/foo/foo-
index03.dbf
    ->[1]   input datafile file number=00012 name=/foo/oradata/foo/foo-
data03.dbf

I would like to concatenate information from the above two hash tables
into one line. Example result that I would get:
============================

Files for channel 'ch1':
  Channel name    Channel type   File Number      File Name
  --------------- -------------- ----------------
---------------------------
  ch1             DISK           00014            /foo/oradata/foo/foo-
data04.dbf
  ch1             DISK           00019            /foo/oradata/foo/foo-
data05.dbf

Files for channel 'ch2':
  Channel name    Channel type   File Number      File Name
  --------------- -------------- ----------------
---------------------------
  ch2             DISK           00013            /foo/oradata/foo/foo-
index03.dbf
  ch2             DISK           00012            /foo/oradata/foo/foo-
data03.dbf

============================

I will be grateful for your help.

Regards,
--
Scottie


-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to