Vincent Foley wrote: > Hello everyone, > > I was toying around with Pugs and I tried the following Perl 5 list > assignment > > my ($a, undef, $b) = 1..3; > > Which gave me the following error message: > > Internal error while running expression: > *** > Unexpected "," > expecting word character, "\\", ":", "*" or parameter name > at <interactive> line 1, column 14
For reference, this sort of operation works if you write it on two lines, like: my ($a, $b); ($a, undef, $b) = 1..3; say "$a is 1 and $b is 3"; I'll look around in the source and see if I can make this work like perl5 (unless that's a bad idea for some reason). Regards, Jonathan Rockway -- package JAPH;use Catalyst qw/-Debug/;($;=JAPH)->config(name => do { $,.=reverse qw[Jonathan tsu rehton lre rekca Rockway][$_].[split //, ";$;"]->[$_].q; ;for 1..4;$,=~s;^.;;;$,});$;->setup;