Help for this page

Select Code to Download


  1. or download this
    #!env perl
use strict;
...
    print "BLOCK: $cnt\nLEN: $len\n$buff\n\n\n\n";
    last if $cnt>10;
}
  2. or download this
    #!env perl
use strict;
...
    print "BLOCK: $cnt\nLEN: $len\n$buff\n\n\n\n";
    last if $cnt>10;
}