1IO::Compress::Lzma(3) User Contributed Perl DocumentationIO::Compress::Lzma(3)
2
3
4
6 IO::Compress::Lzma - Write lzma files/buffers
7
9 use IO::Compress::Lzma qw(lzma $LzmaError) ;
10
11 my $status = lzma $input => $output [,OPTS]
12 or die "lzma failed: $LzmaError\n";
13
14 my $z = IO::Compress::Lzma->new( $output [,OPTS] )
15 or die "lzma failed: $LzmaError\n";
16
17 $z->print($string);
18 $z->printf($format, $string);
19 $z->write($string);
20 $z->syswrite($string [, $length, $offset]);
21 $z->flush();
22 $z->tell();
23 $z->eof();
24 $z->seek($position, $whence);
25 $z->binmode();
26 $z->fileno();
27 $z->opened();
28 $z->autoflush();
29 $z->input_line_number();
30 $z->newStream( [OPTS] );
31
32 $z->close() ;
33
34 $LzmaError ;
35
36 # IO::File mode
37
38 print $z $string;
39 printf $z $format, $string;
40 tell $z
41 eof $z
42 seek $z, $position, $whence
43 binmode $z
44 fileno $z
45 close $z ;
46
48 This module provides a Perl interface that allows writing lzma
49 compressed data to files or buffer.
50
51 For reading lzma files/buffers, see the companion module
52 IO::Uncompress::UnLzma.
53
55 A top-level function, "lzma", is provided to carry out "one-shot"
56 compression between buffers and/or files. For finer control over the
57 compression process, see the "OO Interface" section.
58
59 use IO::Compress::Lzma qw(lzma $LzmaError) ;
60
61 lzma $input_filename_or_reference => $output_filename_or_reference [,OPTS]
62 or die "lzma failed: $LzmaError\n";
63
64 The functional interface needs Perl5.005 or better.
65
66 lzma $input_filename_or_reference => $output_filename_or_reference [, OPTS]
67 "lzma" expects at least two parameters, $input_filename_or_reference
68 and $output_filename_or_reference and zero or more optional parameters
69 (see "Optional Parameters")
70
71 The $input_filename_or_reference parameter
72
73 The parameter, $input_filename_or_reference, is used to define the
74 source of the uncompressed data.
75
76 It can take one of the following forms:
77
78 A filename
79 If the $input_filename_or_reference parameter is a simple scalar,
80 it is assumed to be a filename. This file will be opened for
81 reading and the input data will be read from it.
82
83 A filehandle
84 If the $input_filename_or_reference parameter is a filehandle, the
85 input data will be read from it. The string '-' can be used as an
86 alias for standard input.
87
88 A scalar reference
89 If $input_filename_or_reference is a scalar reference, the input
90 data will be read from $$input_filename_or_reference.
91
92 An array reference
93 If $input_filename_or_reference is an array reference, each
94 element in the array must be a filename.
95
96 The input data will be read from each file in turn.
97
98 The complete array will be walked to ensure that it only contains
99 valid filenames before any data is compressed.
100
101 An Input FileGlob string
102 If $input_filename_or_reference is a string that is delimited by
103 the characters "<" and ">" "lzma" will assume that it is an input
104 fileglob string. The input is the list of files that match the
105 fileglob.
106
107 See File::GlobMapper for more details.
108
109 If the $input_filename_or_reference parameter is any other type,
110 "undef" will be returned.
111
112 The $output_filename_or_reference parameter
113
114 The parameter $output_filename_or_reference is used to control the
115 destination of the compressed data. This parameter can take one of
116 these forms.
117
118 A filename
119 If the $output_filename_or_reference parameter is a simple scalar,
120 it is assumed to be a filename. This file will be opened for
121 writing and the compressed data will be written to it.
122
123 A filehandle
124 If the $output_filename_or_reference parameter is a filehandle,
125 the compressed data will be written to it. The string '-' can be
126 used as an alias for standard output.
127
128 A scalar reference
129 If $output_filename_or_reference is a scalar reference, the
130 compressed data will be stored in $$output_filename_or_reference.
131
132 An Array Reference
133 If $output_filename_or_reference is an array reference, the
134 compressed data will be pushed onto the array.
135
136 An Output FileGlob
137 If $output_filename_or_reference is a string that is delimited by
138 the characters "<" and ">" "lzma" will assume that it is an output
139 fileglob string. The output is the list of files that match the
140 fileglob.
141
142 When $output_filename_or_reference is an fileglob string,
143 $input_filename_or_reference must also be a fileglob string.
144 Anything else is an error.
145
146 See File::GlobMapper for more details.
147
148 If the $output_filename_or_reference parameter is any other type,
149 "undef" will be returned.
150
151 Notes
152 When $input_filename_or_reference maps to multiple files/buffers and
153 $output_filename_or_reference is a single file/buffer the input
154 files/buffers will be stored in $output_filename_or_reference as a
155 concatenated series of compressed data streams.
156
157 Optional Parameters
158 The optional parameters for the one-shot function "lzma" are (for the
159 most part) identical to those used with the OO interface defined in the
160 "Constructor Options" section. The exceptions are listed below
161
162 "AutoClose => 0|1"
163 This option applies to any input or output data streams to "lzma"
164 that are filehandles.
165
166 If "AutoClose" is specified, and the value is true, it will result
167 in all input and/or output filehandles being closed once "lzma"
168 has completed.
169
170 This parameter defaults to 0.
171
172 "BinModeIn => 0|1"
173 This option is now a no-op. All files will be read in binmode.
174
175 "Append => 0|1"
176 The behaviour of this option is dependent on the type of output
177 data stream.
178
179 • A Buffer
180
181 If "Append" is enabled, all compressed data will be append to
182 the end of the output buffer. Otherwise the output buffer
183 will be cleared before any compressed data is written to it.
184
185 • A Filename
186
187 If "Append" is enabled, the file will be opened in append
188 mode. Otherwise the contents of the file, if any, will be
189 truncated before any compressed data is written to it.
190
191 • A Filehandle
192
193 If "Append" is enabled, the filehandle will be positioned to
194 the end of the file via a call to "seek" before any
195 compressed data is written to it. Otherwise the file pointer
196 will not be moved.
197
198 When "Append" is specified, and set to true, it will append all
199 compressed data to the output data stream.
200
201 So when the output is a filehandle it will carry out a seek to the
202 eof before writing any compressed data. If the output is a
203 filename, it will be opened for appending. If the output is a
204 buffer, all compressed data will be appended to the existing
205 buffer.
206
207 Conversely when "Append" is not specified, or it is present and is
208 set to false, it will operate as follows.
209
210 When the output is a filename, it will truncate the contents of
211 the file before writing any compressed data. If the output is a
212 filehandle its position will not be changed. If the output is a
213 buffer, it will be wiped before any compressed data is output.
214
215 Defaults to 0.
216
217 Examples
218 Here are a few example that show the capabilities of the module.
219
220 Streaming
221
222 This very simple command line example demonstrates the streaming
223 capabilities of the module. The code reads data from STDIN, compresses
224 it, and writes the compressed data to STDOUT.
225
226 $ echo hello world | perl -MIO::Compress::Lzma=lzma -e 'lzma \*STDIN => \*STDOUT' >output.lzma
227
228 The special filename "-" can be used as a standin for both "\*STDIN"
229 and "\*STDOUT", so the above can be rewritten as
230
231 $ echo hello world | perl -MIO::Compress::Lzma=lzma -e 'lzma "-" => "-"' >output.lzma
232
233 Compressing a file from the filesystem
234
235 To read the contents of the file "file1.txt" and write the compressed
236 data to the file "file1.txt.lzma".
237
238 use strict ;
239 use warnings ;
240 use IO::Compress::Lzma qw(lzma $LzmaError) ;
241
242 my $input = "file1.txt";
243 lzma $input => "$input.lzma"
244 or die "lzma failed: $LzmaError\n";
245
246 Reading from a Filehandle and writing to an in-memory buffer
247
248 To read from an existing Perl filehandle, $input, and write the
249 compressed data to a buffer, $buffer.
250
251 use strict ;
252 use warnings ;
253 use IO::Compress::Lzma qw(lzma $LzmaError) ;
254 use IO::File ;
255
256 my $input = IO::File->new( "<file1.txt" )
257 or die "Cannot open 'file1.txt': $!\n" ;
258 my $buffer ;
259 lzma $input => \$buffer
260 or die "lzma failed: $LzmaError\n";
261
262 Compressing multiple files
263
264 To compress all files in the directory "/my/home" that match "*.txt"
265 and store the compressed data in the same directory
266
267 use strict ;
268 use warnings ;
269 use IO::Compress::Lzma qw(lzma $LzmaError) ;
270
271 lzma '</my/home/*.txt>' => '<*.lzma>'
272 or die "lzma failed: $LzmaError\n";
273
274 and if you want to compress each file one at a time, this will do the
275 trick
276
277 use strict ;
278 use warnings ;
279 use IO::Compress::Lzma qw(lzma $LzmaError) ;
280
281 for my $input ( glob "/my/home/*.txt" )
282 {
283 my $output = "$input.lzma" ;
284 lzma $input => $output
285 or die "Error compressing '$input': $LzmaError\n";
286 }
287
289 Constructor
290 The format of the constructor for "IO::Compress::Lzma" is shown below
291
292 my $z = IO::Compress::Lzma->new( $output [,OPTS] )
293 or die "IO::Compress::Lzma failed: $LzmaError\n";
294
295 It returns an "IO::Compress::Lzma" object on success and undef on
296 failure. The variable $LzmaError will contain an error message on
297 failure.
298
299 If you are running Perl 5.005 or better the object, $z, returned from
300 IO::Compress::Lzma can be used exactly like an IO::File filehandle.
301 This means that all normal output file operations can be carried out
302 with $z. For example, to write to a compressed file/buffer you can use
303 either of these forms
304
305 $z->print("hello world\n");
306 print $z "hello world\n";
307
308 The mandatory parameter $output is used to control the destination of
309 the compressed data. This parameter can take one of these forms.
310
311 A filename
312 If the $output parameter is a simple scalar, it is assumed to be a
313 filename. This file will be opened for writing and the compressed
314 data will be written to it.
315
316 A filehandle
317 If the $output parameter is a filehandle, the compressed data will
318 be written to it. The string '-' can be used as an alias for
319 standard output.
320
321 A scalar reference
322 If $output is a scalar reference, the compressed data will be
323 stored in $$output.
324
325 If the $output parameter is any other type, "IO::Compress::Lzma"::new
326 will return undef.
327
328 Constructor Options
329 "OPTS" is any combination of zero or more the following options:
330
331 "AutoClose => 0|1"
332 This option is only valid when the $output parameter is a
333 filehandle. If specified, and the value is true, it will result in
334 the $output being closed once either the "close" method is called
335 or the "IO::Compress::Lzma" object is destroyed.
336
337 This parameter defaults to 0.
338
339 "Append => 0|1"
340 Opens $output in append mode.
341
342 The behaviour of this option is dependent on the type of $output.
343
344 • A Buffer
345
346 If $output is a buffer and "Append" is enabled, all
347 compressed data will be append to the end of $output.
348 Otherwise $output will be cleared before any data is written
349 to it.
350
351 • A Filename
352
353 If $output is a filename and "Append" is enabled, the file
354 will be opened in append mode. Otherwise the contents of the
355 file, if any, will be truncated before any compressed data is
356 written to it.
357
358 • A Filehandle
359
360 If $output is a filehandle, the file pointer will be
361 positioned to the end of the file via a call to "seek" before
362 any compressed data is written to it. Otherwise the file
363 pointer will not be moved.
364
365 This parameter defaults to 0.
366
367 "Filter => $filter"
368 When present $filter option must be an object of type
369 "Lzma::Filter::Lzma1". See "Lzma::Filter::Lzma" for a definition
370 of "Lzma::Filter::Lzma1".
371
372 If this option is not present an "Lzma::Filter::Lzma1" object with
373 default values will be used.
374
375 "Strict => 0|1"
376 This is a placeholder option.
377
378 Examples
379 TODO
380
382 print
383 Usage is
384
385 $z->print($data)
386 print $z $data
387
388 Compresses and outputs the contents of the $data parameter. This has
389 the same behaviour as the "print" built-in.
390
391 Returns true if successful.
392
393 printf
394 Usage is
395
396 $z->printf($format, $data)
397 printf $z $format, $data
398
399 Compresses and outputs the contents of the $data parameter.
400
401 Returns true if successful.
402
403 syswrite
404 Usage is
405
406 $z->syswrite $data
407 $z->syswrite $data, $length
408 $z->syswrite $data, $length, $offset
409
410 Compresses and outputs the contents of the $data parameter.
411
412 Returns the number of uncompressed bytes written, or "undef" if
413 unsuccessful.
414
415 write
416 Usage is
417
418 $z->write $data
419 $z->write $data, $length
420 $z->write $data, $length, $offset
421
422 Compresses and outputs the contents of the $data parameter.
423
424 Returns the number of uncompressed bytes written, or "undef" if
425 unsuccessful.
426
427 flush
428 Usage is
429
430 $z->flush;
431
432 Flushes any pending compressed data to the output file/buffer.
433
434 Returns true on success.
435
436 tell
437 Usage is
438
439 $z->tell()
440 tell $z
441
442 Returns the uncompressed file offset.
443
444 eof
445 Usage is
446
447 $z->eof();
448 eof($z);
449
450 Returns true if the "close" method has been called.
451
452 seek
453 $z->seek($position, $whence);
454 seek($z, $position, $whence);
455
456 Provides a sub-set of the "seek" functionality, with the restriction
457 that it is only legal to seek forward in the output file/buffer. It is
458 a fatal error to attempt to seek backward.
459
460 Empty parts of the file/buffer will have NULL (0x00) bytes written to
461 them.
462
463 The $whence parameter takes one the usual values, namely SEEK_SET,
464 SEEK_CUR or SEEK_END.
465
466 Returns 1 on success, 0 on failure.
467
468 binmode
469 Usage is
470
471 $z->binmode
472 binmode $z ;
473
474 This is a noop provided for completeness.
475
476 opened
477 $z->opened()
478
479 Returns true if the object currently refers to a opened file/buffer.
480
481 autoflush
482 my $prev = $z->autoflush()
483 my $prev = $z->autoflush(EXPR)
484
485 If the $z object is associated with a file or a filehandle, this method
486 returns the current autoflush setting for the underlying filehandle. If
487 "EXPR" is present, and is non-zero, it will enable flushing after every
488 write/print operation.
489
490 If $z is associated with a buffer, this method has no effect and always
491 returns "undef".
492
493 Note that the special variable $| cannot be used to set or retrieve the
494 autoflush setting.
495
496 input_line_number
497 $z->input_line_number()
498 $z->input_line_number(EXPR)
499
500 This method always returns "undef" when compressing.
501
502 fileno
503 $z->fileno()
504 fileno($z)
505
506 If the $z object is associated with a file or a filehandle, "fileno"
507 will return the underlying file descriptor. Once the "close" method is
508 called "fileno" will return "undef".
509
510 If the $z object is associated with a buffer, this method will return
511 "undef".
512
513 close
514 $z->close() ;
515 close $z ;
516
517 Flushes any pending compressed data and then closes the output
518 file/buffer.
519
520 For most versions of Perl this method will be automatically invoked if
521 the IO::Compress::Lzma object is destroyed (either explicitly or by the
522 variable with the reference to the object going out of scope). The
523 exceptions are Perl versions 5.005 through 5.00504 and 5.8.0. In these
524 cases, the "close" method will be called automatically, but not until
525 global destruction of all live objects when the program is terminating.
526
527 Therefore, if you want your scripts to be able to run on all versions
528 of Perl, you should call "close" explicitly and not rely on automatic
529 closing.
530
531 Returns true on success, otherwise 0.
532
533 If the "AutoClose" option has been enabled when the IO::Compress::Lzma
534 object was created, and the object is associated with a file, the
535 underlying file will also be closed.
536
537 newStream([OPTS])
538 Usage is
539
540 $z->newStream( [OPTS] )
541
542 Closes the current compressed data stream and starts a new one.
543
544 OPTS consists of any of the options that are available when creating
545 the $z object.
546
547 See the "Constructor Options" section for more details.
548
550 No symbolic constants are required by IO::Compress::Lzma at present.
551
552 :all Imports "lzma" and $LzmaError. Same as doing this
553
554 use IO::Compress::Lzma qw(lzma $LzmaError) ;
555
558 General feedback/questions/bug reports should be sent to
559 <https://github.com/pmqs/IO-Compress-Lzma/issues> (preferred) or
560 <https://rt.cpan.org/Public/Dist/Display.html?Name=IO-Compress-Lzma>.
561
563 Compress::Zlib, IO::Compress::Gzip, IO::Uncompress::Gunzip,
564 IO::Compress::Deflate, IO::Uncompress::Inflate,
565 IO::Compress::RawDeflate, IO::Uncompress::RawInflate,
566 IO::Compress::Bzip2, IO::Uncompress::Bunzip2, IO::Uncompress::UnLzma,
567 IO::Compress::Xz, IO::Uncompress::UnXz, IO::Compress::Lzip,
568 IO::Uncompress::UnLzip, IO::Compress::Lzop, IO::Uncompress::UnLzop,
569 IO::Compress::Lzf, IO::Uncompress::UnLzf, IO::Compress::Zstd,
570 IO::Uncompress::UnZstd, IO::Uncompress::AnyInflate,
571 IO::Uncompress::AnyUncompress
572
573 IO::Compress::FAQ
574
575 File::GlobMapper, Archive::Zip, Archive::Tar, IO::Zlib
576
578 This module was written by Paul Marquess, "pmqs@cpan.org".
579
581 See the Changes file.
582
584 Copyright (c) 2005-2021 Paul Marquess. All rights reserved.
585
586 This program is free software; you can redistribute it and/or modify it
587 under the same terms as Perl itself.
588
589
590
591perl v5.32.1 2021-03-19 IO::Compress::Lzma(3)