On Wed, Jun 24, 2009 at 04:37:52AM +0200, Gunnar Hjalmarsson wrote:
> Strange.
>
> It looks like strictures and warnings are not enabled (@a and @b are not
> declared). Try to add
>
> use strict;
> use warnings;
>
> and see if that makes Perl give you a hint.
>
here is complite perl script which produces such results without
any warning:
#!/usr/bin/perl
use strict;
use warnings;
use constant {
A => 0,
B => 1,
C => 2 };
my @a = (A, B, C);
my @b = (1, 2, 3);
while(my $i = shift @a) {
print $i, $/
}
while(my $i = shift @b) {
print $i, $/
}
--
If you think of MS-DOS as mono, and Windows as stereo,
then Linux is Dolby Digital and all the music is free...
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
