File manager - Edit - /usr/local/cpanel/3rdparty/perl/542/cpanel-lib/PPI/Token/ArrayIndex.pm
Back
package PPI::Token::ArrayIndex; =pod =head1 NAME PPI::Token::ArrayIndex - Token getting the last index for an array =head1 INHERITANCE PPI::Token::ArrayIndex isa PPI::Token isa PPI::Element =head1 DESCRIPTION The C<PPI::Token::ArrayIndex> token represents an attempt to get the last index of an array, such as C<$#array>. =head1 METHODS There are no additional methods beyond those provided by the parent L<PPI::Token> and L<PPI::Element> classes. =cut use strict; use PPI::Token (); our $VERSION = '1.279'; our @ISA = "PPI::Token"; ##################################################################### # Tokenizer Methods sub __TOKENIZER__on_char { my $t = $_[1]; # Suck in till the end of the arrayindex pos $t->{line} = $t->{line_cursor}; if ( $t->{line} =~ m/\G([\w:']+)/gc ) { $t->{token}->{content} .= $1; $t->{line_cursor} += length $1; } # End of token $t->_finalize_token->__TOKENIZER__on_char( $t ); } 1; =pod =head1 SUPPORT See the L<support section|PPI/SUPPORT> in the main module. =head1 AUTHOR Adam Kennedy E<lt>adamk@cpan.orgE<gt> =head1 COPYRIGHT Copyright 2001 - 2011 Adam Kennedy. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. The full text of the license can be found in the LICENSE file included with this module. =cut
| ver. 1.4 |
Github
|
.
| PHP 8.1.34 | Generation time: 0.1 |
proxy
|
phpinfo
|
Settings