perl corelist

corelist.pl

#!perl
qw/
    abs accept alarm atan2 bind binmode bless break caller chdir
    chmod chomp chop chown chr chroot close closedir connect
    continue cos crypt dbmclose dbmopen default defined delete die
    do dump each endgrent endhostent endnetent endprotoent endpwent
    endservent eof eval exec exists exit exp 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
    given glob gmtime goto grep hex index int ioctl join keys kill
    last lc lcfirst length link listen local localtime lock log
    lstat map mkdir msgctl msgget msgrcv msgsnd my next no oct open
    opendir ord our pack package 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 sub 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 when
    write not __LINE__ __FILE__ DATA
/;