$_ is the line from DATA.
On Wed, 13 Feb 2002, Brett W. McCoy wrote:
> On Wed, 13 Feb 2002, Bill -OSX- Jones wrote:
>
> > Given:
> >
> > #!perl
> > while(<DATA>){
> >
> > for $x(split//){
> >
> > print "X:$x S:$#_ \n";
> > }}
> > __END__
> > 1963
> >
> >
> > Why is $#_ a -1 ???
>
> Because $#_ is the value of the last index of @_, which does not appear to
> be defined anywhere.
>
> I think you just want $_ here?
>
> -- Brett
> http://www.chapelperilous.net/
> ------------------------------------------------------------------------
> The health of a democratic society may be measured by the quality
> of functions performed by private citizens.
> -- Alexis de Tocqueville
>
>
