ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/Convert-UUlib/example-decoder
(Generate patch)

Comparing Convert-UUlib/example-decoder (file contents):
Revision 1.20 by root, Mon Aug 24 06:15:00 2009 UTC vs.
Revision 1.22 by root, Fri Feb 28 06:57:25 2020 UTC

1#!/usr/bin/perl 1#!/usr/bin/perl
2 2
3# decode all the files in the directory uusrc/ and copy 3# decode all the files in the directory uusrc/ and copy
4# the resulting files to uudst/ 4# the resulting files to uudst/
5
6use Coro::Multicore;
5 7
6use Convert::UUlib ':all'; 8use Convert::UUlib ':all';
7 9
8sub namefilter { 10sub namefilter {
9 my ($path) = @_; 11 my ($path) = @_;
20 0 22 0
21} 23}
22 24
23SetOption OPT_RBUF, 128*1024; 25SetOption OPT_RBUF, 128*1024;
24SetOption OPT_WBUF, 1024*1024; 26SetOption OPT_WBUF, 1024*1024;
25SetOption OPT_IGNMODE, 1;
26SetOption OPT_IGNMODE, 1; 27SetOption OPT_IGNMODE, 1;
27SetOption OPT_VERBOSE, 1; 28SetOption OPT_VERBOSE, 1;
28SetOption OPT_DOTDOT, 1; 29SetOption OPT_DOTDOT, 1;
29SetOption OPT_AUTOCHECK, 0; 30SetOption OPT_AUTOCHECK, 0;
30 31

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines