This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Simplify example pack code in perlpacktut
authorMark Jason Dominus <mjd@plover.com>
Fri, 9 Sep 2011 05:18:47 +0000 (00:18 -0500)
committerDave Rolsky <autarch@urth.org>
Fri, 9 Sep 2011 05:18:47 +0000 (00:18 -0500)
pod/perlpacktut.pod

index 7d2126a..2ce5662 100644 (file)
@@ -73,14 +73,13 @@ remains.
 The inverse operation - packing byte contents from a string of hexadecimal
 digits - is just as easily written. For instance:
 
-   my $s = pack( 'H2' x 10, map { "3$_" } ( 0..9 ) );
+   my $s = pack( 'H2' x 10, 30..39 );
    print "$s\n";
 
 Since we feed a list of ten 2-digit hexadecimal strings to C<pack>, the
 pack template should contain ten pack codes. If this is run on a computer
 with ASCII character coding, it will print C<0123456789>.
 
-
 =head1 Packing Text
 
 Let's suppose you've got to read in a data file like this: