I have the folowing:
   my(%Projects) = {

#Server Products

'CaptureServer' =>
    { 'WorkingDirectory' =>
"$ProjectDir\\Src\\CaptureComponents\\CaptureServer",
      'CommandLine' => { 'Release' => "devenv /release /rebuild /out
CaptureServer.out Cap
                         'Debug' => "devenv /debug /rebuild /out
CaptureServer.out Capture
    },

(etc...)
};

   foreach $project (keys %Projects) {

      $wd = $Projects{$project}{'WorkingDirectory'};

      print "Building $Type $project in $wd: ...\n";

   }

Yet when I run it I get:

*** 100-05-15 14:54:08 Building Release HASH(0x8c98e10) in : ...

I am obviously missing something in the syntax. I thought that $project
would be a string ('CaptureServer' etc.).

Any ideas as to what I am doing wrong?

Thank you.

Kevin Burton
[EMAIL PROTECTED]


---
You are currently subscribed to perl-win32-users as: [archive@jab.org]
To unsubscribe, forward this message to
         [EMAIL PROTECTED]
For non-automated Mailing List support, send email to  
         [EMAIL PROTECTED]

Reply via email to