Mailing-List: contact cygwin-help@cygwin.com; run by ezmlm List-Subscribe: List-Archive: List-Post: List-Help: , Sender: cygwin-owner@cygwin.com Mail-Followup-To: cygwin@cygwin.com Delivered-To: mailing list cygwin@cygwin.com From: "George Njoku" To: "'Gerrit P. Haase'" , Cc: Subject: RE: perl with cygwin 1.5 doesn't fly. Date: Sun, 20 Jul 2003 14:17:23 -0400 Message-ID: <000601c34eeb$2b20d940$0401a8c0@vaio> MIME-Version: 1.0 Content-Type: text/plain; charset="US-ASCII" Content-Transfer-Encoding: 7bit X-Priority: 3 (Normal) X-MSMail-Priority: Normal In-Reply-To: <195127617293.20030720002022@familiehaase.de> X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1165 Importance: Normal X-Virus-Scanned: by amavisd-new Check u're perl code again Use strict; # that way you must use 'my' to define all scalars My %module = ( 'cygwin'=>'Cygwin' ); # note 'cygwin' My $var = $module{$^0} || 'Unix' # can't remember what special variable = # $^0 but note that since %module and # $var are in the same scope you should try not to name %module and $module bcos $module refers to an entry in the hash of %modules Print "$var\n"; gnjoku@andromeda.rutgers.edu -----Original Message----- From: cygwin-owner@cygwin.com [mailto:cygwin-owner@cygwin.com] On Behalf Of Gerrit P. Haase Sent: Saturday, July 19, 2003 6:20 PM To: cygwin@cygwin.com Cc: perl5-porters@perl.org Subject: perl with cygwin 1.5 doesn't fly. Hallo, I'm getting strange errors when I compile Perl 5.8 with Cygwin 1.5, well, miniperl.exe compiles, but then the first simple tests break: 1. This as script executed with miniperl.exe: %module = ( cygwin => 'Cygwin' ); $module = $module{$^O} || 'Unix'; print "$module\n"; gives what is expected: $ ./miniperl ./minitest.pl Cygwin 2. If I change the script now to be: my %module = ( cygwin => 'Cygwin' ); $module = $module{$^O} || 'Unix'; print "$module\n"; I get: $ ./miniperl ./minitest.pl Unix 3. And if a second 'my' is added: my %module = ( cygwin => 'Cygwin' ); my $module = $module{$^O} || 'Unix'; print "$module\n"; I get: $ ./miniperl ./minitest.pl What is wrong with 'my' on Cygwin 1.5? Gerrit -- =^..^= -- Unsubscribe info: http://cygwin.com/ml/#unsubscribe-simple Problem reports: http://cygwin.com/problems.html Documentation: http://cygwin.com/docs.html FAQ: http://cygwin.com/faq/ -- Unsubscribe info: http://cygwin.com/ml/#unsubscribe-simple Problem reports: http://cygwin.com/problems.html Documentation: http://cygwin.com/docs.html FAQ: http://cygwin.com/faq/