Help for this page

Select Code to Download


  1. or download this
    $ ./makev.pl 10000 > test.10k.v
    $ time perl_5.8.8 -w testv.pl test.10k.v
    ...
    $ time perl_5.30 -w testv.pl test.10k.v
    LAST MODULE (Perl 5.030000): je0dhj
    perl_5.30 -w testv.pl test.10k.v  0.01s user 0.02s system 0% cpu 26.29
    +1 total
    
  2. or download this
    !/usr/bin/perl -w
    use Text::Wrap;
    ...
        }
        print "endmodule\n\n";
    }
    
  3. or download this
    use strict;
    use File::Slurp;
    ...
        }
        print "LAST MODULE (Perl $]): $name\n";
    }