| … | |
… | |
| 3 | use Carp; |
3 | use Carp; |
| 4 | |
4 | |
| 5 | require Exporter; |
5 | require Exporter; |
| 6 | require DynaLoader; |
6 | require DynaLoader; |
| 7 | |
7 | |
| 8 | $VERSION = 0.31; |
8 | $VERSION = 1; |
| 9 | |
9 | |
| 10 | @ISA = qw(Exporter DynaLoader); |
10 | @ISA = qw(Exporter DynaLoader); |
| 11 | |
11 | |
| 12 | @_consts = qw( |
12 | @_consts = qw( |
| 13 | ACT_COPYING ACT_DECODING ACT_ENCODING ACT_IDLE ACT_SCANNING |
13 | ACT_COPYING ACT_DECODING ACT_ENCODING ACT_IDLE ACT_SCANNING |
| … | |
… | |
| 257 | |
257 | |
| 258 | =head2 Loading sourcefiles, optionally fuzzy merge and start decoding |
258 | =head2 Loading sourcefiles, optionally fuzzy merge and start decoding |
| 259 | |
259 | |
| 260 | =over 4 |
260 | =over 4 |
| 261 | |
261 | |
| 262 | =item ($retval, $count) = LoadFile $fname, [$id, [$delflag]] |
262 | =item ($retval, $count) = LoadFile $fname, [$id, [$delflag, [$partno]]] |
| 263 | |
263 | |
| 264 | Load the given file and scan it for encoded contents. Optionally tag it |
264 | Load the given file and scan it for encoded contents. Optionally tag it |
| 265 | with the given id, and if C<$delflag> is true, delete the file after it is |
265 | with the given id, and if C<$delflag> is true, delete the file after it |
| 266 | no longer necessary. |
266 | is no longer necessary. If you are certain of the part number, you cna |
|
|
267 | specify it as the lat argument. |
|
|
268 | |
|
|
269 | A better (usually faster) way of doing this is using the C<SetFNameFilter> |
|
|
270 | functionality. |
| 267 | |
271 | |
| 268 | =item $retval = Smerge $pass |
272 | =item $retval = Smerge $pass |
| 269 | |
273 | |
| 270 | If you are desperate, try to call C<Smerge> with increasing C<$pass> |
274 | If you are desperate, try to call C<Smerge> with increasing C<$pass> |
| 271 | values, beginning at C<0>, to try to merge parts that usually would not |
275 | values, beginning at C<0>, to try to merge parts that usually would not |
