% This document was generated automagically by lgrind.  DO NOT EDIT.

\LGinlinefalse\LGbegin\lgrinde
\L{\LB{\C{}\V{\#}!\1usr\1interp\1perl -w}}
\CE{}\L{\LB{}}
\L{\LB{\C{}\V{\#} METHODS OF ACCESSING LAST ARRAY ELEMENT IN PERL}}
\CE{}\L{\LB{\C{}\V{\#} By Louis Ziantz}}
\CE{}\L{\LB{}}
\L{\LB{\C{}\V{\#} Description: This program is a demonstration different ways}}
\CE{}\L{\LB{\C{}\V{\#}             to access the last element of an array.}}
\CE{}\L{\LB{\C{}\V{\#} Procedure:   The last element of an array is accessed using}}
\CE{}\L{\LB{\C{}\V{\#}             three different methods.}}
\CE{}\L{\LB{\C{}\V{\#} Input:       None}}
\CE{}\L{\LB{\C{}\V{\#} Output:      The size and last element of the an array.}}
\CE{}\L{\LB{}}
\L{\LB{@\V{strings}_=_(\S{}\"first\"\SE{},_\S{}\"second\"\SE{},_\S{}\"last\"\SE{});}}
\L{\LB{}}
\L{\LB{\V{\$size}_=_@\V{strings};\C{}_______\V{\#} returns size of array}}
\CE{}\L{\LB{}}
\L{\LB{\K{print}(\S{}\"There_are_\$size_elements_in_the_\2@strings_array.\2n\"\SE{});}}
\L{\LB{\K{print}(\S{}\"The_last_element_of_the_array_is_\$strings[\$size_\-_1].\2n\"\SE{});}}
\L{\LB{\K{print}(\S{}\"The_last_element_of_the_array_is_\$strings[\$\#strings].\2n\"\SE{});}}
\L{\LB{\K{print}(\S{}\"The_last_element_of_the_array_is_\$strings[\-1].\2n\"\SE{});}}
\endlgrinde\LGend
