I tried running it with .cfg file where array @CFG holds list of hashes. its works,
Now I am having problem to understand what gets initialize in this process "my $rc = do($file);"
Suppose if after reading I want to pass the content of (@CFG) to another subroutine how can that be done?
I think I am totally lost, Any suggestion, Please.
Cheers,

It is unlikely you will find your config data in @CFG. At the very least it will be in @CFG::CFG. You will have to pre-pend the package name (CFG::) to the variable name.

CountZero

A program should be light and agile, its subroutines connected like a string of pearls. The spirit and intent of the program should be retained throughout. There should be neither too little or too much, neither needless loops nor useless variables, neither lack of structure nor overwhelming rigidity." - The Tao of Programming, 4.1 - Geoffrey James

A program should be light and agile, its subroutines connected like a string of pearls. The spirit and intent of the program should be retained throughout. There should be neither too little or too much, neither needless loops nor useless variables, neither lack of structure nor overwhelming rigidity." - The Tao of Programming, 4.1 - Geoffrey James

When putting a smiley right before a closing parenthesis, do you:

Use two parentheses: (Like this: :) )
Use one parenthesis: (Like this: :)
Reverse direction of the smiley: (Like this: (: )
Use angle/square brackets instead of parentheses
Use C-style commenting to set the smiley off from the closing parenthesis
Make the smiley a dunce: (:>
I disapprove of emoticons
Other