> > my (@lines, $num) = ((), 4); > > You are assigning the list ((), 4) to @lines and nothing to $num. Perhaps you > meant: > > my ( $num, @lines ) = ( 4, () ); > > Or simply: > > my ( $num, @lines ) = 4;
Indeed, good catch. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>