Help for this page

Select Code to Download

Select or download this

use strict;

my @a = sort qw(
...
  print $result[$_][$line] for 0 .. $#result;
  print "\n";
}

Select or download this

B          Encode    IPC       SDBM_File XS      
ByteLoader Errno     List      Safe      attrs   
Cwd        Fcntl     MIME      Socket    re      
...
Devel      GDBM_File Opcode    Thread    
Digest     I18N      POSIX     Time      
DynaLoader IO        PerlIO    Unicode