[lug] Perl question (off os)

[Atkinson, Chip]

Greetings,

Does anyone have any idea why I'm getting the following warnings from this
trivial perl script?  I'm using perl 5.004 and 5.6 on an HPUX 11.0 box.  On
my linux box it works fine.

In particular, it doesn't appear to be a regular problem as the warning is
not generated for all items in the hash.

cms01dbldr[webdev]# cat j.pl
#!/usr/bin/perl

%nsp_code = (
  a => 'Abc',
  m => 'MCI',
  q => 'Unknown',
  r => 'Ruv',
  s => 'Sprint',
  x => 'Unknown',
  y => 'Genuity',
  z => '1234',
);


print ("nsp_code\{xm\}: ", $nsp_code{xm}, "\n");

cms01dbldr[webdev]# perl -wc j.pl
Ambiguous use of m => resolved to "m" => at j.pl line 5.
Ambiguous use of q => resolved to "q" => at j.pl line 6.
Ambiguous use of s => resolved to "s" => at j.pl line 8.
Ambiguous use of x => resolved to "x" => at j.pl line 9.
Ambiguous use of y => resolved to "y" => at j.pl line 10.
j.pl syntax OK

Thanks in advance.

Chip