| B-Keywords documentation | Contained in the B-Keywords distribution. |
B::Keywords - Lists of reserved barewords and symbol names
use B::Keywords qw( @Symbols @Barewords );
print join "\n", @Symbols,
@Barewords;
B::Keywords supplies seven arrays of keywords: @Scalars,
@Arrays, @Hashes, @Filehandles, @Symbols, @Functions,
and @Barewords. The @Symbols array includes the contents of each
of @Scalars, @Arrays, @Hashes, @Functions and @Filehandles.
Similarly, @Barewords adds a few non-function keywords and
operators to the @Functions array.
All additions and modifications are welcome.
@Scalars@Arrays@Hashes@Filehandles@FunctionsThe above are lists of variables, special file handles, and built in functions.
@SymbolsThis is just the combination of all of the above: variables, file handles, and functions.
@BarewordsThis is a list of other special keywords in perl including operators and all the control structures.
Anything can be exported if you desire. Use the :all tag to get everything.
keywords.pl from the perl source, perlvar, perlfunc, perldelta.
Please report any bugs or feature requests to bug-B-Keywords at
rt.cpan.org, or through the web interface at
http://rt.cpan.org/NoAuth/ReportBug.html?Queue=B-Keywords. I will be
notified, and then you'll automatically be notified of progress on
your bug as I make changes.
You can find documentation for this module with the perldoc command.
perldoc B::Keywords
You can also look for information at:
Michael G Schwern for patches
Copyright 2009 Joshua ben Jore, All rights reserved.
This program is free software; you can redistribute it and/or modify it under the terms of either:
a) the GNU General Public License as published by the Free Software Foundation; version 2, or
b) the "Artistic License" which comes with Perl.
This source is in Github: git://github.com/jbenjore/b-keywords.git
Joshua ben Jore <jjore@cpan.org>
| B-Keywords documentation | Contained in the B-Keywords distribution. |
## no critic (PodSections,UseWarnings,Interpolation,EndWithOne,NoisyQuotes) package B::Keywords; use strict; require Exporter; *import = *import = \&Exporter::import; use vars qw( @EXPORT_OK %EXPORT_TAGS ); @EXPORT_OK = qw( @Scalars @Arrays @Hashes @Filehandles @Symbols @Functions @Barewords ); %EXPORT_TAGS = ( 'all' => \@EXPORT_OK ); use vars '$VERSION'; $VERSION = '1.10'; use vars '@Scalars'; @Scalars = ( qw( $a $b $_ $ARG $& $MATCH $` $PREMATCH $' $POSTMATCH $+ $LAST_PAREN_MATCH $* $MULTILINE_MATCHING $. $INPUT_LINE_NUMBER $NR $/ $INPUT_RECORD_SEPARATOR $RS $| $OUTPUT_AUTO_FLUSH ), '$,', qw( $OUTPUT_FIELD_SEPARATOR $OFS $\ $OUTPUT_RECORD_SEPARATOR $ORS $" $LIST_SEPARATOR $; $SUBSCRIPT_SEPARATOR $SUBSEP ), '$#', qw( $OFMT $% $FORMAT_PAGE_NUMBER $= $FORMAT_LINES_PER_PAGE $- $FORMAT_LINES_LEFT $~ $FORMAT_NAME $^ $FORMAT_TOP_NAME $: $FORMAT_LINE_BREAK_CHARACTERS $? $CHILD_ERROR $^CHILD_ERROR_NATIVE $! $ERRNO $OS_ERROR $@ $EVAL_ERROR $$ $PROCESS_ID $PID $< $REAL_USER_ID $UID $> $EFFECTIVE_USER_ID $EUID ), '$(', qw( $REAL_GROUP_ID $GID ), '$)', qw( $EFFECTIVE_GROUP_ID $EGID $0 $PROGRAM_NAME $[ $] $^A $ACCUMULATOR $^C $COMPILING $^D $DEBUGGING $^E $EXTENDED_OS_ERROR $^ENCODING $^F $SYSTEM_FD_MAX $^H $^I $INPLACE_EDIT $^L $FORMAT_FORMFEED $^M $^N $^O $OSNAME $^OPEN $^P $PERLDB $^R $LAST_REGEXP_CODE_RESULT $^RE_DEBUG_FLAGS $^RE_TRIE_MAXBUF $^S $EXCEPTIONS_BEING_CAUGHT $^T $BASETIME $^TAINT $^UNICODE $^UTF8LOCALE $^V $PERL_VERSION $^W $WARNING $^WARNING_BITS $^WIDE_SYSTEM_CALLS $^X $EXECUTABLE_NAME $ARGV ), ); use vars '@Arrays'; @Arrays = qw( @+ $LAST_MATCH_END @- @LAST_MATCH_START @ARGV @INC @_ ); use vars '@Hashes'; @Hashes = qw( %OVERLOAD %! %^H %INC %ENV %SIG ); use vars '@Filehandles'; @Filehandles = qw( *ARGV ARGV ARGVOUT STDIN STDOUT STDERR ); use vars '@Functions'; @Functions = qw( AUTOLOAD BEGIN DESTROY END INIT CHECK UNITCHECK abs accept alarm atan2 bind binmode bless break caller chdir chmod chomp chop chown chr chroot close closedir connect cos crypt dbmclose dbmopen defined delete die dump each endgrent endhostent endnetent endprotoent endpwent endservent eof eval exec exists exit fcntl fileno flock fork format formline getc getgrent getgrgid getgrnam gethostbyaddr gethostbyname gethostent getlogin getnetbyaddr getnetbyname getnetent getpeername getpgrp getppid getpriority getprotobyname getprotobynumber getprotoent getpwent getpwnam getpwuid getservbyname getservbyport getservent getsockname getsockopt glob gmtime goto grep hex index int ioctl join keys kill last lc lcfirst length link listen local localtime log lstat map mkdir msgctl msgget msgrcv msgsnd my next not oct open opendir ord our pack pipe pop pos print printf prototype push quotemeta rand read readdir readline readlink readpipe recv redo ref rename require reset return reverse rewinddir rindex rmdir say scalar seek seekdir select semctl semget semop send setgrent sethostent setnetent setpgrp setpriority setprotoent setpwent setservent setsockopt shift shmctl shmget shmread shmwrite shutdown sin sleep socket socketpair sort splice split sprintf sqrt srand stat state study substr symlink syscall sysopen sysread sysseek system syswrite tell telldir tie tied time times truncate uc ucfirst umask undef unlink unpack unshift untie use utime values vec wait waitpid wantarray warn write -r -w -x -o -R -W -X -O -e -z -s -f -d -l -p -S -b -c -t -u -g -k -T -B -M -A -C ); use vars '@Barewords'; @Barewords = qw( __FILE__ __LINE__ __PACKAGE__ __DATA__ __END__ CORE EQ GE GT LE LT NE NULL and cmp continue default do else elsif eq err exp for foreach ge given gt if le lock lt m ne no or package q qq qr qw qx s sub tr unless until when while x xor y ); use vars '@Symbols'; @Symbols = ( @Scalars, @Arrays, @Hashes, @Filehandles, @Functions ); # This quote is blatantly copied from ErrantStory.com, Michael Poe's # comic. BEGIN { $^W = 0 } "You know, when you stop and think about it, Cthulhu is a bit a Mary Sue isn't he?" __END__